Mercurial > emacs
comparison lisp/eshell/esh-var.el @ 53053:02020f3d155a
(eshell-parse-variable-ref): Added a backslash that was optional, but
obviously missing based on surrounding code.
author | John Wiegley <johnw@newartisans.com> |
---|---|
date | Fri, 14 Nov 2003 11:01:46 +0000 |
parents | 695cf19ef79e |
children | a72129314db4 |
comparison
equal
deleted
inserted
replaced
53052:e2abdb097d99 | 53053:02020f3d155a |
---|---|
428 (let ((name (if (eq (char-after) ?\') | 428 (let ((name (if (eq (char-after) ?\') |
429 (eshell-parse-literal-quote) | 429 (eshell-parse-literal-quote) |
430 (eshell-parse-double-quote)))) | 430 (eshell-parse-double-quote)))) |
431 (if name | 431 (if name |
432 (list 'eshell-get-variable (eval name) 'indices)))) | 432 (list 'eshell-get-variable (eval name) 'indices)))) |
433 ((eq (char-after) ?<) | 433 ((eq (char-after) ?\<) |
434 (let ((end (eshell-find-delimiter ?\< ?\>))) | 434 (let ((end (eshell-find-delimiter ?\< ?\>))) |
435 (if (not end) | 435 (if (not end) |
436 (throw 'eshell-incomplete ?\<) | 436 (throw 'eshell-incomplete ?\<) |
437 (let* ((temp (make-temp-file temporary-file-directory)) | 437 (let* ((temp (make-temp-file temporary-file-directory)) |
438 (cmd (concat (buffer-substring (1+ (point)) end) | 438 (cmd (concat (buffer-substring (1+ (point)) end) |