yatex
changeset 465:e9299b77df1f dev
Argument error fixed
author | HIROSE Yuuji <yuuji@gentei.org> |
---|---|
date | Mon, 12 Jun 2017 08:41:27 +0859 |
parents | c996fbcc2e79 |
children | c7b93cfceb1b |
files | yahtml.el |
diffstat | 1 files changed, 5 insertions(+), 4 deletions(-) [+] |
line diff
1.1 --- a/yahtml.el Sat Jun 03 23:24:44 2017 +0859 1.2 +++ b/yahtml.el Mon Jun 12 08:41:27 2017 +0859 1.3 @@ -1,6 +1,6 @@ 1.4 ;;; yahtml.el --- Yet Another HTML mode -*- coding: sjis -*- 1.5 ;;; (c) 1994-2017 by HIROSE Yuuji [yuuji(@)yatex.org] 1.6 -;;; Last modified Mon May 29 09:10:43 2017 on firestorm 1.7 +;;; Last modified Mon Jun 12 08:40:51 2017 on firestorm 1.8 ;;; $Id$ 1.9 1.10 (defconst yahtml-revision-number "1.79.3" 1.11 @@ -1480,9 +1480,10 @@ 1.12 (setq name (read-string-with-history "name: ") 1.13 type (YaTeX-completing-read-or-skip "type (default=text): " 1.14 yahtml-input-types nil t) 1.15 - value (YaTeX-read-string-or-skip "value: ") 1.16 - id (YaTeX-read-string-or-skip "id: ")) 1.17 - (if (string-match "text\\|password\\|^$" typxe) 1.18 + value (YaTeX-read-string-or-skip "value: ")) 1.19 + (or (string-match "submit\\|reset" type) 1.20 + (setq id (YaTeX-read-string-or-skip "id: "))) 1.21 + (if (string-match "text\\|password\\|^$" type) 1.22 (setq size (YaTeX-read-string-or-skip "size: ") 1.23 maxlength (YaTeX-read-string-or-skip "maxlength: "))) 1.24 (concat