From: ueno Date: Sun, 28 Aug 2005 09:24:59 +0000 (+0000) Subject: Fixed. X-Git-Tag: channel-coding-mergepoint~12 X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=e01e95053d94ae5ef0d7bc7ae74db1f9aa1efe3a;p=elisp%2Friece.git Fixed. --- diff --git a/lisp/riece-coding.el b/lisp/riece-coding.el index 2cc5d4e..373028c 100644 --- a/lisp/riece-coding.el +++ b/lisp/riece-coding.el @@ -89,11 +89,10 @@ specifying the coding systems for decoding and encoding respectively." (throw 'found (cdr (car alist)))) (setq alist (cdr alist)))))) -;; The following functions are API used from handler functions. For -;; the meantime DECODED is actually a string (with some text -;; properties). In the future, however, the implementation _should_ -;; be changed so that decoding phase is delayed until the body of -;; handler functions. +;; The following functions are API used by handler functions. For the +;; meantime DECODED is actually a string (with some text properties). +;; In the future, however, the implementation _should_ be changed so +;; that decoding phase is delayed until the body of handler functions. (defun riece-decoded-coding-system (decoded) "Return the coding-system used for decoding DECODED." (get-text-property 0 'riece-coding-decoded-coding-system decoded))