changeset 439:2521a95043af dev

yahtml:label fixed
author HIROSE Yuuji <yuuji@gentei.org>
date Sat, 13 Aug 2016 16:59:25 +0859
parents 1b9beabd3fd1
children 0c098405a3c9
files yahtml.el
diffstat 1 files changed, 4 insertions(+), 3 deletions(-) [+]
line wrap: on
line diff
--- a/yahtml.el	Sat Aug 13 16:53:59 2016 +0900
+++ b/yahtml.el	Sat Aug 13 16:59:25 2016 +0859
@@ -1,6 +1,6 @@
 ;;; yahtml.el --- Yet Another HTML mode -*- coding: sjis -*-
 ;;; (c) 1994-2015 by HIROSE Yuuji [yuuji(@)yatex.org]
-;;; Last modified Sat Aug 13 16:52:40 2016 on mt09
+;;; Last modified Sat Aug 13 16:56:50 2016 on firestorm
 ;;; $Id$
 
 (defconst yahtml-revision-number "1.78.1"
@@ -1441,8 +1441,9 @@
 	  (read-string-with-history "name: ") "\""))
 (defun yahtml:label ()
   "Add-in function for `<label>'"
-  (concat " " (if yahtml-prefer-upcase-attributes "FOR" "for") "=\""
-	  (read-string-with-history "for: ") "\""))
+  (yahtml-make-optional-argument
+   "for"
+   (YaTeX-completing-read-or-skip "for=" (yahtml-collect-ids) nil t)))
 
 (defun yahtml:ol ()
   "Add-in function for <ol>"

yatex.org