[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: Why does the minibuffer get updated
From: |
Barry Margolin |
Subject: |
Re: Why does the minibuffer get updated |
Date: |
Thu, 15 Jan 2009 22:36:41 -0500 |
User-agent: |
MT-NewsWatcher/3.5.3b3 (Intel Mac OS X) |
In article
<726d8899-cdb6-45a8-a30d-8ce27270c7ba@f40g2000pri.googlegroups.com>,
Decebal <CLDWesterhof@gmail.com> wrote:
> I like to have a wordcount displayed. I tried it with the following:
> (defun buffer-count-words()
> (interactive)
> (let ((occurences
> (how-many "\\w+" (point-min) (point-max))
> )
> )
> (string-match "[0-9]*" occurences)
> (match-string 0 occurences)
> )
> )
>
> (defvar buffer-count-words
> nil
> "*Number of words in the buffer."
> )
>
> (defun buffer-update-word-count()
> (interactive)
> (setq buffer-count-words (buffer-count-words))
> (force-mode-line-update)
> )
>
> (unless buffer-count-words
> (run-with-idle-timer 1 t 'buffer-update-word-count)
> )
>
> (unless (memq 'buffer-count-words global-mode-string)
> (add-to-list 'global-mode-string " words: " t)
> (add-to-list 'global-mode-string 'buffer-count-words t)
> )
>
> This does display the word count, but also keeps putting in the
> minibuffer '<NUMBER> occurences'.
> What am I doing wrong?
It's presumably coming from the how-many function, although my
documentation says that it only displays the number if the fourth
argument "interactive" is t. What version of Emacs are you running?
--
Barry Margolin, barmar@alum.mit.edu
Arlington, MA
*** PLEASE post questions in newsgroups, not directly to me ***
*** PLEASE don't copy me on replies, I'll read them in the group ***