From: Decebal <CLDWesterhof@gmail.com>
To: help-gnu-emacs@gnu.org
Subject: Re: Why does the minibuffer get updated
Date: Fri, 16 Jan 2009 03:21:45 -0800 (PST) [thread overview]
Message-ID: <63756d8f-43ce-4084-892d-237d141d4aec@t26g2000prh.googlegroups.com> (raw)
In-Reply-To: barmar-21C0BC.22364115012009@mara100-84.onlink.net
On Jan 16, 4:36 am, Barry Margolin <bar...@alum.mit.edu> wrote:
> In article
> <726d8899-cdb6-45a8-a30d-8ce27270c...@f40g2000pri.googlegroups.com>,
>
>
>
> Decebal <CLDWester...@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?
At the moment I am working with:
GNU Emacs 21.3.1 (i586-suse-linux-gnu, X toolkit, Xaw3d scroll
bars) of 2008-05-16 on hammer3
And it is also in this one going wrong.
I tried to add nil:
(how-many "\\w+" (point-min) (point-max) nil)
Nothing is displayed in the echo area (it is not the minibuffer I
learned), but there is also nothing displayed after 'words: ' in the
status bar. So that is not a solution.
next prev parent reply other threads:[~2009-01-16 11:21 UTC|newest]
Thread overview: 4+ messages / expand[flat|nested] mbox.gz Atom feed top
2009-01-15 16:43 Why does the minibuffer get updated Decebal
2009-01-16 3:36 ` Barry Margolin
2009-01-16 11:21 ` Decebal [this message]
2009-01-16 14:42 ` Decebal
Reply instructions:
You may reply publicly to this message via plain-text email
using any one of the following methods:
* Save the following mbox file, import it into your mail client,
and reply-to-all from there: mbox
Avoid top-posting and favor interleaved quoting:
https://en.wikipedia.org/wiki/Posting_style#Interleaved_style
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to=63756d8f-43ce-4084-892d-237d141d4aec@t26g2000prh.googlegroups.com \
--to=cldwesterhof@gmail.com \
--cc=help-gnu-emacs@gnu.org \
/path/to/YOUR_REPLY
https://kernel.org/pub/software/scm/git/docs/git-send-email.html
* If your mail client supports setting the In-Reply-To header
via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line
before the message body.
Code repositories for project(s) associated with this external index
https://git.savannah.gnu.org/cgit/emacs.git
https://git.savannah.gnu.org/cgit/emacs/org-mode.git
This is an external index of several public inboxes,
see mirroring instructions on how to clone and mirror
all data and code used by this external index.