Lines Matching +defs:file +defs:type
11 ;; This file is part of GNU Emacs.
24 ;; along with GNU Emacs; see the file COPYING. If not, write to the
31 ;; according to the Charset= header in the PO file. For more support
36 (defconst po-content-type-charset-alist
46 the PO file (but not yet decoded)."
55 ;; within the first 4096 bytes (the PO file might start with a long
61 (let ((pair (insert-file-contents-literally filename nil
72 (insert-file-contents-literally filename nil
78 (defun po-find-file-coding-system-guts (operation filename)
79 "Return a (DECODING . ENCODING) pair for OPERATION on PO file FILENAME.
84 (eq operation 'insert-file-contents)
86 (file-exists-p filename))
94 po-content-type-charset-alist
123 (defun po-find-file-coding-system (arg-list)
124 "Return a (DECODING . ENCODING) pair, according to PO file's charset.
125 Called through `file-coding-system-alist', before the file is visited for real."
126 (po-find-file-coding-system-guts (car arg-list) (car (cdr arg-list))))
128 ;(defun po-find-file-coding-system (operation filename)
130 ;Return a Mule (DECODING . ENCODING) pair, according to PO file charset.
131 ;Called through file-coding-system-alist, before the file is visited for real."
132 ; (po-find-file-coding-system-guts operation filename))