yatex
diff yatexsec.el @ 526:8eb15c0f9627
Preview image generation modified
author | HIROSE Yuuji <yuuji@gentei.org> |
---|---|
date | Sat, 24 Feb 2018 16:44:25 +0900 |
parents | 77a2fd4fd634 |
children | 5eb2b1d824f3 |
line diff
1.1 --- a/yatexsec.el Fri Dec 26 01:06:32 2014 +0900 1.2 +++ b/yatexsec.el Sat Feb 24 16:44:25 2018 +0900 1.3 @@ -1,6 +1,6 @@ 1.4 ;;; yatexsec.el --- YaTeX sectioning browser 1.5 ;;; 1.6 -;;; (c) 1994-2013 by HIROSE Yuuji [yuuji@yatex.org] 1.7 +;;; (c) 1994-2017 by HIROSE Yuuji [yuuji@yatex.org] 1.8 ;;; Last modified Sun Dec 21 14:16:35 2014 on firestorm 1.9 ;;; $Id$ 1.10 1.11 @@ -134,7 +134,7 @@ 1.12 (and ln (string< "" ln) 1.13 (progn 1.14 (goto-char (point-min)) 1.15 - (forward-line (max 0 (- (string-to-int ln) 2))) 1.16 + (forward-line (max 0 (- (YaTeX-str2int ln) 2))) 1.17 (and 1.18 (search-forward ptn nil t) 1.19 (goto-char (match-beginning 0))))) 1.20 @@ -345,7 +345,7 @@ 1.21 (set-buffer secbuf) 1.22 (goto-char (point-max)) 1.23 (while (re-search-backward pattern nil t) 1.24 - (if (< ln (string-to-int (YaTeX-match-string 1))) nil 1.25 + (if (< ln (YaTeX-str2int (YaTeX-match-string 1))) nil 1.26 (beginning-of-line) 1.27 (search-forward YaTeX-ec) 1.28 (looking-at YaTeX-TeX-token-regexp)