comparison lisp/help-mode.el @ 63657:06603f5724ed

(help-make-xrefs): If a symbol representing a face name is not followed by the word "face", it could still be a function or variable name, so don't bypass other checks.
author Juanma Barranquero <lekktu@gmail.com>
date Wed, 22 Jun 2005 13:53:56 +0000
parents 40c5f688942a
children 6fb026ad601f b7da78284d4c
comparison
equal deleted inserted replaced
63656:ded0bd7f2a38 63657:06603f5724ed
386 ;;; (let ((location 386 ;;; (let ((location
387 ;;; (find-function-noselect arg))) 387 ;;; (find-function-noselect arg)))
388 ;;; (pop-to-buffer (car location)) 388 ;;; (pop-to-buffer (car location))
389 ;;; (goto-char (cdr location)))) 389 ;;; (goto-char (cdr location))))
390 (help-xref-button 8 'help-function-def sym)) 390 (help-xref-button 8 'help-function-def sym))
391 ((facep sym) 391 ((and
392 (if (save-match-data (looking-at "[ \t\n]+face\\W")) 392 (facep sym)
393 (help-xref-button 8 'help-face sym))) 393 (save-match-data (looking-at "[ \t\n]+face\\W")))
394 (help-xref-button 8 'help-face sym))
394 ((and (boundp sym) (fboundp sym)) 395 ((and (boundp sym) (fboundp sym))
395 ;; We can't intuit whether to use the 396 ;; We can't intuit whether to use the
396 ;; variable or function doc -- supply both. 397 ;; variable or function doc -- supply both.
397 (help-xref-button 8 'help-symbol sym)) 398 (help-xref-button 8 'help-symbol sym))
398 ((and 399 ((and