;ELC ;;; Compiled ;;; in Emacs version 26.3 ;;; with all optimizations. ;;; This file uses dynamic docstrings, first added in Emacs 19.29. ;;; This file does not contain utf-8 non-ASCII characters, ;;; and so can be loaded in Emacs versions earlier than 23. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; (require 'psgml-parse) (defalias 'psgml-parse-jps-tag #[0 "g\304=\205(`Tf\305=\205(\306u\210\307\310\311\312#\210\313\203& \204&\314\n`#\210\315\207" [sgml-set-face sgml-current-eref sgml-markup-start sgml-markup-type 60 37 2 search-forward "%>" nil noerror comment sgml-set-face-for t] 5]) (byte-code "\301\302\303\"\210\304\305\306#\207" [sgml-parser-syntax add-to-list sgml-parser-loop-hook psgml-parse-jps-tag modify-syntax-entry 58 "_"] 4) (defalias 'sgml-eval-psgml-pi #[0 "\301\302 )\207" [sgml-psgml-pi-enable-outside-dtd t sgml-parse-to-here] 1 nil nil]) (define-key sgml-mode-map "" 'sgml-eval-psgml-pi) #@10 (fn S) (defalias 'sgml--empty-is-nil #[257 "\211\300\232?\205\211\207" [""] 3 (#$ . 1033)]) #@43 (fn BORDER TABLE-WIDTH FIRST-COL-WIDTH) (defalias 'sgml-dl-to-table #[771 "\300!\262\300!\262\300!\262\301`!\302!b\210\303 \304!b\210\305\306!\210\307\310\"\210\307\311\"\210\312\313\314#\205q\315\316!\203M\317u\210\320c\210\305\321!\210\307\311\"\210\202-\315\322!\203^\323 \210\307\311\"\210\202-\315\324!\203-\305\321!\210\325 \210\326c\210\202-\262\207" [sgml--empty-is-nil sgml-find-element-of sgml-element-etag-start point-marker sgml-element-start sgml-change-element-name "TABLE" sgml-insert-attribute "BORDER" "WIDTH" search-forward "<" t looking-at "dt" -1 "" "TD" "tr>\\s-*"] 9 (#$ . 1135) "sBoder: \nsTab Width: \nsFist Col Width: \n"]) (provide 'psgml-xpr)