yatex
changeset 447:9a91ec831762 dev
Fix infinite loop in subequations-env completion.
author | HIROSE Yuuji <yuuji@gentei.org> |
---|---|
date | Thu, 05 Jan 2017 23:15:34 +0900 |
parents | a3ba09c1e8e9 |
children | 59459111e042 c2c547e147c7 |
files | yatex.el yatexadd.el |
diffstat | 2 files changed, 6 insertions(+), 4 deletions(-) [+] |
line diff
1.1 --- a/yatex.el Thu Jan 05 20:44:41 2017 +0900 1.2 +++ b/yatex.el Thu Jan 05 23:15:34 2017 +0900 1.3 @@ -1,6 +1,6 @@ 1.4 ;;; yatex.el --- Yet Another tex-mode for emacs //野鳥// -*- coding: sjis -*- 1.5 ;;; (c)1991-2017 by HIROSE Yuuji.[yuuji@yatex.org] 1.6 -;;; Last modified Thu Jan 5 17:45:40 2017 on firestorm 1.7 +;;; Last modified Thu Jan 5 23:13:56 2017 on firestorm 1.8 ;;; $Id$ 1.9 ;;; The latest version of this software is always available at; 1.10 ;;; http://www.yatex.org/ 1.11 @@ -8,7 +8,7 @@ 1.12 ;;; Code: 1.13 (require 'comment) 1.14 (require 'yatexlib) 1.15 -(defconst YaTeX-revision-number "1.79" 1.16 +(defconst YaTeX-revision-number "1.79.1" 1.17 "Revision number of running yatex.el") 1.18 1.19 ;---------- Local variables ----------
2.1 --- a/yatexadd.el Thu Jan 05 20:44:41 2017 +0900 2.2 +++ b/yatexadd.el Thu Jan 05 23:15:34 2017 +0900 2.3 @@ -1,6 +1,6 @@ 2.4 ;;; yatexadd.el --- YaTeX add-in functions -*- coding: sjis -*- 2.5 ;;; (c)1991-2017 by HIROSE Yuuji.[yuuji@yatex.org] 2.6 -;;; Last modified Thu Jan 5 17:45:50 2017 on firestorm 2.7 +;;; Last modified Thu Jan 5 23:13:23 2017 on firestorm 2.8 ;;; $Id$ 2.9 2.10 ;;; Code: 2.11 @@ -66,7 +66,7 @@ 2.12 (message (if YaTeX-japan "分かりやすいコメントに変えるとref補完が楽よ" 2.13 "Changing comment string reduces effort at `ref' completion")) 2.14 (concat " " YaTeX-comment-prefix 2.15 - (YaTeX::ref-default-label "%H:%M") 2.16 + (YaTeX::ref-default-label " %Y-%m-%d %H:%M") 2.17 (if YaTeX-japan "の式群" "equations"))) 2.18 2.19 (defun YaTeX:read-oneof (oneof &optional quick allow-dup) 2.20 @@ -568,6 +568,7 @@ 2.21 "Default auto-genarated label string." 2.22 ;; We do not use (format-time-string) for emacs-19 2.23 (let*((ts (substring (current-time-string) 4)) 2.24 + (Y (substring ts -4)) 2.25 (y (substring ts -2)) 2.26 (b (substring ts 0 3)) 2.27 (d (format "%d" (string-to-int (substring ts 4 6)))) 2.28 @@ -587,6 +588,7 @@ 2.29 (YaTeX-replace-formats 2.30 (or format YaTeX-ref-default-label-string) 2.31 (list (cons "y" y) 2.32 + (cons "Y" Y) 2.33 (cons "b" b) 2.34 (cons "m" m) 2.35 (cons "d" d)