X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=emu.el;h=038b7fbce1d58aab6418a8aec6dfc8dd2ffe870b;hb=b11f0ddd4198144b60ca815cbc19aa24b74f4da4;hp=030900cefa9781cf8f4f8bb00f2dcd6858f0e209;hpb=a86a169f6f8595b13d023ac870981e4503642855;p=elisp%2Fapel.git diff --git a/emu.el b/emu.el index 030900c..038b7fb 100644 --- a/emu.el +++ b/emu.el @@ -81,6 +81,7 @@ (require 'poem) (require 'mcharset) +(require 'invisible) (defsubst char-list-to-string (char-list) "Convert list of character CHAR-LIST to string." @@ -130,7 +131,7 @@ TABLE defaults to the current buffer's category table." (defun code-convert-string (str ic oc) "Convert code in STRING from SOURCE code to TARGET code, On successful converion, returns the result string, -else returns nil. [emu-nemacs.el; Mule emulating function]" +else returns nil." (if (not (eq ic oc)) (convert-string-kanji-code str ic oc) str)) @@ -138,7 +139,7 @@ else returns nil. [emu-nemacs.el; Mule emulating function]" (defun code-convert-region (beg end ic oc) "Convert code of the text between BEGIN and END from SOURCE to TARGET. On successful conversion returns t, -else returns nil. [emu-nemacs.el; Mule emulating function]" +else returns nil." (if (/= ic oc) (save-excursion (save-restriction @@ -192,8 +193,7 @@ It is obsolete, so don't use it.")) A buffer may be modified in several ways after reading into the buffer due to advanced Emacs features, such as file-name-handlers, format decoding, find-file-hooks, etc. - This function ensures that none of these modifications will take place. -\[emu-nemacs.el]" + This function ensures that none of these modifications will take place." (as-binary-input-file ;; Returns list absolute file name and length of data inserted. (insert-file-contents-literally filename visit beg end replace)))