# HG changeset patch # User HIROSE Yuuji # Date 1500862141 -32373 # Node ID 4f8551386af22afff2399d7c99a589dfc0740c4a # Parent c7b93cfceb1b6fcb66d675347f6e4cccf4a29949 Do not ask `align' when html4-strict mode diff -r c7b93cfceb1b -r 4f8551386af2 yahtml.el --- a/yahtml.el Wed Jul 19 13:17:23 2017 +0859 +++ b/yahtml.el Mon Jul 24 11:08:34 2017 +0859 @@ -1,6 +1,6 @@ ;;; yahtml.el --- Yet Another HTML mode -*- coding: sjis -*- ;;; (c) 1994-2017 by HIROSE Yuuji [yuuji(@)yatex.org] -;;; Last modified Wed Jul 19 13:10:28 2017 on firestorm +;;; Last modified Mon Jul 24 11:03:07 2017 on firestorm ;;; $Id$ (defconst yahtml-revision-number "1.79.3" @@ -1270,7 +1270,7 @@ (defun yahtml:img () "Add-in function for " (let ((src (yahtml-read-parameter "src")) - (alg (yahtml-read-parameter "align")) + (alg (if yahtml-html4-strict nil (yahtml-read-parameter "align"))) alt (brd (read-string-with-history "border=")) (l yahtml-prefer-upcase-attributes) @@ -1678,9 +1678,7 @@ (yahtml-make-optional-argument "width" (yahtml-read-parameter "width")) (yahtml-make-optional-argument - "height" (yahtml-read-parameter "height")) - (yahtml-make-optional-argument - "align" (yahtml-read-parameter "align")))) + "height" (yahtml-read-parameter "height")))) (t ""))))