# HG changeset patch
# User HIROSE Yuuji <yuuji@gentei.org>
# Date 1471075166 -32399
# Node ID 2521a95043af5548f728beed659b149874428d88
# Parent  1b9beabd3fd140a748575791ea94b5a9a782cd2f
yahtml:label fixed

diff -r 1b9beabd3fd1 -r 2521a95043af yahtml.el
--- 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>"