Show
Ignore:
Timestamp:
09/10/05 10:16:00 (3 years ago)
Author:
miyoshi
Message:

--

Files:

Legend:

Unmodified
Added
Removed
Modified
Copied
Moved
  • trunk/lisp/eshell/esh-arg.el

    r3801 r3863  
    343343              (forward-char) 
    344344              (narrow-to-region (point) end) 
    345               (list 'eshell-escape-arg 
    346                     (eshell-parse-argument))) 
     345              (let ((arg (eshell-parse-argument))) 
     346                (if (eq arg nil) 
     347                    "" 
     348                  (list 'eshell-escape-arg arg)))) 
    347349          (goto-char (1+ end))))))) 
    348350