Re: Incremental search of a package

[Emanuel Berg]

A better (?) version of what I just wrote:

(defun search-package (pack)
  (interactive "sPackage: ")
  (let*((regexp (format "^  %s" pack))
        (hit    (save-excursion
                  (goto-char (point-min))
                  (when (search-forward-regexp regexp (point-max) t)
                    (back-to-indentation)
                    (point) ))))
    (if hit (goto-char hit)
        (message "No package: %s" pack) )))

-- 
underground experts united .... http://user.it.uu.se/~embe8573
Emacs Gnus Blogomatic ......... http://user.it.uu.se/~embe8573/blogomatic
                   - so far: 58 Blogomatic articles -