Diff for /gforth/gforth.el between versions 1.66 and 1.67

version 1.66, 2003/02/08 17:32:28 version 1.67, 2003/02/28 20:13:22
Line 1120  exceeds 64 characters." Line 1120  exceeds 64 characters."
 (defun forth-find-tag (tagname &optional next-p regexp-p)  (defun forth-find-tag (tagname &optional next-p regexp-p)
   (interactive (find-tag-interactive "Find tag: "))    (interactive (find-tag-interactive "Find tag: "))
   (unless (or regexp-p next-p)    (unless (or regexp-p next-p)
     (setq tagname (concat "\\(^\\|\\s-\\)\\(" (regexp-quote tagname)       (setq tagname (concat "\\(^\\|\\s-+\\)\\(" (regexp-quote tagname) 
                             "\\)\\(\\s-\\|$\\)")))                              "\\)\\s-*\x7f")))
   (switch-to-buffer    (switch-to-buffer
    (find-tag-noselect tagname next-p t)))     (find-tag-noselect tagname next-p t)))
   

Removed from v.1.66  
changed lines
  Added in v.1.67


FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>