[Bug: 21.5-b21] XEmacs mistakes Swiss German for Chinese
Kilian A. Foth
foth at informatik.uni-hamburg.de
Sun May 7 06:11:03 EDT 2006
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 at xemacs.org>" "[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 at xemacs.org>" "[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-Path 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--65409 --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 control-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 at xemacs.org>" "[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 at xemacs.org>" "[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-Path 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--65409 --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 control-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
More information about the XEmacs-Beta
mailing list
