mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-01-26 19:18:50 +00:00
Code Issues Releases Activity

New fun.

Browse Source
This commit is contained in:
Vinicius Jose Latorre 2004-05-06 04:00:05 +00:00
parent bd20e8cd66
commit 1ed43c8ea6
2 changed files with 6 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
lisp/ChangeLog
View File

@ -1,3 +1,8 @@
2004-05-06 Vinicius Jose Latorre <viniciusjl@ig.com.br>
* ps-print.el (ps-print-quote): Call ps-value-string.
(ps-value-string): New fun.
2004-05-06 Juanma Barranquero <lektu@terra.es>
* help-fns.el (help-argument-name): Default to bold; don't inherit

2
lisp/ps-print.el
View File

@ -3677,7 +3677,7 @@ If `ps-prefix-quote' is nil, it's set to t after generating string."
(defun ps-comment-string (str value)
"Return a comment string like \";; STR = VALUE\\n\"."
(concat ";; " str " = " (ps-value-string value) "\n"))
(format ";; %s = %s\n" str (ps-value-string value)))
(defun ps-value (alist-sym key)