/[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.291 by pj, Sat Dec 29 18:02:49 2001 UTC revision 1.292 by rms, Sun Dec 30 19:45:41 2001 UTC
# Line 2641  the variable `Info-file-list-for-emacs'. Line 2641  the variable `Info-file-list-for-emacs'.
2641            ;; frame types at once.  We want this text to be invisible            ;; frame types at once.  We want this text to be invisible
2642            ;; on frames that can display the font above.            ;; on frames that can display the font above.
2643            (when (memq (framep (selected-frame)) '(x pc w32 mac))            (when (memq (framep (selected-frame)) '(x pc w32 mac))
2644              (add-text-properties (match-end 1) (match-end 2)              (add-text-properties (match-beginning 2) (1+ (match-end 2))
2645                                   '(invisible t intangible t))                                   '(invisible t intangible t))))
             (add-text-properties (1- (match-end 1)) (match-end 2)  
                                  '(intangible t))))  
2646          (goto-char (point-min))          (goto-char (point-min))
2647          (while (re-search-forward "\\*Note[ \n\t]+\\([^:]*\\):" nil t)          (while (re-search-forward "\\*Note[ \n\t]+\\([^:]*\\):" nil t)
2648            (if (= (char-after (1- (match-beginning 0))) ?\") ; hack            (if (= (char-after (1- (match-beginning 0))) ?\") ; hack

Legend:
Removed from v.1.291  
changed lines
  Added in v.1.292

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