1.1 --- a/yahtml.el	Thu May 01 13:38:27 2003 +0000
     1.2 +++ b/yahtml.el	Thu Dec 25 04:10:32 2003 +0000
     1.3 @@ -1,6 +1,6 @@
     1.4  ;;; -*- Emacs-Lisp -*-
     1.5 -;;; (c ) 1994-2002 by HIROSE Yuuji [yuuji@yatex.org]
     1.6 -;;; Last modified Thu Nov 21 17:55:40 2002 on firestorm
     1.7 +;;; (c) 1994-2003 by HIROSE Yuuji [yuuji@yatex.org]
     1.8 +;;; Last modified Mon Nov 17 18:28:50 2003 on firestorm
     1.9  ;;; $Id$
    1.10  
    1.11  (defconst yahtml-revision-number "1.70"
    1.12 @@ -202,9 +202,7 @@
    1.13  (defvar yahtml-environment-indent 1
    1.14    "*Indentation depth of HTML's listing environment")
    1.15  
    1.16 -(defvar YaTeX-japan (or (boundp 'NEMACS) (boundp 'MULE) YaTeX-emacs-20)
    1.17 -  "Whether yatex mode is running on Japanese environment or not.")
    1.18 -
    1.19 +;; YaTeX-japan is defined in yatexlib.el
    1.20  (defvar yahtml-lint-program (if YaTeX-japan "jweblint" "weblint")
    1.21    "*Program name to lint HTML file")
    1.22  (defvar yahtml-hate-too-deep-indentation nil
    1.23 @@ -345,6 +343,9 @@
    1.24        (yahtml-define-begend-key "ba" "a" map)
    1.25        (yahtml-define-begend-key "bf" "form" map)
    1.26        (yahtml-define-begend-key "bs" "select" map)
    1.27 +      (yahtml-define-begend-key "bv" "div" map)
    1.28 +      (yahtml-define-begend-key "bS" "div" map)
    1.29 +      (yahtml-define-begend-key "bp" "pre" map)
    1.30        (YaTeX-define-key "b " 'yahtml-insert-begend map)
    1.31        (YaTeX-define-key "B " 'yahtml-insert-begend-region map)
    1.32        )
    1.33 @@ -571,6 +572,7 @@
    1.34  	(set (make-local-variable 'yahtml-mode-old-mode) old-mm)))
    1.35    (let ((coding (or (yahtml-dir-default-charset) yahtml-kanji-code)))
    1.36      (cond
    1.37 +     ((null coding) nil)
    1.38       ((and YaTeX-emacs-20 (boundp 'buffer-file-coding-system))
    1.39        (setq buffer-file-coding-system
    1.40  	    (or (and (fboundp 'set-auto-coding) buffer-file-name