comparison lisp/help.el @ 4453:29efd169efe7

Automated merge with file:/Sources/xemacs-21.5-checked-out
author Aidan Kehoe <kehoea@parhasard.net>
date Sun, 11 May 2008 11:24:01 +0200
parents e7b3a3266356
children bd28481bb0e1
comparison
equal deleted inserted replaced
4452:82f8351e71c8 4453:29efd169efe7
1422 ((and (symbolp def) (not (fboundp def))) 1422 ((and (symbolp def) (not (fboundp def)))
1423 (princ "a symbol with a void (unbound) function definition.")) 1423 (princ "a symbol with a void (unbound) function definition."))
1424 (t 1424 (t
1425 nil))) 1425 nil)))
1426 (princ "\n") 1426 (princ "\n")
1427 (if autoload-file
1428 (princ (format " -- autoloads from \"%s\"\n" autoload-file)))
1429 (or file-name 1427 (or file-name
1430 (setq file-name (symbol-file function))) 1428 (setq file-name (symbol-file function)))
1431 (when file-name 1429 (when file-name
1432 (princ " -- loaded from \"") 1430 (princ " -- loaded from \"")
1433 (if (not (bufferp standard-output)) 1431 (if (not (bufferp standard-output))