/[emacs]/emacs/lisp/eshell/esh-var.el
ViewVC logotype

Diff of /emacs/lisp/eshell/esh-var.el

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

revision 1.7 by pj, Sat Feb 16 09:44:00 2002 UTC revision 1.8 by walters, Fri Mar 1 01:47:35 2002 UTC
# Line 427  Possible options are: Line 427  Possible options are:
427        (let ((end (eshell-find-delimiter ?\< ?\>)))        (let ((end (eshell-find-delimiter ?\< ?\>)))
428          (if (not end)          (if (not end)
429              (throw 'eshell-incomplete ?\<)              (throw 'eshell-incomplete ?\<)
430            (let* ((temp (make-temp-name temporary-file-directory))            (let* ((temp (make-temp-file temporary-file-directory))
431                   (cmd (concat (buffer-substring (1+ (point)) end)                   (cmd (concat (buffer-substring (1+ (point)) end)
432                                " > " temp)))                                " > " temp)))
433              (prog1              (prog1

Legend:
Removed from v.1.7  
changed lines
  Added in v.1.8

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