/[emacs]/emacs/lisp/textmodes/artist.el
ViewVC logotype

Diff of /emacs/lisp/textmodes/artist.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.9 by pj, Sun Jan 13 10:08:29 2002 UTC revision 1.10 by rms, Sun Mar 3 22:22:42 2002 UTC
# Line 1773  Optional args PROGRAM-ARGS are arguments Line 1773  Optional args PROGRAM-ARGS are arguments
1773  Return a list (RETURN-CODE STDOUT STDERR)."  Return a list (RETURN-CODE STDOUT STDERR)."
1774    (save-excursion    (save-excursion
1775      (let* ((tmp-stdin-file-name (if stdin      (let* ((tmp-stdin-file-name (if stdin
1776                                      (make-temp-name                                      (make-temp-file
1777                                       (concat (file-name-as-directory                                       (concat (file-name-as-directory
1778                                                (or (getenv "TMPDIR") "/tmp"))                                                (or (getenv "TMPDIR") "/tmp"))
1779                                               "artist-stdin."))                                               "artist-stdin."))
1780                                    nil))                                    nil))
1781             (tmp-stdout-buffer (get-buffer-create             (tmp-stdout-buffer (get-buffer-create
1782                                 (concat "*artist-" program "*")))                                 (concat "*artist-" program "*")))
1783             (tmp-stderr-file-name (make-temp-name             (tmp-stderr-file-name (make-temp-file
1784                                    (concat (file-name-as-directory                                    (concat (file-name-as-directory
1785                                             (or (getenv "TMPDIR") "/tmp"))                                             (or (getenv "TMPDIR") "/tmp"))
1786                                            "artist-stdout.")))                                            "artist-stdout.")))

Legend:
Removed from v.1.9  
changed lines
  Added in v.1.10

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26