cut-and-paste german quotes

[Karl Eichwalder]

German quotes are looking this way: „[...]“ (as XML entities:
„[...]“ = low 99 ... upper 66).

I can paste them from Emacs into an xterm, but back from the xterm and
pasted into Emacs the closing "upper 66" is broken.
It has double width:

Char:  (0150310, 53448, 0xd0c8, file ...) point=533 of 746 (71%) column 6 

initially it was:

Char: “ (01234574, 342396, 0x5397c, file ...) point=337 of 851 (39%) column 42 

And then, Gnus complains (thus I'll remove the offening character for
posting):

Debugger entered--Lisp error: (error "Non-character input-event")
  read-char()
  byte-code("Š„ÐÆÇ    ÈÉ\nÊ#ËP#ˆÌ ‰\nž„
ÍÎÏ!Ð!ˆÑ ˆÒ ˆÓ ˆ 
Ô±ˆÕ\n‰\f†:Ö×͉‰‰ 
!\"#$%&address@hidden"&\"V„h\"&%A‰%„T&Ø\\&Ù S&¥\"Ù 
S\"¥!$ƒË#\"W„ž×#ÚÕ!ˆÛcˆ!ÜZ ÝÞ !ßQÅ
$‰'@@)address@hidden  ‚
)͇" [tchar prompt choice buf idx format message "%s 
(%s): " mapconcat #[(s) "address@hidden" [s char-to-string] 2] ", " ", ?" 
read-char nil get-buffer-create "*Gnus Help*" pop-to-buffer fundamental-mode 
buffer-disable-undo erase-buffer ":\n\n" -1 1 0 4 window-width delete-char "\n" 
3 "%c: %-" int-to-string "s" pad width n i alist list max x] 10)
  gnus-multiple-choice("Non-printable characters found.  Continue sending?" 
((100 "Remove non-printable characters and send") (114 "Replace non-printable 
characters with dots and send") (105 "Ignore non-printable characters and 
send") (101 "Continue editing")))
  message-fix-before-sending()
  message-send(nil)
  message-send-and-exit(nil)
  call-interactively(message-send-and-exit)

-- 
                                                         |      ,__o
                                                         |    _-\_<,
http://www.gnu.franken.de/ke/                            |   (*)/'(*)