Mercurial > emacs
comparison lisp/eshell/esh-io.el @ 62915:b89e30bcd2bb
Changed all uses of `directory-sep-char' to ?/, and all uses of
`string-to-int' to `string-to-number'.
author | John Wiegley <johnw@newartisans.com> |
---|---|
date | Tue, 31 May 2005 00:14:26 +0000 |
parents | dc758ba35d6c |
children | 18a818a2ee7c 01137c1fdbe9 |
comparison
equal
deleted
inserted
replaced
62914:6c8a535adaf3 | 62915:b89e30bcd2bb |
---|---|
190 (if (string= oper "<") | 190 (if (string= oper "<") |
191 (error "Eshell does not support input redirection")) | 191 (error "Eshell does not support input redirection")) |
192 (eshell-finish-arg | 192 (eshell-finish-arg |
193 (prog1 | 193 (prog1 |
194 (list 'eshell-set-output-handle | 194 (list 'eshell-set-output-handle |
195 (or (and sh (string-to-int sh)) 1) | 195 (or (and sh (string-to-number sh)) 1) |
196 (list 'quote | 196 (list 'quote |
197 (aref [overwrite append insert] | 197 (aref [overwrite append insert] |
198 (1- (length oper))))) | 198 (1- (length oper))))) |
199 (goto-char (match-end 0)))))))) | 199 (goto-char (match-end 0)))))))) |
200 | 200 |