Re: eval: (search-forward)

[Albert Reiner]

> 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)

Wonderful, works beautifully!

Thanks,

Albert.