diff options
| author | Juanma Barranquero <lekktu@gmail.com> | 2005-05-09 08:45:47 +0000 |
|---|---|---|
| committer | Juanma Barranquero <lekktu@gmail.com> | 2005-05-09 08:45:47 +0000 |
| commit | 084ea2c3ee70f5403da0d0bbdda8b9a123c65636 (patch) | |
| tree | a5cb3be22855dc640e73f9e1b566d35d362c1132 /lisp/obsolete | |
| parent | 2b8f53dea47097bbdc16fc636d415f979beffca6 (diff) | |
| download | emacs-084ea2c3ee70f5403da0d0bbdda8b9a123c65636.tar.gz | |
(hilit-add-pattern): Replace `string-to-int' by `string-to-number'.
Diffstat (limited to 'lisp/obsolete')
| -rw-r--r-- | lisp/obsolete/hilit19.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/obsolete/hilit19.el b/lisp/obsolete/hilit19.el index a5fd33adcaa..8c5b64ed5ad 100644 --- a/lisp/obsolete/hilit19.el +++ b/lisp/obsolete/hilit19.el @@ -1050,7 +1050,7 @@ Optionally, place the new pattern first in the pattern list" (and (equal pstart "") (error "Must specify starting regex")) (cond ((equal pend "") (setq pend 0)) - ((string-match "^[0-9]+$" pend) (setq pend (string-to-int pend)))) + ((string-match "^[0-9]+$" pend) (setq pend (string-to-number pend)))) (or mode (setq mode major-mode)) (let ((old-patterns (cdr (assq mode hilit-patterns-alist))) (new-pat (list pstart pend face))) |