summaryrefslogtreecommitdiff
path: root/lisp
diff options
context:
space:
mode:
authorRichard M. Stallman <rms@gnu.org>1994-12-21 14:38:59 +0000
committerRichard M. Stallman <rms@gnu.org>1994-12-21 14:38:59 +0000
commit159a489504006dc15625b4eddfc4d02b0fb53162 (patch)
tree3ad0b751a5c8f51515424aec805266beba194583 /lisp
parentf90f28a0392d1e847353d7026e119394a54b27fc (diff)
downloademacs-159a489504006dc15625b4eddfc4d02b0fb53162.tar.gz
(describe-function): Don't add `.el' when printing file name.
Diffstat (limited to 'lisp')
-rw-r--r--lisp/help.el5
1 files changed, 3 insertions, 2 deletions
diff --git a/lisp/help.el b/lisp/help.el
index 0bb57ab61d3..c7bcf665215 100644
--- a/lisp/help.el
+++ b/lisp/help.el
@@ -444,8 +444,9 @@ C-w print information on absence of warranty for GNU Emacs."
(if file
(progn
(princ " in `")
- (princ file)
- (princ ".el'"))))
+ ;; We used to add .el to the file name,
+ ;; but that's completely wrong when the user used load-file.
+ (princ file))))
(princ ".")
(terpri)
(let ((arglist (cond ((byte-code-function-p def)