all messages for Emacs-related lists mirrored at yhetil.org
 help / color / mirror / code / Atom feed
From: Albert Reiner <areiner@tph.tuwien.ac.at>
Subject: Re: eval: (search-forward)
Date: 12 Oct 2004 15:57:39 +0200	[thread overview]
Message-ID: <vw8brf8f38s.fsf@berry.phys.ntnu.no> (raw)
In-Reply-To: bjju0t13ct3.fsf@termo1.fi.uib.no

[Joakim Hove <hove@ift.uib.no>, Mon, 11 Oct 2004 09:59:36 +0200]:
> 1. Define the local variable work-string (or whatever) *as a
>    string*, in the relevant file.
> 
> 2. The following function in .emacs or somewhere:
> 
> (defun goto-work ()
>      (if (boundp 'work-string)
>       (progn
> 	(goto-char (point-min))
> 	(unless (search-forward work-string (point-max) 't)
> 	  (message (format "Could not find \"%s\" in buffer" work-string))))))
> 	  
> 3. (add-hook 'find-file-hooks 'goto-work)

I have modified goto-work to be (interactive) and would have expected
that I could then use M-x goto-work to go to the current position of
work-string at any time.  But surprisingly, after the hook is run the
boundp test always fails, as if the buffer-local value went away after
initialization.  Any simple fix?

TIA,

Albert.

  parent reply	other threads:[~2004-10-12 13:57 UTC|newest]

Thread overview: 10+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
2004-10-09 12:48 eval: (search-forward) Albert Reiner
2004-10-10 12:33 ` Oliver Scholz
2004-10-10 14:48   ` Albert Reiner
2004-10-11  7:59     ` Joakim Hove
2004-10-11 10:16       ` Albert Reiner
2004-10-12 13:57       ` Albert Reiner [this message]
2004-10-18  7:02         ` Joakim Hove
2004-10-24 16:11           ` eval: (search-forward) (Solved) Albert Reiner
2004-10-11  9:40     ` eval: (search-forward) Oliver Scholz
2004-10-11 10:09       ` Albert Reiner

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=vw8brf8f38s.fsf@berry.phys.ntnu.no \
    --to=areiner@tph.tuwien.ac.at \
    /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.