Mercurial > emacs
diff lisp/textmodes/reftex-parse.el @ 62402:a7e02ef1e3d6
Replace `string-to-int' by `string-to-number'.
| author | Juanma Barranquero <lekktu@gmail.com> |
|---|---|
| date | Mon, 16 May 2005 11:33:47 +0000 |
| parents | 58a53f588384 |
| children | 35f6599373fc |
line wrap: on
line diff
--- a/lisp/textmodes/reftex-parse.el Mon May 16 10:07:59 2005 +0000 +++ b/lisp/textmodes/reftex-parse.el Mon May 16 11:33:47 2005 +0000 @@ -999,7 +999,7 @@ (if (string-match "\\`[A-Z]\\'" number-string) (aset reftex-section-numbers i (- (string-to-char number-string) ?A -1)) - (aset reftex-section-numbers i (string-to-int number-string))) + (aset reftex-section-numbers i (string-to-number number-string))) (pop numbers)) (decf i))) (put 'reftex-section-numbers 'appendix appendix)) @@ -1045,7 +1045,7 @@ (setq string (concat (char-to-string - (1- (+ ?A (string-to-int (match-string 0 string))))) + (1- (+ ?A (string-to-number (match-string 0 string))))) (substring string (match-end 0)))))) (if star (concat (make-string (1- (length string)) ?\ ) "*")
