# HG changeset patch
# User Juanma Barranquero <lekktu@gmail.com>
# Date 1115628347 0
# Node ID db28615c678ad1fa90bf7ed4e9f8f056ac043603
# Parent  dda44460de333baaf5f0c43a869f3e6f5f19176f
(hilit-add-pattern): Replace `string-to-int' by `string-to-number'.

diff -r dda44460de33 -r db28615c678a lisp/obsolete/hilit19.el
--- a/lisp/obsolete/hilit19.el	Mon May 09 08:44:58 2005 +0000
+++ b/lisp/obsolete/hilit19.el	Mon May 09 08:45:47 2005 +0000
@@ -1050,7 +1050,7 @@
 
   (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)))