This commit is contained in:
Vinicius Jose Latorre 2004-05-06 04:34:38 +00:00
parent 208ccc30da
commit cfb7b9ce93
2 changed files with 4 additions and 3 deletions

View file

@ -1,7 +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.
(ps-setup): Call ps-comment-string.
(ps-value-string, ps-comment-string): New funs.
2004-05-06 Juanma Barranquero <lektu@terra.es>

View file

@ -3680,8 +3680,8 @@ 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\"."
(format ";; %s = %s\n" str (ps-value-string value)))
"Return a comment string like \";; STR = VALUE\"."
(format ";; %s = %s" str (ps-value-string value)))
(defun ps-value (alist-sym key)