* COMPILE (riece-icons): Re-order filenames.

[elisp/riece.git] / lisp / riece-coding.el

diff --git a/lisp/riece-coding.el b/lisp/riece-coding.el
index 3b5f934..c0d1ac6 100644 (file)
--- a/lisp/riece-coding.el
+++ b/lisp/riece-coding.el
@@ -19,8 +19,8 @@
 
 ;; You should have received a copy of the GNU General Public License
 ;; along with GNU Emacs; see the file COPYING.  If not, write to the
-;; Free Software Foundation, Inc., 59 Temple Place - Suite 330,
-;; Boston, MA 02111-1307, USA.
+;; Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
+;; Boston, MA 02110-1301, USA.
 
 ;;; Code:
 
@@ -47,9 +47,9 @@ specifying the coding systems for decoding and encoding respectively."
 (defun riece-encode-coding-string (string)
   (if (and (local-variable-p 'riece-coding-system (current-buffer))
           riece-coding-system)         ;should be nil on non-Mule environment
-      (if (consp riece-coding-system)
-         (encode-coding-string string (cdr riece-coding-system))
-       (encode-coding-string string riece-coding-system))
+      (encode-coding-string string (if (consp riece-coding-system)
+                                      (cdr riece-coding-system)
+                                    riece-coding-system))
     string))
 
 (defun riece-decode-coding-string (string)