Lines Matching +defs:for +defs:html
1 ;;; mule.el --- basic commands for mulitilingual environment
22 ;; GNU General Public License for more details.
73 (set-auto-coding-for-load t)
110 ;; API (Application Program Interface) for charsets.
144 LEADING-CODE-BASE (integer) is the base leading-code for the
146 LEADING-CODE-EXT (integer) is the extended leading-code for the
178 See the function `charset-info' for more detail."
185 See the function `charset-info' for more detail."
192 See the function `charset-info' for more detail."
199 See the function `charset-info' for more detail."
206 See the function `charset-info' for more detail."
213 See the function `charset-info' for more detail."
220 See the function `charset-info' for more detail."
227 See the function `charset-info' for more detail."
234 See the function `charset-info' for more detail."
241 See the function `charset-info' for more detail."
248 See the function `charset-info' for more detail."
255 See the function `charset-info' for more detail."
269 sufficient position codes, return a generic character which stands for
298 This function is provided for backward compatibility.
316 `utf-translation-table-for-decode', or through the
317 translation-hash-table named `utf-subst-table-for-decode'
325 (utf-lookup-subst-table-for-decode code-point))
345 (or (aref (get 'utf-translation-table-for-decode
355 `utf-translation-table-for-encode', or through the
356 translation-hash-table named `utf-subst-table-for-encode' \(if
371 (utf-lookup-subst-table-for-encode char))
372 (let ((table (get 'utf-translation-table-for-encode
408 "Case table for the ASCII character set.")
419 ;; for more detail.
445 ;; See the documentation of make-coding-system for the meanings of the
450 ;; o translation-table-for-decode
451 ;; o translation-table-for-encode
455 ;; o valid-codes (meaningful only for a coding system based on CCL)
465 of CODING-SYSTEM. See the function `make-coding-system' for more detail."
476 "Return the documentation string for CODING-SYSTEM."
487 for more detail."
491 "Extract a value from CODING-SYSTEM's property list for property PROP."
590 made from bases and aliases automatically for various end-of-line
609 "Use FUNC to map over all characters in CHARSET for side effects.
628 "it exists just for backward compatibility, and does nothing."
633 It exists just for backward compatibility, and the value is always nil.")
655 Transform XEmacs style args for `make-coding-system' to Emacs style.
753 MNEMONIC is a character to be displayed on mode line for the coding system.
755 DOC-STRING is a documentation string for the coding system.
791 If TYPE is 4 (private), FLAGS should be a cons of CCL programs, for
803 function is the same as for a function in
816 o translation-table-for-decode
819 the function `make-translation-table' for the format of translation
822 o translation-table-for-encode
850 which is unsuitable for the top-level media type \"text\".
852 o valid-codes (meaningful only for a coding system based on CCL)
889 The EOL type is detected automatically for the coding system.
895 Kludgy features for backward compatibility:
997 (error "Invalid FLAGS argument for TYPE 4 (CCL)")
1006 (error "Invalid FLAGS argument for TYPE 4 (CCL)")))))
1078 ;; systems, each corresponds to a coding system for the detected
1132 "Define ALIAS as an alias for coding system CODING-SYSTEM."
1187 don't want to mark the buffer modified, specify t for NOMODIFY.
1190 (interactive "zCoding system for saving file (default nil): \nP")
1198 (if (fboundp 'ucs-set-table-for-input) ; don't lose when building
1199 (ucs-set-table-for-input))
1213 usual for visiting a file."
1214 (interactive "zCoding system for visited file (default nil): \nP")
1219 (let ((coding-system-for-read coding-system))
1223 "Set coding system for decoding and encoding file names to CODING-SYSTEM.
1226 (interactive "zCoding system for file names (default nil): ")
1234 "Default value for the terminal coding system.
1250 (format "Coding system for terminal display (default %s): "
1267 "Set coding system for keyboard input to CODING-SYSTEM.
1279 (format "Coding system for keyboard input (default %s): "
1295 "Specify coding system for keyboard input.
1317 "Set coding systems for the process associated with the current buffer.
1323 "zCoding-system for output from the process: \nzCoding-system for input to the process: ")
1335 "Make CODING-SYSTEM used for communicating with other X clients.
1338 (interactive "zCoding system for X selection: ")
1347 "Make CODING-SYSTEM used for the next communication with other X clients.
1348 This setting is effective for the next communication only."
1352 (format "Coding system for the next X selection (default %S): "
1354 "Coding system for the next X selection: ")
1412 listed for the current language environment under the key
1476 ;; Return a char table of extended segment usage for each character.
1507 If FROM is a string, or if the current buffer is not the one set up for us
1623 "Lookup `auto-coding-regexp-alist' for the contents of the current buffer.
1624 The value is a coding system is specified for the region FROM and TO,
1639 ;; See the bottom of this file for built-in auto coding functions.
1641 sgml-html-meta-auto-coding-function)
1660 (defvar set-auto-coding-for-load nil
1661 "Non-nil means look for `load-coding' property instead of `coding'.
1662 This is used for loading and byte-compiling Emacs Lisp files.")
1665 "Return the coding system specified by `auto-coding-alist' for FILENAME."
1679 "Find a coding system for a file FILENAME of which SIZE bytes follow point.
1686 `auto-coding-regexp-alist'. If no match is found, it checks for a
1715 ;; Try a short cut by searching for the string "coding:"
1716 ;; and for "unibyte:" at the head and tail of SIZE bytes.
1737 (when (and set-auto-coding-for-load
1791 (when (and set-auto-coding-for-load
1826 "Return coding system for a file FILENAME of which SIZE bytes follow point.
1827 See `find-auto-coding' for how the coding system is found.
1841 ;; coding-system-for-read.
1845 ;; This variable is used for decoding in revert-buffer.
1847 "The file coding system explicitly specified for the current buffer.
1860 coding-system-for-read
1861 (not (eq coding-system-for-read 'auto-save-coding)))
1862 (setq buffer-file-coding-system-explicit coding-system-for-read))
1886 ;; If we're doing this for find-file,
1902 "Return a coding system for a buffer when a file of CODING is inserted.
1959 "Modify one of look up tables for finding a coding system on I/O operation.
1975 for decoding and encoding respectively,
2020 (let ((coding coding-system-for-read)
2026 ;; Otherwise, if we can recognize the undo elt for the insertion,
2055 ;; If we decided to replace the undo entry for the insertion,
2082 A translation table is a char table intended for character
2149 characters. Elements may be nil for undefined code points.
2165 This sets up information so that the table can be used for
2206 for the character with code N.
2207 If TABLE is a char-table, the element for character N is the mapping
2208 for the character with code N.
2249 "Define SYMBOL as the name of the hash translation TABLE for use in CCL.
2252 `translation-hash-table-vector' and the table is for use in the CCL
2304 (defun sgml-html-meta-auto-coding-function (size)
2316 ;; (allowing for whitespace at bob). Note: 'DOCTYPE NETSCAPE' is
2317 ;; useful for Mozilla bookmark files.
2318 (when (and (re-search-forward "\\`[[:space:]\n]*\\(<!doctype[[:space:]\n]+\\(html\\|netscape\\)\\|<html\\)" size t)