Index: emacs/lisp/shell.el
diff -c emacs/lisp/shell.el:1.126 emacs/lisp/shell.el:1.127
*** emacs/lisp/shell.el:1.126 Tue Apr 26 23:16:20 2005
--- emacs/lisp/shell.el Mon May 16 11:33:47 2005
***************
*** 759,765 ****
;; If STR is of the form +n, for n>0, return n. Otherwise, nil.
(defun shell-extract-num (str)
(and (string-match "^\\+[1-9][0-9]*$" str)
! (string-to-int str)))
(defun shell-dirtrack-mode ()
--- 759,765 ----
;; If STR is of the form +n, for n>0, return n. Otherwise, nil.
(defun shell-extract-num (str)
(and (string-match "^\\+[1-9][0-9]*$" str)
! (string-to-number str)))
(defun shell-dirtrack-mode ()
_______________________________________________
Emacs-diffs mailing list
[email protected]
http://lists.gnu.org/mailman/listinfo/emacs-diffs
