(eshell-parse-argument-hook): Put `number' property on entire argument

since this is what eshell-lisp-command expects.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 0f05c2e..2f741cf 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,9 @@
+2009-07-04  Johan Bockgård  <bojohan@gnu.org>
+
+       * eshell/esh-arg.el (eshell-parse-argument-hook): Put `number'
+       property on entire argument since this is what eshell-lisp-command
+       expects.
+
 2009-07-03  Michael Albinus  <michael.albinus@gmx.de>
 
        * net/tramp-gvfs.el (tramp-gvfs-methods)

diff --git a/lisp/eshell/esh-arg.el b/lisp/eshell/esh-arg.el
index 590c22f..e229279 100644 (file)
--- a/lisp/eshell/esh-arg.el
+++ b/lisp/eshell/esh-arg.el
@@ -53,7 +53,7 @@ yield the values intended."
        (goto-char (match-end 0))
        (let ((str (match-string 0)))
          (if (> (length str) 0)
-             (add-text-properties 0 1 '(number t) str))
+             (add-text-properties 0 (length str) '(number t) str))
          str))))
 
    ;; parse any non-special characters, based on the current context