/[emacs]/emacs/lisp/bookmark.el
ViewVC logotype

Diff of /emacs/lisp/bookmark.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.60 by kfogel, Sat Jun 8 03:33:09 2002 UTC revision 1.61 by rms, Sat Jun 8 10:42:54 2002 UTC
# Line 1072  of the old one in the permanent bookmark Line 1072  of the old one in the permanent bookmark
1072    
1073    
1074  (defun bookmark-file-or-variation-thereof (file)  (defun bookmark-file-or-variation-thereof (file)
1075    "Return FILE if it exists, or return the first variation based on    "Return FILE (a string) or a reasonable variation that exists, else nil.
1076  `Info-suffix-list' that exists, else return nil."  Reasonable variations of the name are made by appending suffixes defined
1077    in `Info-suffix-list'."
1078    (if (file-exists-p file)    (if (file-exists-p file)
1079        file        file
1080      (require 'info)  ; ensure Info-suffix-list is bound      (require 'info)  ; ensure Info-suffix-list is bound
# Line 1085  of the old one in the permanent bookmark Line 1086  of the old one in the permanent bookmark
1086              Info-suffix-list)              Info-suffix-list)
1087        nil)))        nil)))
1088    
   
1089  (defun bookmark-jump-noselect (str)  (defun bookmark-jump-noselect (str)
1090    ;; a leetle helper for bookmark-jump :-)    ;; a leetle helper for bookmark-jump :-)
1091    ;; returns (BUFFER . POINT)    ;; returns (BUFFER . POINT)

Legend:
Removed from v.1.60  
changed lines
  Added in v.1.61

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26