mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-30 12:21:25 -08:00
Code Issues Projects Releases Wiki Activity

* info.el (Info-set-mode-line): Remove file extension from Info-current-file

Browse source 
if there is one.

Fixes: debbugs:13016
This commit is contained in:
Chong Yidong 2012-12-07 23:31:43 +08:00
parent 3f1071c747
commit 75498db059
2 changed files with 8 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

5
lisp/ChangeLog
View file

@ -1,3 +1,8 @@
2012-12-07 Chong Yidong <cyd@gnu.org>
* info.el (Info-set-mode-line): Remove the file extension from
Info-current-file if there is one (Bug#13016).
2012-12-07 Glenn Morris <rgm@gnu.org>
* mail/rmail.el (rmail-mime-decoded): New permanent local.

4
lisp/info.el
View file

@ -1668,7 +1668,9 @@ escaped (\\\",\\\\)."
" ("
(if (stringp Info-current-file)
(replace-regexp-in-string
"%" "%%" (file-name-nondirectory Info-current-file))
"%" "%%"
(file-name-sans-extension
(file-name-nondirectory Info-current-file)))
(format "*%S*" Info-current-file))
") "
(if Info-current-node