[Bug: 21.5-b21] XEmacs mistakes Swiss German for Chinese

Dear Bug Team! I notice that XEmacs's built-in coding system deduction has a funny deficiency. It is able to deduce correctly that most of my Germn input files are coded in iso-latin-1, apparently by analysing the distribution of the German special characters äöüÄÖÜß. But for the following text it fails badly and assumes Chinese Big-5 encoding: Und die Männer erhoben sich von dort und blickten auf die Fläche von Sodom hinab; und Abraham ging mit ihnen, sie zu begleiten. Der HERR aber sprach bei sich: Sollte ich vor Abraham verbergen, was ich tun will? Abraham soll doch zu einer grossen und mächtigen Nation werden, und in ihm sollen gesegnet werden alle Nationen der Erde! Denn ich habe ihn erkannt, damit er seinen Söhnen und seinem Haus nach ihm befehle, dass sie den Weg des HERRN bewahren, Gerechtigkeit und Recht zu üben, damit der HERR auf Abraham kommen lasse, was er über ihn geredet hat. Und der HERR sprach: Das Klagegeschrei über Sodom und Gomorra, wahrlich, es ist gross, und ihre Sünde, wahrlich, sie ist sehr schwer. Ich will doch hinabgehen und sehen, ob sie ganz nach ihrem Geschrei, das vor mich gekommen ist, getan haben; und wenn nicht, so will ich es wissen. Und die Männer wandten sich von dort und gingen nach Sodom; Abraham aber blieb noch vor dem HERRN stehen. Und Abraham trat hinzu und sagte: Willst du wirklich den Gerechten mit dem Ungerechten wegraffen? Vielleicht gibt es fünfzig Gerechte innerhalb der Stadt. Willst du sie denn wegraffen und dem Ort nicht vergeben um der fünfzig Gerechten willen, die darin sind? Fern sei es von dir, so etwas zu tun, den Gerechten mit dem Ungerechten zu töten, so dass der Ungerechte wäre wie der Gerechte; fern sei es von dir! Sollte der Richter der ganzen Erde nicht Recht üben? Da sprach der HERR: Wenn ich in Sodom fünfzig Gerechte in der Stadt finde, so will ich um ihretwillen dem ganzen Ort vergeben. Und Abraham antwortete und sagte: Siehe doch, ich habe mich erdreistet, zu dem Herrn zu reden, obwohl ich Staub und Asche bin. Vielleicht fehlen an den fünfzig Gerechten nur fünf. Willst du wegen der fünf die ganze Stadt vernichten? Da sprach er: Ich will sie nicht vernichten, wenn ich dort 45 finde. Und er fuhr fort, weiter zu ihm zu reden, und sagte: Vielleicht werden dort vierzig gefunden. Und er sprach: Ich will es nicht tun um der Vierzig willen. Und er sagte: Der Herr möge doch nicht zürnen, dass ich noch einmal rede! Vielleicht werden dort dreissig gefunden. Und er sprach: Ich will es nicht tun, wenn ich dort dreissig finde. Da sagte er: Siehe doch, ich habe mich erdreistet, zu dem Herrn zu reden; vielleicht werden dort zwanzig gefunden. Und er sprach: Ich will nicht vernichten um der Zwanzig willen. Da sagte er: Der Herr möge doch nicht zürnen, ich will nur noch dieses Mal reden. Vielleicht werden dort zehn gefunden. Und er sprach: Ich will nicht vernichten um der Zehn willen. Und der HERR ging weg, als er mit Abraham ausgeredet hatte; und Abraham kehrte zurück an seinen Ort. Das Gericht über Sodom und Gomorra - Rettung Lots. Und die beiden Engel kamen am Abend nach Sodom, als Lot gerade im Tor von Sodom sass. Und als Lot sie sah, stand er auf, ging ihnen entgegen und verneigte sich mit dem Gesicht zur Erde; und er sprach: Ach siehe, meine Herren! Kehrt doch ein in das Haus eures Knechtes, und übernachtet, und wascht eure Füsse; morgen früh mögt ihr dann eures Weges ziehen! Aber sie sagten: Nein, sondern wir wollen auf dem Platz übernachten. Als er jedoch sehr in sie drang, kehrten sie bei ihm ein und kamen in sein Haus. Und er machte ihnen ein Mahl, backte ungesäürtes Brot, und sie assen. Noch hatten sie sich nicht niedergelegt, da umringten die Männer der Stadt, die Männer von Sodom, das Haus, vom Knaben bis zum Greis, das ganze Volk von allen Enden der Stadt. Und sie riefen nach Lot und sagten zu ihm: Wo sind die Männer, die diese Nacht zu dir gekommen sind? Führe sie zu uns heraus, dass wir sie erkennen! Da trat Lot zu ihnen hinaus an den Eingang und schloss die Tür hinter sich zu; und er sagte: Tut doch nichts Böses, meine Brüder! Seht doch, ich habe zwei Töchter, die keinen Mann erkannt haben; die will ich zu euch herausbringen. Tut ihnen, wie es gut ist in euren Augen! Nur diesen Männern tut nichts, da sie nun einmal unter den Schatten meines Daches gekommen sind! Aber sie sagten: Zurück da! Und sie sagten: Da ist einer allein gekommen, sich als Fremder hier aufzuhalten, und will sich schon als Richter aufspielen! Nun, wir wollen dir Schlimmeres antun als jenen. Und sie drangen hart ein auf den Mann, auf Lot, und machten sich daran, die Tür aufzubrechen. Da streckten die Männer ihre Hand aus und brachten Lot zu sich herein ins Haus; und die Tür verschlossen sie. Die Männer aber, die am Eingang des Hauses waren, schlugen sie mit Blindheit, vom kleinsten bis zum grössten, so dass sie sich vergeblich mühten, den Eingang zu finden. (Didn't succed in making the sample shorter, sorry.) I experimented and deduced that this is because the text is in Swiss German spelling, which is almost exactly the same as standard German, but crucially does not ever use ß, only äöüÄÖÜ; changing the ss in this text to ß makes XEmacs realize that it is indeed German. Apparently XEmacs assumes that it can't be German if there is no ß, so perphaps it's Chinese. I propose that whatever mechanism does this analysis (apparently in C somewhere?) should not be conditioned on ß at all, since it is not reliably present, and in fact after the latest spelling reform is much less common even in standard German. Keep up the good work! ================================================================ System Info to help track down your bug: --------------------------------------- uname -a: Linux macintyre 2.6.12 #1 SMP Wed Mar 23 21:52:37 UTC 2005 i686 athlon i386 GNU/Linux ./configure 'i386-suse-linux' '--with-gcc' '--with-dynamic' '--enable-debug=no' '--enable-error-checking=none' '--with-cflags=-O2 -march=i586 -mtune=i686 -fmessage-length=0 -Wall -D_FORTIFY_SOURCE=2 -g -Wall -Wno-switch -pipe -O2 -march=i586 -mtune=i686 -fmessage-length=0 -Wall -D_FORTIFY_SOURCE=2 -g -fno-strict-aliasing' '--with-ldflags=' '--prefix=/usr' '--exec-prefix=/usr' '--bindir=/usr/X11R6/bin' '--datadir=/usr/share' '--with-archlibdir=/usr/lib/xemacs/21.5.21.20050721/i386-suse-linux' '--with-docdir=/usr/lib/xemacs/21.5.21.20050721/i386-suse-linux' '--with-lispdir=/usr/share/xemacs/21.5.21.20050721/lisp' '--with-etcdir=/usr/share/xemacs/21.5.21.20050721/etc' '--with-statedir=/var/lib/xemacs' '--with-moduledir=/usr/lib/xemacs/21.5.21.20050721/i386-suse-linux/modules' '--infodir=/usr/share/xemacs/info' '--mandir=/usr/share/man/man1' '--enable-database=gdbm,berkdb' '--with-ncurses' '--with-tty=yes' '--with-site-lisp' '--disable-mc-alloc' '--disable-kkcc' '--enable-sound=! native' '--with-gpm' '--enable-pdump' '--disable-dump-in-exec' '--with-xpm' '--with-gif' '--with-tiff' '--with-jpeg' '--with-png' '--with-x' '--with-athena=3d' '--enable--menubars=lucid' '--enable-scrollbars=lucid' '--enable-dialogs=athena' '--enable-widgets=athena' '--x-includes=/usr/X11R6/include' '--x-libraries=/usr/X11R6/lib' '--enable-mule' '--with-xim=xlib' '--with-xfs' '--enable-clash-detection' '--with-ldap' '--with-pop' 'CFLAGS=-O2 -march=i586 -mtune=i686 -fmessage-length=0 -Wall -D_FORTIFY_SOURCE=2 -g -Wall -Wno-switch -pipe -O2 -march=i586 -mtune=i686 -fmessage-length=0 -Wall -D_FORTIFY_SOURCE=2 -g -fno-strict-aliasing' 'LDFLAGS=' 'build_alias=i386-suse-linux' 'host_alias=i386-suse-linux' 'target_alias=i386-suse-linux' XEmacs 21.5-b21 "corn" (+CVS-20050720) configured for `i386-suse-linux'. WARNING: -------------------------------------------------------------- WARNING: This was produced from a new autoconf-2.5 based configuration. WARNING: If this configuration seems buggy then copy etc/configure-2.13 WARNING: to configure and try again. Also please report the bug. WARNING: -------------------------------------------------------------- Compilation Environment and Installation Defaults: Source code location: /usr/src/packages/BUILD/xemacs-21.5.21.20050721 Installation prefix: /usr Operating system description file: `s/linux.h' Machine description file: `m/intel386.h' Compiler version: gcc (GCC) 4.0.2 20050901 (prerelease) (SUSE Linux) - GCC specs file: specs. - Compiler command: gcc -Wall -Wno-switch -Wundef -Wsign-compare -Wno-char-subscripts -Wpacked -Wunused-parameter -g -O2 -march=i586 -mtune=i686 -fmessage-length=0 -Wall -D_FORTIFY_SOURCE=2 -g -Wall -Wno-switch -pipe -O2 -march=i586 -mtune=i686 -fmessage-length=0 -Wall -D_FORTIFY_SOURCE=2 -g -fno-strict-aliasing libc version: 2.3.5 Relocating allocator for buffers: no GNU version of malloc: yes - Using Doug Lea's new malloc from the GNU C Library. Window System: Compiling in support for the X window system: - X Windows headers location: /usr/X11R6/include - X Windows libraries location: /usr/X11R6/lib - Handling WM_COMMAND properly. Compiling in support for the Athena widget set: - Athena headers location: X11/Xaw3d - Athena library to link: Xaw3d Using Lucid menubars. Using Lucid scrollbars. Using Athena dialog boxes. Using Athena native widgets. TTY: Compiling in support for ncurses. Compiling in support for GPM (General Purpose Mouse). Images: Compiling in support for GIF images (builtin). Compiling in support for XPM images. Compiling in support for PNG images. Compiling in support for JPEG images. Compiling in support for TIFF images. Compiling in support for X-Face message headers. Sound: Compiling in support for sound (native). Databases: Compiling in support for Berkeley database. Compiling in support for GNU DBM. Compiling in support for LDAP. Internationalization: Compiling in support for Mule (multi-lingual Emacs). Compiling in support for XIM (X11R5+ I18N input method). - Using raw Xlib to provide XIM support. - Using XFontSet to provide bilingual menubar. Compiling in support for Canna on Mule. Compiling in support for the WNN input method on Mule. Mail: Compiling in support for POP mail retrieval. Compiling in support for "file" mail spool file locking method. Other Features: Inhibiting IPv6 canonicalization at startup. Compiling in support for dynamic shared object modules. Using the new portable dumper. Load-Path Lisp Shadows: ---------------------- (/home/foth/.xemacs/align /usr/share/xemacs/xemacs-packages/lisp/edit-utils/align /usr/share/xemacs/mule-packages/lisp/mule-base/viet-util /usr/share/xemacs/21.5.21.20050721/lisp/mule/viet-util /usr/share/xemacs/mule-packages/lisp/mule-base/korea-util /usr/share/xemacs/21.5.21.20050721/lisp/mule/korea-util /usr/share/xemacs/mule-packages/lisp/mule-base/japan-util /usr/share/xemacs/21.5.21.20050721/lisp/mule/japan-util /usr/share/xemacs/mule-packages/lisp/mule-base/ethio-util /usr/share/xemacs/21.5.21.20050721/lisp/mule/ethio-util /usr/share/xemacs/mule-packages/lisp/mule-base/cyril-util /usr/share/xemacs/21.5.21.20050721/lisp/mule/cyril-util /usr/share/xemacs/mule-packages/lisp/mule-base/china-util /usr/share/xemacs/21.5.21.20050721/lisp/mule/china-util /usr/share/xemacs/mule-packages/lisp/mule-ucs/unicode /usr/share/xemacs/21.5.21.20050721/lisp/unicode /usr/share/xemacs/xemacs-packages/lisp/xemacs-base/regexp-opt /usr/share/xemacs/21.5.21.20050721/lisp/regexp-opt /usr/share/xemacs/site-packages/lisp/term/gnome /usr/share/xemacs/21.5.21.20050721/lisp/gnome /home/foth/.xemacs/etags /usr/share/xemacs/21.5.21.20050721/lisp/etags /usr/share/xemacs/xemacs-packages/lisp/xemacs-base/easy-mmode /usr/share/xemacs/21.5.21.20050721/lisp/easy-mmode /home/foth/.xemacs/custom /usr/share/xemacs/21.5.21.20050721/lisp/custom /usr/share/xemacs/xemacs-packages/lisp/build/build-report /usr/share/xemacs/21.5.21.20050721/lisp/build-report) Installed XEmacs Packages: ------------------------- Installed Modules: ----------------- Features: -------- (gnus-ems gnus-xmas wid-edit mail-extr message messagexmas mml mml-sec mml-smime smime dig mm-decode mm-bodies mm-encode mailcap lpr mail-parse rfc2045 rfc2231 rfc2047 qp ietf-drums mail-abbrevs nnheader nnheaderxm gnus-util netrc time-date parse-time mm-util mail-prsvr mail-utils mailheader canlock sha1 hex-util xemacsbug shadow sendmail rfc822 dabbrev view-less view hyper-apropos timer-funcs paren blink-paren hexl corpus-error image-mode man lilypond-mode compile calendar mouse-stress tv N3 selective-yank highlight-regexp xscheme scheme latex tex regexp-opt tex-site ediff-vers cdg etags thingatpt vm-autoload lazy-lock efs-dired dired-faces dired-xemacs dired iso-acc vc-hooks superbracket align advice advice-preload ctypes font-lock filladapt ffap tetris gamegrid backup-dir blink-cursor gnuserv completer time cus-face func-menu crypt crypt++ sh-script skeleton executable efs-x19.15 efs-fnh efs-ovwrt efs-cu efs-netrc efs-defun comint ring efs recent-files mwheel un-define latin-euro-input quail overlay latin-unity-tables latin-euro-standards latin-euro-latin10 latin-euro-latin9 latin-euro-latin7 latin-unity-vars latin-unity ispell latin-euro-latin8 x-compose zenirc-autoloads xwem-autoloads edmacro xslt-process-autoloads xslide-autoloads xlib-autoloads xetla-autoloads xemacs-devel-autoloads xemacs-base-autoloads x-symbol-autoloads w3-autoloads vm-autoloads viper-autoloads view-process-autoloads vhdl-autoloads vc-autoloads tramp-autoloads tpu-autoloads tm-autoloads time-autoloads textools-autoloads text-modes-autoloads texinfo-autoloads supercite-autoloads strokes-autoloads speedbar-autoloads slider-autoloads sieve-autoloads sh-script-autoloads sgml-autoloads semantic-autoloads scheme-autoloads ruby-modes-autoloads rmail-autoloads riece-autoloads reftex-autoloads re-builder-autoloads python-modes-autoloads psgml-autoloads ps-print-autoloads prog-modes-autoloads pgg-autoloads perl-modes-autoloads pcomplete-autoloads pcl-cvs-autoloads pc-autoloads os-utils-autoloads ocaml-autoloads net-utils-autoloads misc-games-autoloads mine-autoloads mh-e-autoloads mew-autoloads mailcrypt-autoloads mail-lib-autoloads liece-autoloads jde-autoloads ispell-autoloads ilisp-autoloads igrep-autoloads idlwave-autoloads ibuffer-autoloads hm--html-menus-autoloads haskell-mode-autoloads gnus-autoloads gnats-autoloads games-autoloads fsf-compat-autoloads fortran-modes-autoloads forms-autoloads footnote-autoloads eudc-autoloads eterm-autoloads ess-autoloads eshell-autoloads escreen-autoloads erc-autoloads emerge-autoloads eieio-autoloads efs-autoloads edt-autoloads edit-utils-autoloads ediff-autoloads ediff-hook edebug-autoloads ecrypto-autoloads ecb-autoloads docbookide-autoloads dired-autoloads dictionary-autoloads debug-autoloads cookie-autoloads clearcase-autoloads cc-mode-autoloads calendar-autoloads calc-autoloads c-support-autoloads build-autoloads bbdb-autoloads auctex-autoloads apel-autoloads ada-autoloads mule-ucs-autoloads mule-base-autoloads leim-autoloads latin-unity-autoloads egg-its-autoloads edict-autoloads modules-autoloads mule-autoloads auto-autoloads disp-table loadhist rsz-minibuf auto-show fontl-hooks canna-leim tibetan lao devanagari indian slovenian czech romanian ccl code-cmds gutter-items menubar-items x-menubar mode-motion mouse behavior itimer auto-save lisp-mode easymenu easy-mmode iso8859-1 page buff-menu lib-complete cus-file derived newcomment env text-props frame obsolete cus-start custom widget cl-extra cl cl-19 packages backquote CANNA wnn unicode lucid-scrollbars cut-buffer lucid-menubars athena-dialogs x c-balloon-help tty-frames tty toolbar native-sound scrollbar unix-processes multicast network-streams subprocesses modules menu-accelerator-support menubar berkeley-db dbm md5 xemacs xim mule gutter tiff png gif jpeg xface xpm xbm lisp-float-type file-coding linux dialog devices window-system base64) Recent keystrokes: ----------------- ) C-x C-e C-x C-e down f2 C-x C-f M-BS BS t m TAB B A TAB RET C-x k C-x C-f up RET C-h l q C-x k C-x C-f up RET C-x k C-x C-f up RET f7 ssharp RET s s RET ! f2 C-x k C-x C-f up RET M-: b i f f e r - f i Sh-TAB C-a right DEL u end Sh-TAB Sh-TAB c TAB M-Sh-BS c Sh-TAB Sh-TAB Sh-TAB RET C-x k C-a C-k up up end C-x C-e f2 M-x r e p o r TAB x e TAB RET Recent messages (most recent first): ----------------------------------- Fontifying *mail to XEmacs Beta*... done. Loading gnus-ems...done Fontifying *mail to XEmacs Beta*... Loading gnus-xmas...done Debug: error: (image-conversion-error (Opening pixmap file no such file or directory /usr/share/xemacs/xemacs-packages/etc/gnus/gnus-pointer.xpm)) Backtrace follows: # bind (inhibit-quit) # (unwind-protect ...) # (catch #<INTERNAL OBJECT (XEmacs bug?) (opaque, size=0) 0x40804ca8> ...) # (unwind-protect ...) add-spec-list-to-specifier(#<image-specifier global=<unspecified> fallback=((nil . [nothing])) 0x6836> ((global (nil . [xpm :file "/usr/share/xemacs/xemacs-packages/etc/gnus/gnus-pointer.xpm"]))) nil) # bind (is-valid nval how-to-add tag-set locale value specifier) set-specifier(#<image-specifier global=<unspecified> fallback=((nil . [nothing])) 0x6836> [xpm :file "/usr/share/xemacs/xemacs-packages/etc/gnus/gnus-pointer.xpm"] nil nil nil) # bind (how-to-add tag-set locale value property glyph) set-glyph-property(#<glyph (buffer) #<image-specifier global=<unspecified> fallback=((nil . [nothing])) 0x6836>0x6835> image [xpm :file "/usr/share/xemacs/xemacs-packages/etc/gnus/gnus-pointer.xpm"] nil nil nil) # bind (how-to-add tag-set locale spec glyph) set-glyph-image(#<glyph (buffer) #<image-specifier global=<unspecified> fallback=((nil . [nothing])) 0x6836>0x6835> [xpm :file "/usr/share/xemacs/xemacs-packages/etc/gnus/gnus-pointer.xpm"]) # bind (glyph type spec-list) make-glyph([xpm :file "/usr/share/xemacs/xemacs-packages/etc/gnus/gnus-pointer.xpm"]) # bind (file-xbm file-xpm) byte-code("..." [modeline-buffer-id-left-extent file-xbm file-xpm gnus-xmas-glyph-directory glyph current-load-list gnus-xmas-modeline-left-extent default-boundp set-default copy-extent gnus-xmas-modeline-right-extent gnus-xmas-modeline-glyph expand-file-name "gnus-pointer.xpm" "gnus-pointer.xbm" make-glyph featurep xpm apply vector :file xbm [string :data "Gnus:"] set-glyph-face modeline-buffer-id modeline-buffer-id-right-extent] 9) # (unwind-protect ...) # (unwind-protect ...) # (unwind-protect ...) # (unwind-protect ...) # (unwind-protect ...) # (unwind-protect ...) # (unwind-protect ...) # (unwind-protect ...) load-internal("gnus-xmas" nil nil nil binary) # bind (path handler filename nosuffix nomessage noerror file) efs-real-load("gnus-xmas" nil nil nil) # bind (parsed filename nosuffix nomessage noerror file) load("gnus-xmas" nil nil nil) # (unwind-protect ...) gnus-xmas-define() byte-code("..." [current-load-list defalias gnus-char-width fboundp char-width #<compiled-function (ch) "...(2)" [1] 1> featurep xemacs gnus-xmas-define gnus-mouse-face-prop put variable-documentation "Property used for highlighting mouse regions." default-boundp set-default mouse-face] 4) # (unwind-protect ...) # (unwind-protect ...) # (unwind-protect ...) # (unwind-protect ...) # (unwind-protect ...) # (unwind-protect ...) # (unwind-protect ...) # (unwind-protect ...) load-internal("gnus-ems" nil nil nil binary) # bind (path handler filename nosuffix nomessage noerror file) efs-real-load("gnus-ems" nil nil nil) # bind (parsed filename nosuffix nomessage noerror file) load("gnus-ems" nil nil nil) # (unwind-protect ...) gnus-add-minor-mode(mml-mode " MML" #<keymap size 1 0x628c>) # bind (arg) mml-mode() # bind (delay-mode-hooks) message-mode() # bind (buffer name) message-pop-to-buffer("*mail to XEmacs Beta*") # bind (message-this-is-mail replybuffer send-actions yank-action switch-function continue other-headers subject to) message-mail("XEmacs Beta <xemacs-beta(a)xemacs.org&gt;&quot; "[Bug: 21.5-b21] XEmacs takes Swiss German for Chinese" nil nil nil nil nil) # bind (function send-actions yank-action switch-function continue other-headers subject to) compose-mail("XEmacs Beta <xemacs-beta(a)xemacs.org&gt;&quot; "[Bug: 21.5-b21] XEmacs takes Swiss German for Chinese" nil) # bind (user-point recent-keys topic) #<compiled-function (topic &optional recent-keys) "...(514)" [map before-keys user-point mods topic mail-user-agent nil "[Bug: " "] " compose-mail re-search-forward "^" regexp-quote "$" 1 "================================================================\n" "Dear Bug Team!\n\n" "\n\n================================================================\n\nSystem Info to help track down your bug:\n---------------------------------------\n\n" Installation-string fboundp append-message ((byte-code " «†ÂMˆª„ÃÂ!ˆÂ‡" [--letf-save--65404 --letf-bound--65405 append-message fmakunbound] 2)) #<compiled-function (&rest args) "...(2)" [nil] 1 "\nCommon Lisp lambda list:\n (lambda &rest ARGS)\n\n"> clear-message ((byte-code " «†ÂMˆª„ÃÂ!ˆÂ‡" [--letf-save--65408 --letf-bound--65409 clear-message fmakunbound] 2)) #<compiled-function (&optional label frame stdout-p no-restore) "...(2)" [nil] 1 "\nCommon Lisp lambda list:\n (lambda &optional LABEL FRAME STDOUT-P NO-RESTORE)\n\n"> "\n\nLoad-Pat! h Lisp Shadows:\n" "----------------------\n" format "%s" find-emacs-lisp-shadows fill-paragraph t "\n" "\n\nInstalled XEmacs Packages:\n" "-------------------------\n" report-xemacs-bug-packages-list list-modules "\n\nInstalled Modules:\n" "-----------------\n" cl-prettyprint "\n\nFeatures:\n--------\n\n%s" features "\n\n" "Recent keystrokes:\n-----------------\n\n" key-description move-to-column 50 search-forward " " "\n\n\nRecent messages (most recent first):\n" "-----------------------------------\n" print-recent-messages 20 file-readable-p 0 "\n\nUser Init File:\n--------------\n\n" insert-file-contents use-local-map make-sparse-keymap set-keymap-parents current-local-map define-key " " before-shadows before-features user-init-file emacs-program-version xemacs-betaname report-xemacs-bug-beta-address report-xemacs-bug-beta-extra-headers report-xemacs-bug-address report-xemacs-bug-extra-headers mail-header-separator --letf-bound--65405 --letf-save--65404 --letf-bound--6! 5409 --letf-save--65408 load-path recent-keys standard-output ! report-x e macs-bug-send-init report-xemacs-bug-orig-text report-xemacs-bug-no-explanations report-xemacs-bug-info sendmail-user-agent make-local-variable mail-send-hook add-hook report-xemacs-bug-hook message-user-agent message-send-hook mh-e-user-agent mh-before-send-letter-hook " \n" delete-other-windows report-xemacs-bug-help message substitute-command-keys "Type \\[mail-send-and-exit] to send the bug report, \\[kill-buffer] to cancel." "Type \\[message-send-and-exit] to send the bug report, \\[kill-buffer] to cancel." "Type \\[mh-send-letter] to send the bug report, \\[kill-buffer] to cancel."] 5 ("/usr/share/xemacs/xemacs-packages/lisp/net-utils/xemacsbug.elc" . 4187) (byte-code "ÀÁ ÂÃ!D!‡" [reverse recent-keys read-string "Bug Subject: "] 4)>("XEmacs takes Swiss German for Chinese" [#<keypress-event )> #<keypress-event control-X> #<keypress-event control-E> #<keypress-event control-X> #<keypress-event control-E> #<keypress-event down> #<keypress-event f2> #<keypress-event contr! ol-X> #<keypress-event control-F> #<keypress-event meta-backspace> #<keypress-event backspace> #<keypress-event t> #<keypress-event m> #<keypress-event tab> #<keypress-event B> #<keypress-event A> #<keypress-event tab> #<keypress-event return> #<keypress-event control-X> #<keypress-event k> #<keypress-event control-X> #<keypress-event control-F> #<keypress-event up> #<keypress-event return> #<keypress-event control-H> #<keypress-event l> #<keypress-event q> #<keypress-event control-X> #<keypress-event k> #<keypress-event control-X> #<keypress-event control-F> #<keypress-event up> #<keypress-event return> #<keypress-event control-X> #<keypress-event k> #<keypress-event control-X> #<keypress-event control-F> #<keypress-event up> #<keypress-event return> #<keypress-event f7> #<keypress-event ssharp> #<keypress-event return> #<keypress-event s> #<keypress-event s> #<keypress-event return> #<keypress-event !> #<keypress-event f2> #<keypress-event control-X> #<keypress-event k> #! <keypress-event control-X> #<keypress-event control-F> #<keypr! ess-even t up> #<keypress-event return> #<keypress-event meta-:> #<keypress-event b> #<keypress-event i> #<keypress-event f> #<keypress-event f> #<keypress-event e> #<keypress-event r> #<keypress-event -> #<keypress-event f> #<keypress-event i> #<keypress-event shift-tab> #<keypress-event control-A> #<keypress-event right> #<keypress-event delete> #<keypress-event u> #<keypress-event end> #<keypress-event shift-tab> #<keypress-event shift-tab> #<keypress-event c> #<keypress-event tab> #<keypress-event meta-shift-backspace> #<keypress-event c> #<keypress-event shift-tab> #<keypress-event shift-tab> #<keypress-event shift-tab> #<keypress-event return> #<keypress-event control-X> #<keypress-event k> #<keypress-event control-A> #<keypress-event control-K> #<keypress-event up> #<keypress-event up> #<keypress-event end> #<keypress-event control-X> #<keypress-event control-E> #<keypress-event f2> #<keypress-event meta-X> #<keypress-event r> #<keypress-event e> #<keypress-event p> #<keypress-! event o> #<keypress-event r> #<keypress-event tab> #<keypress-event x> #<keypress-event e> #<keypress-event tab> #<keypress-event return>]) call-interactively(report-xemacs-bug) command-execute(report-xemacs-bug t) # bind (_execute_command_keys_ _execute_command_name_ prefix-arg) execute-extended-command(nil) # bind (command-debug-status) call-interactively(execute-extended-command) # (condition-case ... . error) # (catch top-level ...) Debug: error: (image-conversion-error (Opening pixmap file no such file or directory /usr/share/xemacs/xemacs-packages/etc/gnus/gnus-pointer.xpm)) Backtrace follows: # bind (inhibit-quit) # (unwind-protect ...) # (catch #<INTERNAL OBJECT (XEmacs bug?) (opaque, size=0) 0x40804ca8> ...) # (unwind-protect ...) add-spec-list-to-specifier(#<image-specifier global=<unspecified> fallback=((nil . [nothing])) 0x6836> ((global (nil . [xpm :file "/usr/share/xemacs/xemacs-packages/etc/gnus/gnus-pointer.xpm"]))) nil) # bind (is-valid nval how-to-add tag-set locale value specifier) set-specifier(#<image-specifier global=<unspecified> fallback=((nil . [nothing])) 0x6836> [xpm :file "/usr/share/xemacs/xemacs-packages/etc/gnus/gnus-pointer.xpm"] nil nil nil) # bind (how-to-add tag-set locale value property glyph) set-glyph-property(#<glyph (buffer) #<image-specifier global=<unspecified> fallback=((nil . [nothing])) 0x6836>0x6835> image [xpm :file "/usr/share/xemacs/xemacs-packages/etc/gnus/gnus-pointer.xpm"] nil nil nil) # bind (how-to-add tag-set locale spec glyph) set-glyph-image(#<glyph (buffer) #<image-specifier global=<unspecified> fallback=((nil . [nothing])) 0x6836>0x6835> [xpm :file "/usr/share/xemacs/xemacs-packages/etc/gnus/gnus-pointer.xpm"]) # bind (glyph type spec-list) make-glyph([xpm :file "/usr/share/xemacs/xemacs-packages/etc/gnus/gnus-pointer.xpm"]) # bind (file-xbm file-xpm) byte-code("..." [modeline-buffer-id-left-extent file-xbm file-xpm gnus-xmas-glyph-directory glyph current-load-list gnus-xmas-modeline-left-extent default-boundp set-default copy-extent gnus-xmas-modeline-right-extent gnus-xmas-modeline-glyph expand-file-name "gnus-pointer.xpm" "gnus-pointer.xbm" make-glyph featurep xpm apply vector :file xbm [string :data "Gnus:"] set-glyph-face modeline-buffer-id modeline-buffer-id-right-extent] 9) # (unwind-protect ...) # (unwind-protect ...) # (unwind-protect ...) # (unwind-protect ...) # (unwind-protect ...) # (unwind-protect ...) # (unwind-protect ...) # (unwind-protect ...) load-internal("gnus-xmas" nil nil nil binary) # bind (path handler filename nosuffix nomessage noerror file) efs-real-load("gnus-xmas" nil nil nil) # bind (parsed filename nosuffix nomessage noerror file) load("gnus-xmas" nil nil nil) # (unwind-protect ...) gnus-xmas-define() byte-code("..." [current-load-list defalias gnus-char-width fboundp char-width #<compiled-function (ch) "...(2)" [1] 1> featurep xemacs gnus-xmas-define gnus-mouse-face-prop put variable-documentation "Property used for highlighting mouse regions." default-boundp set-default mouse-face] 4) # (unwind-protect ...) # (unwind-protect ...) # (unwind-protect ...) # (unwind-protect ...) # (unwind-protect ...) # (unwind-protect ...) # (unwind-protect ...) # (unwind-protect ...) load-internal("gnus-ems" nil nil nil binary) # bind (path handler filename nosuffix nomessage noerror file) efs-real-load("gnus-ems" nil nil nil) # bind (parsed filename nosuffix nomessage noerror file) load("gnus-ems" nil nil nil) # (unwind-protect ...) gnus-add-minor-mode(mml-mode " MML" #<keymap size 1 0x628c>) # bind (arg) mml-mode() # bind (delay-mode-hooks) message-mode() # bind (buffer name) message-pop-to-buffer("*mail to XEmacs Beta*") # bind (message-this-is-mail replybuffer send-actions yank-action switch-function continue other-headers subject to) message-mail("XEmacs Beta <xemacs-beta(a)xemacs.org&gt;&quot; "[Bug: 21.5-b21] XEmacs takes Swiss German for Chinese" nil nil nil nil nil) # bind (function send-actions yank-action switch-function continue other-headers subject to) compose-mail("XEmacs Beta <xemacs-beta(a)xemacs.org&gt;&quot; "[Bug: 21.5-b21] XEmacs takes Swiss German for Chinese" nil) # bind (user-point recent-keys topic) #<compiled-function (topic &optional recent-keys) "...(514)" [map before-keys user-point mods topic mail-user-agent nil "[Bug: " "] " compose-mail re-search-forward "^" regexp-quote "$" 1 "================================================================\n" "Dear Bug Team!\n\n" "\n\n================================================================\n\nSystem Info to help track down your bug:\n---------------------------------------\n\n" Installation-string fboundp append-message ((byte-code " «†ÂMˆª„ÃÂ!ˆÂ‡" [--letf-save--65404 --letf-bound--65405 append-message fmakunbound] 2)) #<compiled-function (&rest args) "...(2)" [nil] 1 "\nCommon Lisp lambda list:\n (lambda &rest ARGS)\n\n"> clear-message ((byte-code " «†ÂMˆª„ÃÂ!ˆÂ‡" [--letf-save--65408 --letf-bound--65409 clear-message fmakunbound] 2)) #<compiled-function (&optional label frame stdout-p no-restore) "...(2)" [nil] 1 "\nCommon Lisp lambda list:\n (lambda &optional LABEL FRAME STDOUT-P NO-RESTORE)\n\n"> "\n\nLoad-Pat! h Lisp Shadows:\n" "----------------------\n" format "%s" find-emacs-lisp-shadows fill-paragraph t "\n" "\n\nInstalled XEmacs Packages:\n" "-------------------------\n" report-xemacs-bug-packages-list list-modules "\n\nInstalled Modules:\n" "-----------------\n" cl-prettyprint "\n\nFeatures:\n--------\n\n%s" features "\n\n" "Recent keystrokes:\n-----------------\n\n" key-description move-to-column 50 search-forward " " "\n\n\nRecent messages (most recent first):\n" "-----------------------------------\n" print-recent-messages 20 file-readable-p 0 "\n\nUser Init File:\n--------------\n\n" insert-file-contents use-local-map make-sparse-keymap set-keymap-parents current-local-map define-key " " before-shadows before-features user-init-file emacs-program-version xemacs-betaname report-xemacs-bug-beta-address report-xemacs-bug-beta-extra-headers report-xemacs-bug-address report-xemacs-bug-extra-headers mail-header-separator --letf-bound--65405 --letf-save--65404 --letf-bound--6! 5409 --letf-save--65408 load-path recent-keys standard-output ! report-x e macs-bug-send-init report-xemacs-bug-orig-text report-xemacs-bug-no-explanations report-xemacs-bug-info sendmail-user-agent make-local-variable mail-send-hook add-hook report-xemacs-bug-hook message-user-agent message-send-hook mh-e-user-agent mh-before-send-letter-hook " \n" delete-other-windows report-xemacs-bug-help message substitute-command-keys "Type \\[mail-send-and-exit] to send the bug report, \\[kill-buffer] to cancel." "Type \\[message-send-and-exit] to send the bug report, \\[kill-buffer] to cancel." "Type \\[mh-send-letter] to send the bug report, \\[kill-buffer] to cancel."] 5 ("/usr/share/xemacs/xemacs-packages/lisp/net-utils/xemacsbug.elc" . 4187) (byte-code "ÀÁ ÂÃ!D!‡" [reverse recent-keys read-string "Bug Subject: "] 4)>("XEmacs takes Swiss German for Chinese" [#<keypress-event )> #<keypress-event control-X> #<keypress-event control-E> #<keypress-event control-X> #<keypress-event control-E> #<keypress-event down> #<keypress-event f2> #<keypress-event contr! ol-X> #<keypress-event control-F> #<keypress-event meta-backspace> #<keypress-event backspace> #<keypress-event t> #<keypress-event m> #<keypress-event tab> #<keypress-event B> #<keypress-event A> #<keypress-event tab> #<keypress-event return> #<keypress-event control-X> #<keypress-event k> #<keypress-event control-X> #<keypress-event control-F> #<keypress-event up> #<keypress-event return> #<keypress-event control-H> #<keypress-event l> #<keypress-event q> #<keypress-event control-X> #<keypress-event k> #<keypress-event control-X> #<keypress-event control-F> #<keypress-event up> #<keypress-event return> #<keypress-event control-X> #<keypress-event k> #<keypress-event control-X> #<keypress-event control-F> #<keypress-event up> #<keypress-event return> #<keypress-event f7> #<keypress-event ssharp> #<keypress-event return> #<keypress-event s> #<keypress-event s> #<keypress-event return> #<keypress-event !> #<keypress-event f2> #<keypress-event control-X> #<keypress-event k> #! <keypress-event control-X> #<keypress-event control-F> #<keypr! ess-even t up> #<keypress-event return> #<keypress-event meta-:> #<keypress-event b> #<keypress-event i> #<keypress-event f> #<keypress-event f> #<keypress-event e> #<keypress-event r> #<keypress-event -> #<keypress-event f> #<keypress-event i> #<keypress-event shift-tab> #<keypress-event control-A> #<keypress-event right> #<keypress-event delete> #<keypress-event u> #<keypress-event end> #<keypress-event shift-tab> #<keypress-event shift-tab> #<keypress-event c> #<keypress-event tab> #<keypress-event meta-shift-backspace> #<keypress-event c> #<keypress-event shift-tab> #<keypress-event shift-tab> #<keypress-event shift-tab> #<keypress-event return> #<keypress-event control-X> #<keypress-event k> #<keypress-event control-A> #<keypress-event control-K> #<keypress-event up> #<keypress-event up> #<keypress-event end> #<keypress-event control-X> #<keypress-event control-E> #<keypress-event f2> #<keypress-event meta-X> #<keypress-event r> #<keypress-event e> #<keypress-event p> #<keypress-! event o> #<keypress-event r> #<keypress-event tab> #<keypress-event x> #<keypress-event e> #<keypress-event tab> #<keypress-event return>]) call-interactively(report-xemacs-bug) command-execute(report-xemacs-bug t) # bind (_execute_command_keys_ _execute_command_name_ prefix-arg) execute-extended-command(nil) # bind (command-debug-status) call-interactively(execute-extended-command) # (condition-case ... . error) # (catch top-level ...) Loading gnus-xmas... Loading gnus-ems... Parsing /home/foth/.mailrc... done Parsing /home/foth/.mailrc... Loading mail-extr...done Loading mail-extr... Loading message...done Loading message... Loading xemacsbug...done Loading xemacsbug... Wrote /home/foth/.xemacs/init.el (("." iso-8859-1 . iso-8859-1) ("TUTORIAL\\.\\(?:hr\\|pl\\|ro\\)\\'" . iso-8859-2)) big5-unix Making completion list...done -- Kilian Foth Phone +49 40 42883-2518 AB NATS, FB Informatik Fax +49 40 42883-2515 Universität Hamburg Vogt-Kölln-Str. 30 22527 Hamburg