Can't save in iso-8859-13

[Peter Dyballa]

Hello!

A test file, starting with that header:

        ;;; -*- mode: Text; coding: iso-8859-13; -*-

and consisting of lines like these:

        ;   oct   dec   hex
        ;==========================
          = 240 = 160 = A0 = U+00A0 : NO-BREAK SPACE
        ¡ = 241 = 161 = A1 = U+201D : RIGHT DOUBLE QUOTATION MARK
        ¢ = 242 = 162 = A2 = U+00A2 : CENT SIGN

seemed to have some mistakes. A Mac OS X application (Smultron) capable 
of loading a file in one of some dozen encodings showed that too. So I 
went to correct my mistakes. I tried to remove the first column with 
kill-rectangle and wanted to insert another rectangle that a Perl 
script produces:

while ( $Index < 256 ) {
        printf("%c = %3o = %3d = %2X = \n", $Index, $Index, $Index, $Index);
        $Index++;
}

The shell buffer was in UTF-8 mode. Copying that rectangle into a 
register and yank that register into the file lead to a situation where 
I was not allowed to save the file in ISO Latin-7/ISO 8859-13 encoding. 
GNU Emacs only allowed mule-utf8, no matter which C-x RET way I tried 
to set the correct encoding and ask GNU Emacs to shit on all mule-utf8. 
It behaved like an MS app.

In shell I only saw octal representation. The same was true in 
*scratch* when inserted and in the ISO Latin-7/ISO 8859-13 file buffer 
too.

With GNU Emacs 21.3.50 it works fine ... well, seeing probably an ISO 
Latin-1 display after insertion into the buffer.


In GNU Emacs 22.0.50.1 (powerpc-apple-darwin7.8.0, X toolkit, Xaw3d 
scroll bars)
 of 2005-03-31 on Latsche.local
Distributor `The XFree86 Project, Inc', version 11.0.40300000
configured using `configure '--without-carbon' '--with-x' 
'--without-pop' '--with-xpm' '--with-jpeg' '--with-tiff' '--with-png' 
'--with-gif' '--with-x-toolkit=lucid' 'CFLAGS=-I/sw/include' 
'CPPFLAGS=-I/sw/include' 'LDFLAGS=-L/sw/lib''

Important settings:
  value of $LC_ALL: de_DE.UTF-8
  value of $LC_COLLATE: nil
  value of $LC_CTYPE: de_DE.UTF-8
  value of $LC_MESSAGES: nil
  value of $LC_MONETARY: nil
  value of $LC_NUMERIC: nil
  value of $LC_TIME: nil
  value of $LANG: de_DE.UTF-8
  locale-coding-system: utf-8
  default-enable-multibyte-characters: t

Major mode: Fundamental

Minor modes in effect:
  auto-compression-mode: t
  display-time-mode: t
  mouse-sel-mode: t
  show-paren-mode: t
  desktop-save-mode: t
  tooltip-mode: t
  tool-bar-mode: t
  mouse-wheel-mode: t
  menu-bar-mode: t
  global-font-lock-mode: t
  blink-cursor-mode: t
  unify-8859-on-encoding-mode: t
  utf-translate-cjk-mode: t
  column-number-mode: t
  line-number-mode: t
  transient-mark-mode: t



--
Greetings

  Pete