/[emacs]/emacs/lisp/gnus/nneething.el
ViewVC logotype

Diff of /emacs/lisp/gnus/nneething.el

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

revision 1.4 by gerd, Tue Sep 19 13:37:09 2000 UTC revision 1.5 by zsh, Thu Mar 21 19:11:23 2002 UTC
# Line 365  included.") Line 365  included.")
365      (if (numberp article)      (if (numberp article)
366          (if (setq fname (cadr (assq article nneething-map)))          (if (setq fname (cadr (assq article nneething-map)))
367              (expand-file-name fname dir)              (expand-file-name fname dir)
368            (make-temp-name (expand-file-name "nneething" dir)))            (mm-make-temp-file (expand-file-name "nneething" dir)))
369        (expand-file-name article dir))))        (expand-file-name article dir))))
370    
371  (provide 'nneething)  (provide 'nneething)

Legend:
Removed from v.1.4  
changed lines
  Added in v.1.5

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