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

Diff of /emacs/lisp/info.el

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

revision 1.345 by rms, Wed May 28 11:20:42 2003 UTC revision 1.346 by monnier, Wed May 28 22:53:08 2003 UTC
# Line 2856  the variable `Info-file-list-for-emacs'. Line 2856  the variable `Info-file-list-for-emacs'.
2856            ;; frame types at once.  We want this text to be invisible            ;; frame types at once.  We want this text to be invisible
2857            ;; on frames that can display the font above.            ;; on frames that can display the font above.
2858            (when (memq (framep (selected-frame)) '(x pc w32 mac))            (when (memq (framep (selected-frame)) '(x pc w32 mac))
2859              (add-text-properties (match-beginning 2) (1+ (match-end 2))              (add-text-properties (1- (match-beginning 2)) (match-end 2)
2860                                   '(invisible t))))                                   '(invisible t))))
2861          (goto-char (point-min))          (goto-char (point-min))
2862          (while (re-search-forward "\\(\\*Note[ \t]*\\)\n?[ \t]*\\([^:]*\\)\\(:[^.,:(]*\\(([^)]*)[^.,:]*\\)?[,:]?\n?\\)" nil t)          (while (re-search-forward "\\(\\*Note[ \t]*\\)\n?[ \t]*\\([^:]*\\)\\(:[^.,:(]*\\(([^)]*)[^.,:]*\\)?[,:]?\n?\\)" nil t)

Legend:
Removed from v.1.345  
changed lines
  Added in v.1.346

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