[Emacs-diffs] Changes to emacs/lisp/ps-print.el

[Romain Francoise]

Index: emacs/lisp/ps-print.el
diff -c emacs/lisp/ps-print.el:1.164 emacs/lisp/ps-print.el:1.165
*** emacs/lisp/ps-print.el:1.164        Sat Aug  6 22:13:43 2005
--- emacs/lisp/ps-print.el      Sat Sep 24 13:44:01 2005
***************
*** 4663,4669 ****
         (let* ((name   (concat (file-name-nondirectory (or (buffer-file-name)
                                                          (buffer-name)))
                              ".ps"))
!             (prompt (format "Save PostScript to file: (default %s) " name))
              (res    (read-file-name prompt default-directory name nil)))
         (while (cond ((file-directory-p res)
                       (ding)
--- 4663,4669 ----
         (let* ((name   (concat (file-name-nondirectory (or (buffer-file-name)
                                                          (buffer-name)))
                              ".ps"))
!             (prompt (format "Save PostScript to file (default %s): " name))
              (res    (read-file-name prompt default-directory name nil)))
         (while (cond ((file-directory-p res)
                       (ding)