XEmacs 21.4.18 Coming Soon
18 years, 4 months
Vin Shelton
Vin Shelton
Greetings -
I plan to release XEmacs-21.4.18 within the next couple of weeks. I
have made a bunch of commits to the 21.4 branch in the last week (I'm
behind in my APPROVE COMMIT messages, but they will be all caught up
within the next day or so).
Please try out the latest 21.4 sources and let me know if there's
something that's currently broken or missing.
Regards,
Vin
- 1 participants
- 0 comments
Proof-of-concept libcurl Lisp binding available
18 years, 4 months
Stephen J. Turnbull
Stephen J. Turnbull
Mostly for the sake of practice I've implemented an XEmacs Lisp
binding for the libcurl WWW library's "easy" API as an ELL. It seems
fast, but it's not obvious that it has huge advantages over the
existing url.el and EFS, and the interface is very low-level.
Use of this module is not for the faint of heart. Many useful
operations are unimplemented, and the available interface is very
low-level and noninteractive. I don't have time right now to put it
into shape for addition to the XEmacs distribution, and don't plan to
work on it for a while, so I offer it on an "as-is" basis.
The following build instructions are for 21.5 and are untested. I
definitely will help with building, so feel free to ask. I don't see
why this module won't work with 21.4, so you're welcome to try and
send me bug reports. For now I think you can post to xemacs-beta
(which I read every day), and that might be useful to others.
To prepare, you need to install libcurl library and headers. To add
the module to your XEmacs tree, cd to the $srcdir/module directory,
and check it out from CVS:
cvs -d $CVSROOT checkout -d curl XEmacs/packages/unsupported/stephen/curl
where CVSROOT is whatever you normally use for checking out XEmacs.
Now cd back to $srcdir, and apply the patch:
patch -p1 < modules/curl/build.patch
Regenerate configure with "autoconf", configure --with-libcurl (and
your usual configuration options), and build as usual. It should also
be possible to build curl_api outside of the XEmacs source tree, but
I've not tried, and don't know how myself yet. Documentation welcome!
It turns out that the modules directory is not on the Lisp load path
at all. You need to either use `(require 'curl "path/to/curl.el")' or
copy curl.el to your load-path. This evaluates `(require 'curl_api
"curl/curl_api")', which works for me in a run-in-place environment,
but YMMV.
None of the functions are autoloaded or interactive yet. The file
curl-tests.el in the distribution contains some code that you can
evaluate in *scratch*.
What follows is the README:
XEmacs Lisp binding for libcurl
===============================
libcurl is the library API for cURL. Documentation is available at
http://curl.haxx.se/.
This is primarily a C module, not a Lisp library. There is a Lisp library
which initializes some data structures and requires the module; this
structure will probably be changed in the future.
The current version of the module exposes the libcurl "easy" interface via
the following Lisp API. It adds one object type, "URL handle", and the
functions and variables listed below.
The naming scheme will seem a little odd. My intention is to unify a number
of different URL handling implementations, probably including EFS, TRAMP and
libneon, under the url-handle interface. The generic interface will use the
url-handle-* namespace. The curl-* API provides low-level, library-specific
functions. These functions are generally named after either a library API
(eg, `curl-easy-perform' actually accesses the resource pointed to by the
URL), or the generic API it implements (`curl-make-url-handle').
Currently there are no generic equivalents to the libcurl wrappers. This is
intentional; I want to implement at least one more lowlevel API before
starting to design the generic APIs.
I do not have immediate plans to implement the libcurl "multi" and "shared"
interfaces. It should be easy, and patches and suggestions are welcome.
DEFUN ("url-handle-p", Furl_handle_p, 1, 1, 0, /*
Return t if OBJECT is a URL_Handle connection. */
(object))
DEFUN ("url-handle-type", Furl_handle_type, 1, 1, 0, /*
Return the type of URL-HANDLE, a symbol. */
(url_handle))
DEFUN ("url-handle-live-p", Furl_handle_live_p, 1, 1, 0, /*
Return non-nil if URL_HANDLE is an active URL_HANDLE connection. */
(url_handle))
DEFUN ("url-handle-property-list", Furl_handle_host, 1, 1, 0, /*
Return the property list of URL-HANDLE. */
(url_handle))
DEFUN ("curl-make-url-handle", Fcurl_make_url_handle, 1, 3, 0, /*
Return a cURL handle for URL, wrapped in an url-handle.
URL is a string, which must be a URI scheme known to cURL.
URL is encoded according to optional argument CODESYS. (Of course cURL will
URL-encode it before sending it off.)
PLIST is a property list. These properties are set on the cURL handle.
#### This interface may change to (&rest PLIST). */
(url, codesys, plist))
DEFUN ("curl-easy-setopt", Fcurl_easy_setopt, 3, 3, 0, /*
Set OPTION to VALUE on curl url-handle HANDLE and return t.
OPTION is a string denoting an option in `curl-option-hash-table'.
VALUE must be of the appropriate type.
HANDLE must be an url-handle object of type `curl'.
A wrapper with some validation for libcurl's `curl_easy_setopt'.
Errors without useful explanations probably mean `curl-option-hash-table'
is corrupt. */
(option, value, handle))
DEFUN ("curl-easy-perform", Fcurl_easy_perform, 1, 2, 0, /*
Read from the URL represented by HANDLE into BUFFER at point.
Optional BUFFER defaults to the current buffer.
Returns t. */
(handle, buffer))
DEFUN ("curl-easy-getinfo", Fcurl_easy_getinfo, 2, 2, 0, /*
Return the value of ATTRIBUTE for HANDLE.
ATTRIBUTE is a string denoting an attribute in `curl-info-hash-table'.
HANDLE must be an url-handle object of type `curl'.
A wrapper with some validation for libcurl's `curl_easy_getinfo'.
Errors without useful explanations probably mean `curl-info-hash-table'
is corrupt. */
(attribute, handle))
DEFVAR_LISP ("curl-option-hash-table", &Vcurl_option_hash_table /*
Table of options available for `curl-easy-setopt'.
Key are strings naming options. The option names are taken from enum
CURLoption in <curl/curl.h>. They are all uppercase, and the "CURLOPT_"
prefix is omitted.
Values are lists containing a type symbol \(one of `long', `objectpoint',
`functionpoint', and `off_t') and an integer, which is the option index.
It is planned to add a list of Lisp types that can be converted to something
that is useful for the option as the 3rd element of the value list.
It is planned to add the leading comments as docstrings, to be the 4th
element of the value list corresponding to each key. */ );
Vcurl_option_hash_table = Qnil;
DEFVAR_LISP ("curl-info-hash-table", &Vcurl_info_hash_table /*
Table of attributes accessible via `curl-easy-getinfo'.
Keys are strings naming attributes. The attribute names are taken from
enum CURLinfo in <curl/curl.h>. They are all uppercase, and the "CURLINFO_"
prefix is omitted.
Values are lists containing a type symbol (one of `long', `string',
`double', and `list') and an integer, which is the attribute index.
It is planned to add docstrings, to be the 3rd element of the value list
corresponding to each key. */ );
Vcurl_info_hash_table = Qnil;
--
School of Systems and Information Engineering http://turnbull.sk.tsukuba.ac.jp
University of Tsukuba Tennodai 1-1-1 Tsukuba 305-8573 JAPAN
Ask not how you can "do" free software business;
ask what your business can "do for" free software.
- 1 participants
- 0 comments
Re: CVS update by stephent packages/unsupported/stephen/curl Makefile.in.in
18 years, 4 months
Aidan Kehoe
Aidan Kehoe
Ar an séú lá is fiche de mí na Samhain, scríobh xemacs-cvs(a)xemacs.org:
> [...]
> DEFUN ("curl-make-url-handle", Fcurl_make_url_handle, 1, 3, 0, /*
> Return a cURL handle for URL, wrapped in an url-handle.
> URL is a string, which must be a URI scheme known to cURL.
> URL is encoded according to optional argument CODESYS. (Of course cURL will
> URL-encode it before sending it off.)
>
> [...]
> if (NILP (codesys))
> /* #### Quick hack, should be Qnative? */
> codesys = Ffind_coding_system (Qutf_8);
By the way, there’s no right answer here. Coding systems for URLs are a
clusterfuck, and UTF-8 is a good default.
--
I AM IN JAIL AND ALLOWED SEND ONLY ONE CABLE SINCE WAS ARRESTED WHILE
MEASURING FIFTEEN FOOT WALL OUTSIDE PALACE AND HAVE JUST FINISHED COUNTING
THIRTY EIGHT THOUSAND FIVE HUNDERED TWENTY TWO NAMES WHOS WHO IN MIDEAST.
- 1 participants
- 0 comments
when to merge unicode-internal?
18 years, 4 months
Ben Wing
Ben Wing
i'm thinking about merging unicode-internal as soon as all of the new
stuff added works perfectly under *old-mule*. i can't guarantee at that
point that compiling --with-unicode-internal will work prefectly; it
will probably work, and you'll be able to edit, but various things won't
be quite right. those will get gradually fixed up, but in time. i'd
like to get it merged sooner both because it will make it easier for
others to examine the code (and maybe even fix problems) and it will
make it easier for me to keep up with code synched up with changes.
comments?
I also have a to-do list summarizing the main issues that lie ahead in
the unicode-internal work. I'll post this when it's a little more
cleaned up.
ben
- 2 participants
- 1 comments
[gmane.emacs.devel] Re: compile-mode highlighting broken
18 years, 5 months
Adrian Aichner
Adrian Aichner
Hi Malcolm, All,
I noticed this breakage in XEmacs too.
list-matching-lines also seems to have gone missing due to the last
sync of occur.el.
Adrian
- 1 participants
- 0 comments
Désinscription de la liste : master
18 years, 5 months
Le Courrielleur
Le Courrielleur
Désinscription de la liste: master
L'adresse de courriel xemacs-beta(a)xemacs.org a été retirée.
Cliquez sur le lien suivant pour vous réinscrire :
http://go.courrielleur.com/opt-in.php?lid=3423&uid=2298&email=xemacs-beta...
Cette liste est gérée par Le Courrielleur
http://www.courrielleur.com
- 1 participants
- 0 comments
[Failure] XEmacs 21.5-b23 "daikon" (+CVS-20051124) i586-pc-win32
18 years, 5 months
Adrian Aichner
Adrian Aichner
temacs crashes when building with -DNEW_GC WITHOUT optimization :-)
Here's the C Call Stack:
Adrian
> XEmacs Build Report generated by emacs-version
> 21.5 (beta23) "daikon" (+CVS-20051031) XEmacs Lucid
> with system-configuration
> i586-pc-win32
> follows:
> Contents of c:\Hacking\cvs.xemacs.org\XEmacs\xemacs-21.5-clean\Installation:
> (Output from most recent run of ./configure)
OS version:
Microsoft Windows XP [Version 5.1.2600]
OS: Windows_NT
XEmacs 21.5-b23 "daikon" (+CVS-20051124) configured for `i586-pc-win32'.
Building XEmacs using "NMAKE".
Building XEmacs using make flags " ".
Building XEmacs in source tree "c:\\Hacking\\cvs.xemacs.org\\XEmacs\\xemacs-21.5-clean".
For src, using compiler "cl -nologo -W3 -DSTRICT -Zi -Od -MDd -c -Ic:\Hacking\cvs.xemacs.org\XEmacs\xemacs-21.5-clean\nt\inc -Ic:\Hacking\cvs.xemacs.org\XEmacs\xemacs-21.5-clean\src -I"c:\Hacking\libs4xemacs\xpm-3.4k" -I"c:\Hacking\libs4xemacs\xpm-3.4k\lib" -I"c:\Hacking\libs4xemacs\libpng-1.0.2" -I"c:\Hacking\libs4xemacs\zlib" -I"c:\Hacking\libs4xemacs\tiff-v3.4\libtiff" -I"c:\Hacking\libs4xemacs\jpeg-6b" -I"c:\Hacking\libs4xemacs\compface" -I"c:\Hacking\libs4xemacs\zlib" -DHAVE_MS_WINDOWS -DHAVE_MENUBARS -DHAVE_SCROLLBARS -DHAVE_TOOLBARS -DHAVE_WIDGETS -DHAVE_DIALOGS -DHAVE_XPM -DFOR_MSW -DHAVE_GIF -DHAVE_PNG -DHAVE_TIFF -DHAVE_JPEG -DHAVE_XFACE -DHAVE_ZLIB -DHAVE_NATIVE_SOUND -DMULE -DPDUMP -DNEW_GC -DUSE_KKCC -DMC_ALLOC -DSYSTEM_MALLOC -DDEBUG_XEMACS -D_DEBUG -DWIN32_LEAN_AND_MEAN -DWIN32_NATIVE -Demacs -DHAVE_CONFIG_H -DPATH_VERSION=\"21.5-b23\" -DPATH_PROGNAME=\"xemacs\" -DEMACS_VERSION=\"21.5-b23\" -DEMACS_PROGNAME=\"xemacs\" -DSTACK_TRACE_EYE_CATCHER=xemacs_21_5_b23_i586_pc_win32 -DPATH_PREFIX=\"..\" -DEMACS_MAJOR_VERSION=21 -DEMACS_MINOR_VERSION=5 -DEMACS_BETA_VERSION=23 -DXEMACS_CODENAME=\""daikon"\" -DXEMACS_EXTRA_NAME=\"(+CVS-20051124)\" -DEMACS_CONFIGURATION=\"i586-pc-win32\" -DPATH_PACKAGEPATH=\""~\\.xemacs;;c:\\Program Files\\XEmacs\\site-packages;c:\\Program Files\\XEmacs\\mule-packages;c:\\Program Files\\XEmacs\\xemacs-packages"\"".
For lib-src, using compiler "cl -nologo -W3 -DSTRICT -Zi -Od -MDd -Ic:\Hacking\cvs.xemacs.org\XEmacs\xemacs-21.5-clean\lib-src -Ic:\Hacking\cvs.xemacs.org\XEmacs\xemacs-21.5-clean\src -DHAVE_CONFIG_H -DWIN32_NATIVE".
Installing XEmacs in "c:\\Program Files\\XEmacs\\XEmacs-21.5-b23".
Package path is "~\\.xemacs;;c:\\Program Files\\XEmacs\\site-packages;c:\\Program Files\\XEmacs\\mule-packages;c:\\Program Files\\XEmacs\\xemacs-packages".
Compiling in support for Microsoft Windows native GUI.
Compiling in international (MULE) support.
Compiling in support for XPM images.
Compiling in support for GIF images.
Compiling in support for PNG images.
Compiling in support for TIFF images.
Compiling in support for JPEG images.
Compiling in support for X-Face message headers.
Compiling in support for GZIP compression/decompression.
Compiling in support for toolbars.
Compiling in support for dialogs.
Compiling in support for widgets.
Compiling in support for native sounds.
Using portable dumper.
Using system malloc.
Using DLL version of C runtime library.
Compiling in debugging support (no slowdown).
Using new experimental GC algorithms.
Using new experimental allocator.
Using new experimental incremental garbage collector.
> Contents of c:\Hacking\cvs.xemacs.org\XEmacs\xemacs-21.5-clean\xemacs-21.5-clean-cvs-update.err
> keeping lines matching
> "^--\[\[\|\]\]$\|^\(cd\|n?make\)\s-\|errors?\|warnings?\|pure.*\(space\|size\)\|hides\b\|strange\|shadowings\|^Compil\(ing\s-+in\|ation\)\|^Using\|not\s-+found\|^While\s-+compiling.*\(
\s-+.+\)*\|^Note:\|Installing\|[Ff]ile(s) copied\|\s-+tests\s-+\|^[A-Z] [^ ]+$\|^Wrong number of arguments:\|^ \*\* "
> and then deleting lines matching
> "confl.*with.*auto-inlining\|^Formatting:"
cd c:\Hacking\cvs.xemacs.org\XEmacs\xemacs-21.5-clean\
Compilation started at Fri Nov 25 18:18:33 2005 +0100 (W. Europe Standard Time)
? gunzip-error.txt
? man/lispref/errors.texi.new
? nt/xemacs-21.5-clean-make-all-texinfo-error.err
P ChangeLog
P Makefile.in.in
P PROBLEMS
P configure
P configure.ac
P version.sh
P dynodump/Makefile.in.in
U etc/.cvsignore
P etc/ChangeLog
U etc/HELLO
P lib-src/ChangeLog
P lib-src/Makefile.in.in
P lib-src/etags.c
rcsmerge: warning: conflicts during merge
C lisp/ChangeLog
M lisp/cmdloop.el
P lisp/cus-start.el
P lisp/derived.el
P lisp/diagnose.el
P lisp/files.el
P lisp/frame.el
P lisp/glyphs.el
P lisp/help.el
P lisp/hyper-apropos.el
P lisp/menubar-items.el
P lisp/mouse.el
M lisp/package-get.el
P lisp/select.el
P lisp/simple.el
P lisp/specifier.el
P lisp/syntax.el
P lisp/toolbar.el
P lwlib/ChangeLog
P lwlib/Makefile.in.in
P lwlib/xlwcheckbox.c
P lwlib/xlwradio.c
P man/ChangeLog
P man/Makefile
P man/internals/internals.texi
P modules/ChangeLog
P modules/canna/canna_api.c
P modules/common/Makefile.common
P netinstall/ChangeLog
P netinstall/Makefile.in.in
P nt/ChangeLog
P nt/config.inc.samp
P nt/xemacs.dsp
P nt/xemacs.mak
P src/.cvsignore
U src/.dbxrc.in
U src/.gdbinit.in
P src/ChangeLog
P src/Makefile.in.in
P src/alloc.c
P src/buffer.c
P src/buffer.h
P src/bytecode.c
P src/bytecode.h
P src/config.h.in
P src/console-gtk-impl.h
P src/console-msw-impl.h
P src/console-stream-impl.h
P src/console-stream.c
P src/console-stream.h
P src/console-tty-impl.h
P src/console-tty.c
P src/console-x-impl.h
P src/console.c
P src/database.c
P src/depend
P src/device-gtk.c
P src/device-msw.c
P src/device-tty.c
P src/device-x.c
P src/device.c
P src/dumper.c
P src/dynarr.c
P src/elhash.c
P src/elhash.h
P src/emacs.c
P src/eval.c
P src/event-Xt.c
P src/event-msw.c
P src/events.c
P src/extents.c
P src/extents.h
P src/faces.h
P src/frame-gtk.c
rcsmerge: warning: conflicts during merge
C src/frame-msw.c
P src/frame-x.c
P src/frame.c
U src/gc.c
U src/gc.h
P src/glyphs-gtk.c
P src/glyphs-gtk.h
P src/glyphs.c
P src/glyphs.h
P src/gtk-xemacs.c
P src/keymap.c
P src/lisp.h
P src/lrecord.h
P src/mc-alloc.c
P src/mc-alloc.h
P src/mule-coding.c
P src/objects-tty-impl.h
P src/objects-tty.c
P src/objects.c
P src/print.c
P src/redisplay-gtk.c
P src/sound.c
P src/specifier.c
P src/specifier.h
P src/syntax.c
P src/syntax.h
P src/text.h
P src/toolbar.c
U src/vdb-fake.c
U src/vdb-mach.c
U src/vdb-posix.c
U src/vdb-win32.c
U src/vdb.c
U src/vdb.h
P src/window.c
cvs server: Updating tests
cvs server: Updating tests/DLL
M tests/automated/region-tests.el
U PROBLEMS
U dynodump/Makefile.in.in
U lib-src/Makefile.in.in
U lib-src/etags.c
U lisp/derived.el
U lisp/files.el
U lisp/frame.el
U lisp/glyphs.el
U lisp/hyper-apropos.el
U lisp/menubar-items.el
U lisp/mouse.el
U lisp/select.el
U lisp/specifier.el
U lisp/syntax.el
U lisp/toolbar.el
U lwlib/Makefile.in.in
U lwlib/xlwcheckbox.c
U man/Makefile
U modules/common/Makefile.common
U netinstall/Makefile.in.in
U src/glyphs-gtk.h
U src/gtk-xemacs.c
U src/mule-coding.c
U src/redisplay-gtk.c
U src/sound.c
U src/text.h
Compilation finished at Fri Nov 25 18:19:56
> Contents of c:\Hacking\cvs.xemacs.org\XEmacs\xemacs-21.5-clean\nt\xemacs-21.5-clean-make-all.err
> keeping lines matching
> "^--\[\[\|\]\]$\|^\(cd\|n?make\)\s-\|errors?\|warnings?\|pure.*\(space\|size\)\|hides\b\|strange\|shadowings\|^Compil\(ing\s-+in\|ation\)\|^Using\|not\s-+found\|^While\s-+compiling.*\(
\s-+.+\)*\|^Note:\|Installing\|[Ff]ile(s) copied\|\s-+tests\s-+\|^[A-Z] [^ ]+$\|^Wrong number of arguments:\|^ \*\* "
> and then deleting lines matching
> "confl.*with.*auto-inlining\|^Formatting:"
cd c:\Hacking\cvs.xemacs.org\XEmacs\xemacs-21.5-clean\nt\
nmake /f xemacs.mak all
Compilation started at Fri Nov 25 18:42:32 2005 +0100 (W. Europe Standard Time)
Installing XEmacs in "c:\\Program Files\\XEmacs\\XEmacs-21.5-b23".
1 file(s) copied.
1 File(s) copied
1 File(s) copied
Using load-path (c:\Hacking\cvs.xemacs.org\XEmacs\xemacs-21.5-clean\lisp\)
Using module-load-path (c:\Hacking\cvs.xemacs.org\XEmacs\xemacs-21.5-clean\modules)
Generating autoloads for lisp/next-error.el...
While compiling describe-register-1 in file c:\Hacking\cvs.xemacs.org\XEmacs\xemacs-21.5-clean\lisp\register.el:
** reference to free variable yank-excluded-properties
While compiling the end of the data:
** the function remove-list-of-text-properties is not known to be defined.
While compiling the end of the data in file c:\Hacking\cvs.xemacs.org\XEmacs\xemacs-21.5-clean\lisp\diagnose.el:
** The following functions are not known to be defined:
sort-numeric-fields, gc-stats
While compiling toplevel forms in file c:\Hacking\cvs.xemacs.org\XEmacs\xemacs-21.5-clean\lisp\menubar-items.el:
!! Internal error (("lstream not open for writing" #<INTERNAL OBJECT (XEmacs bug?) (string-direct-data) 0x1e2d3c0>))
backtrace(nil t)
# bind (error-info)
byte-compile-report-error((internal-error "lstream not open for writing" #<INTERNAL OBJECT (XEmacs bug?) (string-direct-data) 0x1e2d3c0>))
# bind (error-info)
#<compiled-function (error-info) "...(4)" [error-info byte-compile-report-error] 2>((internal-error "lstream not open for writing" #<INTERNAL OBJECT (XEmacs bug?) (string-direct-data) 0x1e2d3c0>))
# (unwind-protect ...)
# bind (byte-compile-current-form handler form)
byte-compile-file-form((defconst default-menubar (backquote (("%_File" ["%_Open..." find-file] ["Open in Other %_Window..." find-file-other-window] ["Open in New %_Frame..." find-file-other-frame] ("Open with Specified %_Encoding":filter (lambda (menu) (coding-system-menu-filter (lambda (entry) (let ((coding-system-for-read entry)) (call-interactively (quote find-file)))) (lambda (entry) t) t))) ["%_Hex Edit File..." hexl-find-file :active (fboundp (quote hexl-find-file))] ["%_Insert File..." insert-file] ["%_View File..." view-file] "------" ["%_New Frame" make-frame] ["Frame on Other %_Display..." make-frame-on-display :active (fboundp (quote make-frame-on-display))] ["%_Close Frame" delete-frame :active (not (eq (next-frame (selected-frame) (quote nomini) (quote window-system)) (selected-frame)))] "-----" ["%_Save" save-buffer :active (buffer-modified-p) :suffix (if put-buffer-names-in-file-menu (buffer-name) "")] ["Save %_As..." write-file] ["Save So%_me Buffers" save-some-buffers] "-----" (\,＠ (if (valid-specifier-tag-p (quote msprinter)) (quote (["Page Set%_up..." generic-page-setup])))) ["%_Print" generic-print-buffer:active (or (valid-specifier-tag-p (quote msprinter)) (and (not (eq system-type (quote windows-nt))) (fboundp (quote lpr-region)))):suffix (if (region-active-p) "Selection..." (if put-buffer-names-in-file-menu (concat (buffer-name) "...") "..."))] (\,＠ (unless (valid-specifier-tag-p (quote msprinter)) (quote (["Prett%_y-Print" ps-print-buffer-with-faces:active (fboundp (quote ps-print-buffer-with-faces)) :suffix (if put-buffer-names-in-file-menu (buffer-name) "")])))) "-----" ["%_Revert Buffer" revert-buffer:active (or buffer-file-name revert-buffer-function) :suffix (if put-buffer-names-in-file-menu (buffer-name) "")] ("Rever%_t/Recover" ("Revert Buffer with Specified %_Encoding" :filter (lambda (menu) (coding-system-menu-filter (lambda (entry) (let ((coding-system-for-read entry)) (revert-buffer))) (lambda (entry) (or buffer-file-name revert-buffer-function)) t))) ["Re%_cover Buffer from Autosave" (recover-file buffer-file-name) :active buffer-file-name :suffix (if put-buffer-names-in-file-menu (buffer-name) "")] ["Recover %_Session..." recover-session]) "-----" ["E%_xit XEmacs" save-buffers-kill-emacs]) ("%_Edit" ["%_Undo" undo :active (and (not (eq buffer-undo-list t)) (or buffer-undo-list pending-undo-list)) :suffix (if (eq last-command (quote undo)) "More" "")] ["%_Redo" redo :included (fboundp (quote redo)) :active (not (or (eq buffer-undo-list t) (eq last-buffer-undo-list nil) (not (or (eq last-buffer-undo-list buffer-undo-list) (and (null (car-safe buffer-undo-list)) (eq last-buffer-undo-list (cdr-safe buffer-undo-list))))) (or (eq buffer-undo-list pending-undo-list) (eq (cdr buffer-undo-list) pending-undo-list)))) :suffix (if (eq last-command (quote redo)) "More" "")] "----" ["Cu%_t" kill-primary-selection :active (selection-owner-p)] ["%_Copy" copy-primary-selection :active (selection-owner-p)] ["%_Paste" yank-clipboard-selection:active (selection-exists-p (quote CLIPBOARD))] ["%_Delete" delete-primary-selection :active (selection-owner-p)] "----" ["Select %_All" mark-whole-buffer] ["Select Pa%_ge" mark-page] ["Select Paragrap%_h" mark-paragraph] ["Re%_select Region" activate-region :active (mark t)] "----" ["%_Find..." make-search-dialog] ["R%_eplace..." query-replace] ["Replace (Rege%_xp)..." query-replace-regexp] ["List %_Matching Lines..." list-matching-lines]) ("%_View" ["%_Split Window" split-window-vertically] ["S%_plit Window (Side by Side)" split-window-horizontally] ["%_Un-Split (Keep This)" delete-other-windows :active (not (one-window-p t))] ["Un-Split (Keep %_Others)" delete-window :active (not (one-window-p t))] ["Balance %_Windows" balance-windows :active (not (one-window-p t))] ["Shrink Window to %_Fit" shrink-window-if-larger-than-buffer] "----" ("N%_arrow" ["%_Narrow to Region" narrow-to-region :active (region-exists-p)] ["Narrow to %_Page" narrow-to-page] ["Narrow to %_Defun" narrow-to-defun] "----" ["%_Widen" widen :active (or (/= (point-min) 1) (/= (point-max) (1+ (buffer-size))))]) "----" ["%_Goto Line..." goto-line] ["Beginning of %_Defun" beginning-of-defun] ["%_End of Defun" end-of-defun] ["%_Count Lines in Buffer" count-lines-buffer:included (not (region-active-p))] ["%_Count Lines in Region" count-lines-region:included (region-active-p)] "----" ["%_Jump to Previous Mark" (set-mark-command t) :active (mark t)] ["Se%_t Bookmark" bookmark-set :active (fboundp (quote bookmark-set))] ("%_Bookmarks" :filter (lambda (menu) (let ((alist (and-boundp (quote bookmark-alist) bookmark-alist))) (if (not alist) menu (let ((items (submenu-generate-accelerator-spec (mapcar (function (lambda (bmk) (backquote [(\, bmk) (bookmark-jump (quote (\, bmk)))]))) (bookmark-all-names))))) (append menu (quote ("---")) items))))) "---" ["Insert %_Contents" bookmark-menu-insert :active (fboundp (quote bookmark-menu-insert))] ["Insert L%_ocation" bookmark-menu-locate :active (fboundp (quote bookmark-menu-locate))] "---" ["%_Rename Bookmark" bookmark-menu-rename :active (fboundp (quote bookmark-menu-rename))] ("%_Delete Bookmark" :filter (lambda (menu) (submenu-generate-accelerator-spec (mapcar (function (lambda (bmk) (backquote [(\, bmk) (bookmark-delete (quote (\, bmk)))]))) (bookmark-all-names))))) ["%_Edit Bookmark List" bookmark-bmenu-list :active (and-boundp (quote bookmark-alist) bookmark-alist)] "---" ["%_Save Bookmarks" bookmark-save:active (and-boundp (quote bookmark-alist) bookmark-alist)] ["Save Bookmarks %_As..." bookmark-write :active (and-boundp (quote bookmark-alist) bookmark-alist)] ["%_Load a Bookmark File" bookmark-load :active (fboundp (quote bookmark-load))])) ("C%_mds" ["Repeat Last Comple%_x Command..." repeat-complex-command] ["E%_valuate Lisp Expression..." eval-expression] ["Execute %_Named Command..." execute-extended-command] "----" ["Start %_Defining Macro" start-kbd-macro :included (not defining-kbd-macro)] ["Stop %_Defining Macro" end-kbd-macro :included defining-kbd-macro] ["%_Execute Last Macro" call-last-kbd-macro :active last-kbd-macro] ("Other %_Macro" ["Edit %_Last Macro" edit-last-kbd-macro :active last-kbd-macro] ["%_Edit Macro..." edit-kbd-macro] ["%_Append to Last Macro" (start-kbd-macro t) :active (and (not defining-kbd-macro) last-kbd-macro)] "---" ["%_Name Last Macro..." name-last-kbd-macro:active last-kbd-macro] ["Assign Last Macro to %_Key..." assign-last-kbd-macro-to-key :active (and last-kbd-macro (fboundp (quote assign-last-kbd-macro-to-key)))] "---" ["E%_xecute Last Macro on Region Lines":active (and last-kbd-macro (region-exists-p))] "---" ["%_Query User During Macro" kbd-macro-query :active defining-kbd-macro] ["Enter %_Recursive Edit During Macro" (kbd-macro-query t) :active defining-kbd-macro] "---" ["%_Insert Named Macro into Buffer..." insert-kbd-macro] ["Read Macro from Re%_gion" read-kbd-macro :active (region-exists-p)]) "----" ["D%_ynamic Abbrev Expand" dabbrev-expand] ["Define %_Global Abbrev for " add-global-abbrev :suffix (truncate-string-to-width (abbrev-string-to-be-defined nil) 40 nil nil t)] ("Other %_Abbrev" ["Dynamic Abbrev %_Complete" dabbrev-completion] ["Dynamic Abbrev Complete in %_All Buffers" (dabbrev-completion 16)] "----" "----" ["%_Define Global Abbrev for " add-global-abbrev :suffix (truncate-string-to-width (abbrev-string-to-be-defined nil) 40 nil nil t)] ["Define %_Mode-Specific Abbrev for " add-mode-abbrev :suffix (truncate-string-to-width (abbrev-string-to-be-defined nil) 40 nil nil t)] ["Define Global Ex%_pansion for " inverse-add-global-abbrev :suffix (truncate-string-to-width (inverse-abbrev-string-to-be-defined 1) 40 nil nil t)] ["Define Mode-Specific Expa%_nsion for " inverse-add-mode-abbrev :suffix (truncate-string-to-width (inverse-abbrev-string-to-be-defined 1) 40 nil nil t)] "---" ["E%_xpand Abbrev" expand-abbrev] ["Expand Abbrevs in Re%_gion" expand-region-abbrevs :active (region-exists-p)] ["%_Unexpand Last Abbrev" unexpand-abbrev :active (and (stringp last-abbrev-text) (> last-abbrev-location 0))] "---" ["%_Kill All Abbrevs" kill-all-abbrevs] ["%_Insert All Abbrevs into Buffer" insert-abbrevs] ["%_List Abbrevs" list-abbrevs] "---" ["%_Edit Abbrevs" edit-abbrevs] ["%_Redefine Abbrevs from Buffer" edit-abbrevs-redefine :active (eq major-mode (quote edit-abbrevs-mode))] "---" ["%_Save Abbrevs As..." write-abbrev-file] ["L%_oad Abbrevs..." read-abbrev-file]) "---" ["%_Cut Rectangle" kill-rectangle] ["%_Prefix Rectangle..." string-rectangle] ("Other %_Rectangles/Register" ["%_Yank Rectangle" yank-rectangle] ["Rectangle %_to Register" copy-rectangle-to-register] ["Rectangle %_from Register" insert-register] ["%_Delete Rectangle" clear-rectangle] ["%_Open Rectangle" open-rectangle] ["Rectangle %_Mousing" (customize-set-variable (quote mouse-track-rectangle-p) (not mouse-track-rectangle-p)) :style toggle :selected mouse-track-rectangle-p] "---" ["%_Copy to Register..." copy-to-register :active (region-exists-p)] ["%_Append to Register..." append-register :active (region-exists-p)] ["%_Insert Register..." insert-register] "---" ["%_Save Point to Register" point-to-register] ["%_Jump to Register" register-to-point]) "---" ["%_Sort Lines in Region" sort-lines :active (region-exists-p)] ["%_Uppercase Region or Word" upcase-region-or-word] ["%_Lowercase Region or Word" downcase-region-or-word] ["%_Indent Region or Balanced Expression" indent-region-or-balanced-expression] ["%_Fill Paragraph or Region" fill-paragraph-or-region] ("Other %_Text Commands" ["Sort %_Paragraphs in Region" sort-paragraphs:active (region-exists-p)] ["Sort Pa%_ges in Region" sort-pages :active (region-exists-p)] ["Sort C%_olumns in Region" sort-columns :active (region-exists-p)] ["Sort %_Regexp..." sort-regexp-fields :active (region-exists-p)] "---" ["%_Capitalize Region" capitalize-region :active (region-exists-p)] ["Title-C%_ase Region" capitalize-region-as-title :active (region-exists-p)] "----" ["C%_enter Region or Paragraph" (if (region-active-p) (center-region) (center-line))] ["Center %_Line" center-line] "---" ["%_Indent Region Rigidly" indent-rigidly :active (region-exists-p)] ["In%_dent To Column..." indent-to-column] "---" ["%_Untabify (Tabs to Spaces)" untabify :active (and (region-exists-p) (fboundp (quote untabify)))] ["%_Tabify (Spaces to Tabs)" tabify :active (and (region-exists-p) (fboundp (quote tabify)))] ["Tab to Tab %_Stop" tab-to-tab-stop] ["Edit Ta%_b Stops" edit-tab-stops]) "---" ("%_Tags" ["%_Find Tag..." find-tag] ["Find %_Other Window..." find-tag-other-window] ["%_Next Tag..." (find-tag nil)] ["N%_ext Other Window..." (find-tag-other-window nil)] ["Next %_File" next-file] "-----" ["Tags %_Search..." tags-search] ["Tags %_Replace..." tags-query-replace] ["%_Continue Search/Replace" tags-loop-continue] "-----" ["%_Pop stack" pop-tag-mark] ["%_Apropos..." tags-apropos] "-----" ["%_Set Tags Table File..." visit-tags-table])) ("%_Tools" ("%_Packages" ("%_Set Download Site" ("%_Official Releases" :filter (lambda (&rest junk) (menu-split-long-menu (submenu-generate-accelerator-spec (package-ui-download-menu))))) ("%_Pre-Releases" :filter (lambda (&rest junk) (menu-split-long-menu (submenu-generate-accelerator-spec (package-ui-pre-release-download-menu))))) ("%_Site Releases" :filter (lambda (&rest junk) (menu-split-long-menu (submenu-generate-accelerator-spec (package-ui-site-release-download-menu)))))) "--:shadowEtchedIn" ["%_Update Package Index" package-get-update-base] ["%_List and Install" pui-list-packages] ["U%_pdate Installed Packages" package-get-update-all] ["%_Help" (Info-goto-node "(xemacs)Packages")]) ("%_Internet" ["Read Mail %_1 (VM)..." vm :active (fboundp (quote vm))] ["Read Mail %_2 (MH)..." (mh-rmail t) :active (fboundp (quote mh-rmail))] ["Send %_Mail..." compose-mail :active (fboundp (quote compose-mail))] ["Usenet %_News" gnus :active (fboundp (quote gnus))] ["Browse the %_Web" w3 :active (fboundp (quote w3))]) "---" ("%_Grep" :filter (lambda (menu) (if (or (not (boundp (quote grep-history))) (null grep-history)) menu (let ((items (submenu-generate-accelerator-spec (mapcar (function (lambda (label-value) (vector (first label-value) (list (quote grep) (second label-value))))) (Menubar-items-truncate-history grep-history 10 50))))) (append menu (quote ("---")) items)))) ["%_Grep..." grep :active (fboundp (quote grep))] ["%_Kill Grep" kill-compilation :active (and (fboundp (quote kill-compilation)) (fboundp (quote compilation-find-buffer)) (let ((buffer (condition-case nil (compilation-find-buffer) (error nil)))) (and buffer (get-buffer-process buffer))))] "---" ["Grep %_All Files in Current Directory..." grep-all-files-in-current-directory :active (fboundp (quote grep-all-files-in-current-directory))] ["Grep All Files in Current Directory %_Recursively..." grep-all-files-in-current-directory-and-below :active (fboundp (quote grep-all-files-in-current-directory-and-below))] "---" ["Grep %_C and C Header Files in Current Directory..." (progn (require (quote compile)) (let ((grep-command (cons (concat grep-command " *.[chCH]") (length grep-command)))) (call-interactively (quote grep)))) :active (fboundp (quote grep))] ["Grep C Hea%_der Files in Current Directory..." (progn (require (quote compile)) (let ((grep-command (cons (concat grep-command " *.[hH]") (length grep-command)))) (call-interactively (quote grep)))) :active (fboundp (quote grep))] ["Grep %_E-Lisp Files in Current Directory..." (progn (require (quote compile)) (let ((grep-command (cons (concat grep-command " *.el") (length grep-command)))) (call-interactively (quote grep)))) :active (fboundp (quote grep))] ["Grep %_Perl Files in Current Directory..." (progn (require (quote compile)) (let ((grep-command (cons (concat grep-command " *.pl") (length grep-command)))) (call-interactively (quote grep)))) :active (fboundp (quote grep))] ["Grep %_HTML Files in Current Directory..." (progn (require (quote compile)) (let ((grep-command (cons (concat grep-command " *.*htm*") (length grep-command)))) (call-interactively (quote grep)))) :active (fboundp (quote grep))] "---" ["%_Next Match" next-error :active (and (fboundp (quote compilation-errors-exist-p)) (compilation-errors-exist-p))] ["Pre%_vious Match" previous-error :active (and (fboundp (quote compilation-errors-exist-p)) (compilation-errors-exist-p))] ["%_First Match" first-error :active (and (fboundp (quote compilation-errors-exist-p)) (compilation-errors-exist-p))] ["G%_oto Match" compile-goto-error :active (and (fboundp (quote compilation-errors-exist-p)) (compilation-errors-exist-p))] "---" ["%_Set Grep Command..." (progn (require (quote compile)) (customize-set-variable (quote grep-command) (read-shell-command "Default Grep Command: " grep-command))):active (fboundp (quote grep))]) ("%_Compile" :filter (lambda (menu) (if (or (not (boundp (quote compile-history))) (null compile-history)) menu (let ((items (submenu-generate-accelerator-spec (mapcar (function (lambda (label-value) (vector (first label-value) (list (quote compile) (second label-value))))) (Menubar-items-truncate-history compile-history 10 50))))) (append menu (quote ("---")) items)))) ["%_Compile..." compile :active (fboundp (quote compile))] ["%_Repeat Compilation" recompile :active (fboundp (quote recompile))] ["%_Kill Compilation" kill-compilation :active (and (fboundp (quote kill-compilation)) (fboundp (quote compilation-find-buffer)) (let ((buffer (condition-case nil (compilation-find-buffer) (error nil)))) (and buffer (get-buffer-process buffer))))] "---" ["%_Next Error" next-error :active (and (fboundp (quote compilation-errors-exist-p)) (compilation-errors-exist-p))] ["Pre%_vious Error" previous-error :active (and (fboundp (quote compilation-errors-exist-p)) (compilation-errors-exist-p))] ["%_First Error" first-error :active (and (fboundp (quote compilation-errors-exist-p)) (compilation-errors-exist-p))] ["G%_oto Error" compile-goto-error :active (and (fboundp (quote compilation-errors-exist-p)) (compilation-errors-exist-p))]) ("%_Debug" ["%_GDB..." gdb :active (fboundp (quote gdb))] ["%_DBX..." dbx:active (fboundp (quote dbx))]) ("%_Shell" ["%_Shell" shell :active (fboundp (quote shell))] ["S%_hell Command..." shell-command :active (fboundp (quote shell-command))] ["Shell Command on %_Region..." shell-command-on-region:active (and (fboundp (quote shell-command-on-region)) (region-exists-p))]) ("%_Tags" ["%_Find Tag..." find-tag] ["Find %_Other Window..." find-tag-other-window] ["%_Next Tag..." (find-tag nil)] ["N%_ext Other Window..." (find-tag-other-window nil)] ["Next %_File" next-file] "-----" ["Tags %_Search..." tags-search] ["Tags %_Replace..." tags-query-replace] ["%_Continue Search/Replace" tags-loop-continue] "-----" ["%_Pop stack" pop-tag-mark] ["%_Apropos..." tags-apropos] "-----" ["%_Set Tags Table File..." visit-tags-table]) "----" ("Ca%_lendar" ["%_3-Month Calendar" calendar :active (fboundp (quote calendar))] ["%_Diary" diary :active (fboundp (quote diary))] ["%_Holidays" holidays :active (fboundp (quote holidays))] ["%_Phases of the Moon" phases-of-moon :active (fboundp (quote phases-of-moon))] ["%_Sunrise/Sunset" sunrise-sunset :active (fboundp (quote sunrise-sunset))]) ("Ga%_mes" ["%_Mine Game" xmine :active (fboundp (quote xmine))] ["%_Tetris" tetris :active (fboundp (quote tetris))] ["%_Sokoban" sokoban :active (fboundp (quote sokoban))] ["Quote from %_Zippy" yow :active (fboundp (quote yow))] ["%_Psychoanalyst" doctor :active (fboundp (quote doctor))] ["Ps%_ychoanalyze Zippy!" psychoanalyze-pinhead :active (fboundp (quote psychoanalyze-pinhead))] ["%_Random Flames" flame :active (fboundp (quote flame))] ["%_Dunnet (Adventure)" dunnet :active (fboundp (quote dunnet))] ["Towers of %_Hanoi" hanoi:active (fboundp (quote hanoi))] ["Game of %_Life" life :active (fboundp (quote life))] ["M%_ultiplication Puzzle" mpuz :active (fboundp (quote mpuz))]) "----") ("%_Options" ("%_Advanced (Customize)" ("%_Emacs" :filter (lambda (&rest junk) (cdr (custom-menu-create (quote emacs))))) ["%_Group..." customize-group] ["%_Variable..." customize-variable] ["%_Face..." customize-face] ["%_Saved..." customize-saved] ["Se%_t..." customize-customized] ["%_Apropos..." customize-apropos] ["%_Browse..." customize-browse]) "---" ("%_Editing" ["This Buffer %_Read Only" (toggle-read-only) :style toggle :selected buffer-read-only] ["%_Yank/Kill Interact With Clipboard" (if (eq interprogram-cut-function (quote own-clipboard)) (progn (customize-set-variable (quote interprogram-cut-function) nil) (customize-set-variable (quote interprogram-paste-function) nil)) (customize-set-variable (quote interprogram-cut-function) (quote own-clipboard)) (customize-set-variable (quote interprogram-paste-function) (quote get-clipboard))) :style toggle :selected (eq interprogram-cut-function (quote own-clipboard))] ["%_Overstrike" (progn (setq overwrite-mode (if overwrite-mode nil (quote overwrite-mode-textual))) (customize-set-variable (quote overwrite-mode) overwrite-mode)) :style toggle:selected overwrite-mode] ["%_Abbrev Mode" (customize-set-variable (quote abbrev-mode) (not (default-value (quote abbrev-mode)))) :style toggle :selected (default-value (quote abbrev-mode))] ["Active Re%_gions" (customize-set-variable (quote zmacs-regions) (not zmacs-regions)) :style toggle :selected zmacs-regions] "---" ["%_Case Sensitive Search" (customize-set-variable (quote case-fold-search) (setq case-fold-search (not case-fold-search))) :style toggle :selected (not case-fold-search)] ["Case %_Matching Replace" (customize-set-variable (quote case-replace) (not case-replace)) :style toggle:selected case-replace] "---" ("%_Newline at End of File..." ["%_Don't Require" (customize-set-variable (quote require-final-newline) nil) :style radio:selected (not require-final-newline)] ["%_Require" (customize-set-variable (quote require-final-newline) t) :style radio :selected (eq require-final-newline t)] ["%_Ask" (customize-set-variable (quote require-final-newline) (quote ask)) :style radio :selected (and require-final-newline (not (eq require-final-newline t)))]) ["Add Newline When Moving Past %_End" (customize-set-variable (quote next-line-add-newlines) (not next-line-add-newlines)):style toggle :selected next-line-add-newlines]) ("%_Keyboard and Mouse" ["%_Delete Key Deletes Selection" (customize-set-variable (quote pending-delete-mode) (not pending-delete-mode)) :style toggle :selected (and (boundp (quote pending-delete-mode)) pending-delete-mode) :active (boundp (quote pending-delete-mode))] ["`kill-%_word' Stores in Clipboard" (customize-set-variable (quote kill-word-into-kill-ring) (not kill-word-into-kill-ring)) :style toggle :selected kill-word-into-kill-ring] ["`kill-%_line' Kills Whole Line at Beg" (customize-set-variable (quote kill-whole-line) (not kill-whole-line)):style toggle :selected kill-whole-line] ["Size for %_Block-Movement Commands..." (customize-set-variable (quote block-movement-size) (read-number "Block Movement Size: " t block-movement-size))] ["%_VI Emulation" (progn (toggle-viper-mode) (customize-set-variable (quote viper-mode) viper-mode)):style toggle :selected (and (boundp (quote viper-mode)) viper-mode):active (fboundp (quote toggle-viper-mode))] "----" ["S%_hifted Motion Keys Select Region" (customize-set-variable (quote shifted-motion-keys-select-region) (not shifted-motion-keys-select-region)) :style toggle :selected shifted-motion-keys-select-region] ["%_After Shifted Motion, Unshifted Motion Keys Deselect" (customize-set-variable (quote unshifted-motion-keys-deselect-region) (not unshifted-motion-keys-deselect-region)) :style toggle :selected unshifted-motion-keys-deselect-region] "----" ["%_Set Key..." global-set-key] ["%_Unset Key..." global-unset-key] "---" ["%_Mouse Paste at Text Cursor (not Clicked Location)" (customize-set-variable (quote mouse-yank-at-point) (not mouse-yank-at-point)) :style toggle :selected mouse-yank-at-point] "---" ["%_Teach Extended Commands" (customize-set-variable (quote teach-extended-commands-p) (not teach-extended-commands-p)) :style toggle :selected teach-extended-commands-p]) ("%_Printing" ["Set Printer %_Name for Generic Print Support..." (customize-set-variable (quote printer-name) (read-string "Set printer name: " printer-name))] "---" ["Command-Line %_Switches for `lpr'/`lp'..." (customize-variable (quote lpr-switches)) (boundp (quote lpr-switches))] ("%_Pretty-Print Paper Size" ["%_Letter" (customize-set-variable (quote ps-paper-type) (quote letter)) :style radio :selected (and (boundp (quote ps-paper-type)) (eq ps-paper-type (quote letter))) :active (boundp (quote ps-paper-type))] ["Lette%_r-Small" (customize-set-variable (quote ps-paper-type) (quote letter-small)) :style radio :selected (and (boundp (quote ps-paper-type)) (eq ps-paper-type (quote letter-small))) :active (boundp (quote ps-paper-type))] ["Le%_gal" (customize-set-variable (quote ps-paper-type) (quote legal)) :style radio :selected (and (boundp (quote ps-paper-type)) (eq ps-paper-type (quote legal))) :active (boundp (quote ps-paper-type))] ["%_Statement" (customize-set-variable (quote ps-paper-type) (quote statement)) :style radio :selected (and (boundp (quote ps-paper-type)) (eq ps-paper-type (quote statement))) :active (boundp (quote ps-paper-type))] ["%_Executive" (customize-set-variable (quote ps-paper-type) (quote executive)):style radio :selected (and (boundp (quote ps-paper-type)) (eq ps-paper-type (quote executive))) :active (boundp (quote ps-paper-type))] ["%_Tabloid" (customize-set-variable (quote ps-paper-type) (quote tabloid)) :style radio :selected (and (boundp (quote ps-paper-type)) (eq ps-paper-type (quote tabloid))) :active (boundp (quote ps-paper-type))] ["Le%_dger" (customize-set-variable (quote ps-paper-type) (quote ledger)) :style radio :selected (and (boundp (quote ps-paper-type)) (eq ps-paper-type (quote ledger))) :active (boundp (quote ps-paper-type))] ["A%_3" (customize-set-variable (quote ps-paper-type) (quote a3)) :style radio :selected (and (boundp (quote ps-paper-type)) (eq ps-paper-type (quote a3))) :active (boundp (quote ps-paper-type))] ["%_A4" (customize-set-variable (quote ps-paper-type) (quote a4)) :style radio :selected (and (boundp (quote ps-paper-type)) (eq ps-paper-type (quote a4))) :active (boundp (quote ps-paper-type))] ["A4s%_mall" (customize-set-variable (quote ps-paper-type) (quote a4small)) :style radio :selected (and (boundp (quote ps-paper-type)) (eq ps-paper-type (quote a4small))) :active (boundp (quote ps-paper-type))] ["B%_4" (customize-set-variable (quote ps-paper-type) (quote b4)) :style radio :selected (and (boundp (quote ps-paper-type)) (eq ps-paper-type (quote b4))) :active (boundp (quote ps-paper-type))] ["%_B5" (customize-set-variable (quote ps-paper-type) (quote b5)):style radio :selected (and (boundp (quote ps-paper-type)) (eq ps-paper-type (quote b5))) :active (boundp (quote ps-paper-type))]) ["%_Color Printing" (cond (ps-print-color-p (customize-set-variable (quote ps-print-color-p) nil) (and (boundp (quote original-face-background)) original-face-background (set-face-background (quote default) original-face-background))) (t (customize-set-variable (quote ps-print-color-p) t) (setq original-face-background (face-background-instance (quote default))) (set-face-background (quote default) "white"))) :style toggle :selected (and (boundp (quote ps-print-color-p)) ps-print-color-p) :active (boundp (quote ps-print-color-p))]) ("%_Internet" ("%_Compose Mail With" ["VM mail package" (customize-set-variable (quote mail-user-agent) (quote vm-user-agent)) :style radio :selected (eq mail-user-agent (quote vm-user-agent)) :active (get (quote vm-user-agent) (quote composefunc))] ["Bare-bones Emacs Mailer" (customize-set-variable (quote mail-user-agent) (quote sendmail-user-agent)) :style radio :selected (eq mail-user-agent (quote sendmail-user-agent))] ["MH" (customize-set-variable (quote mail-user-agent) (quote mh-e-user-agent)) :style radio :selected (eq mail-user-agent (quote mh-e-user-agent)) :active (get (quote mh-e-user-agent) (quote composefunc))] ["GNUS" (customize-set-variable (quote mail-user-agent) (quote message-user-agent)) :style radio :selected (eq mail-user-agent (quote message-user-agent)) :active (get (quote message-user-agent) (quote composefunc))]) ["Set My %_Email Address..." (customize-set-variable (quote user-mail-address) (read-string "Set email address: " user-mail-address))] ["Set %_Machine Email Name..." (customize-set-variable (quote mail-host-address) (read-string "Set machine email name: " mail-host-address))] ["Set %_SMTP Server..." (progn (require (quote smtpmail)) (customize-set-variable (quote smtpmail-smtp-server) (read-string "Set SMTP server: " smtpmail-smtp-server))):active (and (boundp (quote send-mail-function)) (eq send-mail-function (quote smtpmail-send-it)))] ["SMTP %_Debug Info" (progn (require (quote smtpmail)) (customize-set-variable (quote smtpmail-debug-info) (not smtpmail-debug-info))) :style toggle :selected (and (boundp (quote smtpmail-debug-info)) smtpmail-debug-info) :active (and (boundp (quote send-mail-function)) (eq send-mail-function (quote smtpmail-send-it)))]) ("%_Troubleshooting" ["%_Debug on Error [not saved]" (setq debug-on-error (not debug-on-error)):style toggle :selected debug-on-error] ["Debug on %_Quit [not saved]" (setq debug-on-quit (not debug-on-quit)) :style toggle :selected debug-on-quit] ["Debug on S%_ignal [not saved]" (setq debug-on-signal (not debug-on-signal)):style toggle :selected debug-on-signal] ["%_Stack Trace on Error [not saved]" (setq stack-trace-on-error (not stack-trace-on-error)) :style toggle :selected stack-trace-on-error] ["Stack Trace on Si%_gnal [not saved]" (setq stack-trace-on-signal (not stack-trace-on-signal)) :style toggle:selected stack-trace-on-signal]) ("Encodin%_g" ["Automatic %_EOL Detection" (customize-set-variable (quote eol-detection-enabled-p) (not eol-detection-enabled-p)):style toggle :selected eol-detection-enabled-p :included (not (memq system-type (quote (windows-nt cygwin32))))] ("Set Coding System of %_Buffer File" :filter (lambda (menu) (coding-system-menu-filter (lambda (entry) (set-buffer-file-coding-system entry)) (lambda (entry) t)))) ("Set Coding System of %_Terminal" :filter (lambda (menu) (coding-system-menu-filter (lambda (entry) (set-terminal-coding-system entry)) (lambda (entry) nil)))) ("Set Coding System of %_Keyboard" :filter (lambda (menu) (coding-system-menu-filter (lambda (entry) (set-keyboard-coding-system entry)) (lambda (entry) nil)))) ("Set Coding System of %_Process" :filter (lambda (menu) (coding-system-menu-filter (lambda (entry) (set-buffer-process-coding-system entry)) (lambda (entry) (get-buffer-process (current-buffer))))))) (\,＠ (when (featurep (quote mule)) (quote (("Internationa%_l" ("Set %_Language Environment" :filter (lambda (menu) (menu-split-long-menu-and-sort (mapcar (function (lambda (entry) (backquote [(\, (car entry)) (set-language-environment (quote (\, (car entry)))) :style radio :selected (\, (equal (car entry) current-language-environment))]))) language-info-alist)))) ["%_Toggle Input Method" toggle-input-method] ["Select %_Input Method" set-input-method]))))) "-----" ("%_Display" (\,＠ (if (featurep (quote scrollbar)) (quote (["%_Scrollbars" (customize-set-variable (quote scrollbars-visible-p) (not scrollbars-visible-p)):style toggle :selected scrollbars-visible-p])))) ["%_Wrap Long Lines" (progn (setq truncate-lines (not truncate-lines)) (customize-set-variable (quote truncate-lines) truncate-lines)) :style toggle :selected (not truncate-lines)] "----" ["%_3D Modeline" (customize-set-variable (quote modeline-3d-p) (not modeline-3d-p)) :style toggle :selected modeline-3d-p] ("Modeline %_Horizontal Scrolling" ["%_None" (customize-set-variable (quote modeline-scrolling-method) nil) :style radio :selected (not modeline-scrolling-method)] ["As %_Text" (customize-set-variable (quote modeline-scrolling-method) t) :style radio :selected (eq modeline-scrolling-method t)] ["As %_Scrollbar" (customize-set-variable (quote modeline-scrolling-method) (quote scrollbar)) :style radio :selected (eq modeline-scrolling-method (quote scrollbar))]) (\,＠ (if (featurep (quote toolbar)) (quote ("---" ["%_Toolbars Visible" (customize-set-variable (quote toolbar-visible-p) (not toolbar-visible-p)):style toggle :selected toolbar-visible-p] ["Toolbars Ca%_ptioned" (customize-set-variable (quote toolbar-captioned-p) (not toolbar-captioned-p)):style toggle :active toolbar-visible-p :selected toolbar-captioned-p] ("Default Toolba%_r Location" ["%_Top" (customize-set-variable (quote default-toolbar-position) (quote top)) :style radio :active toolbar-visible-p:selected (eq default-toolbar-position (quote top))] ["%_Bottom" (customize-set-variable (quote default-toolbar-position) (quote bottom)) :style radio :active toolbar-visible-p :selected (eq default-toolbar-position (quote bottom))] ["%_Left" (customize-set-variable (quote default-toolbar-position) (quote left)) :style radio :active toolbar-visible-p :selected (eq default-toolbar-position (quote left))] ["%_Right" (customize-set-variable (quote default-toolbar-position) (quote right)) :style radio :active toolbar-visible-p:selected (eq default-toolbar-position (quote right))]))))) (\,＠ (if (featurep (quote gutter)) (quote ("---" ["B%_uffers Tab Visible" (customize-set-variable (quote gutter-buffers-tab-visible-p) (not gutter-buffers-tab-visible-p)):style toggle :selected gutter-buffers-tab-visible-p] ("Default %_Gutter Location" ["%_Top" (customize-set-variable (quote default-gutter-position) (quote top)) :style radio :selected (eq default-gutter-position (quote top))] ["%_Bottom" (customize-set-variable (quote default-gutter-position) (quote bottom)) :style radio :selected (eq default-gutter-position (quote bottom))] ["%_Left" (customize-set-variable (quote default-gutter-position) (quote left)) :style radio :selected (eq default-gutter-position (quote left))] ["%_Right" (customize-set-variable (quote default-gutter-position) (quote right)) :style radio :selected (eq default-gutter-position (quote right))]))))) "-----" ["%_Blinking Cursor" (customize-set-variable (quote blink-cursor-mode) (not blink-cursor-mode)) :style toggle :selected (and (boundp (quote blink-cursor-mode)) blink-cursor-mode) :active (boundp (quote blink-cursor-mode))] ["Bl%_ock Cursor" (progn (customize-set-variable (quote bar-cursor) nil) (force-cursor-redisplay)) :style radio :selected (null bar-cursor)] ["Bar Cursor (%_1 Pixel)" (progn (customize-set-variable (quote bar-cursor) t) (force-cursor-redisplay)) :style radio :selected (eq bar-cursor t)] ["Bar Cursor (%_2 Pixels)" (progn (customize-set-variable (quote bar-cursor) 2) (force-cursor-redisplay)) :style radio :selected (and bar-cursor (not (eq bar-cursor t)))] "----" ("Pa%_ren Highlighting" ["%_None" (customize-set-variable (quote paren-mode) nil) :style radio :selected (and (boundp (quote paren-mode)) (not paren-mode)) :active (boundp (quote paren-mode))] ["%_Blinking Paren" (customize-set-variable (quote paren-mode) (quote blink-paren)) :style radio :selected (and (boundp (quote paren-mode)) (eq paren-mode (quote blink-paren))) :active (boundp (quote paren-mode))] ["%_Steady Paren" (customize-set-variable (quote paren-mode) (quote paren)) :style radio :selected (and (boundp (quote paren-mode)) (eq paren-mode (quote paren))) :active (boundp (quote paren-mode))] ["%_Expression" (customize-set-variable (quote paren-mode) (quote sexp)) :style radio :selected (and (boundp (quote paren-mode)) (eq paren-mode (quote sexp))) :active (boundp (quote paren-mode))]) "------" ["%_Line Numbers" (progn (customize-set-variable (quote line-number-mode) (not line-number-mode)) (redraw-modeline)) :style toggle :selected line-number-mode] ["%_Column Numbers" (progn (customize-set-variable (quote column-number-mode) (not column-number-mode)) (redraw-modeline)):style toggle :selected column-number-mode] ("\"Other %_Window\" Location" ["%_Always in Same Frame" (customize-set-variable (quote get-frame-for-buffer-default-instance-limit) nil) :style radio :selected (null get-frame-for-buffer-default-instance-limit)] ["Other Frame (%_2 Frames Max)" (customize-set-variable (quote get-frame-for-buffer-default-instance-limit) 2) :style radio :selected (eq 2 get-frame-for-buffer-default-instance-limit)] ["Other Frame (%_3 Frames Max)" (customize-set-variable (quote get-frame-for-buffer-default-instance-limit) 3) :style radio :selected (eq 3 get-frame-for-buffer-default-instance-limit)] ["Other Frame (%_4 Frames Max)" (customize-set-variable (quote get-frame-for-buffer-default-instance-limit) 4):style radio :selected (eq 4 get-frame-for-buffer-default-instance-limit)] ["Other Frame (%_5 Frames Max)" (customize-set-variable (quote get-frame-for-buffer-default-instance-limit) 5) :style radio :selected (eq 5 get-frame-for-buffer-default-instance-limit)] ["Always Create %_New Frame" (customize-set-variable (quote get-frame-for-buffer-default-instance-limit) 0) :style radio :selected (eq 0 get-frame-for-buffer-default-instance-limit)] "-----" ["%_Temp Buffers Always in Same Frame" (customize-set-variable (quote temp-buffer-show-function) (quote show-temp-buffer-in-current-frame)) :style radio :selected (eq temp-buffer-show-function (quote show-temp-buffer-in-current-frame))] ["Temp Buffers %_Like Other Buffers" (customize-set-variable (quote temp-buffer-show-function) nil) :style radio :selected (null temp-buffer-show-function)] "-----" ["%_Make Current Frame Gnuserv Target" (customize-set-variable (quote gnuserv-frame) (if (eq gnuserv-frame t) nil t)) :style toggle :selected (and (boundp (quote gnuserv-frame)) (eq gnuserv-frame t)) :active (boundp (quote gnuserv-frame))])) ("%_Menubars" ["%_Frame-Local Font Menu" (customize-set-variable (quote font-menu-this-frame-only-p) (not font-menu-this-frame-only-p)) :style toggle :selected (and (boundp (quote font-menu-this-frame-only-p)) font-menu-this-frame-only-p)] ["%_Alt/Meta Selects Menu Items" (if (eq menu-accelerator-enabled (quote menu-force)) (customize-set-variable (quote menu-accelerator-enabled) nil) (customize-set-variable (quote menu-accelerator-enabled) (quote menu-force))) :style toggle:selected (eq menu-accelerator-enabled (quote menu-force))] "----" ["Buffers Menu %_Length..." (customize-set-variable (quote buffers-menu-max-size) (let ((val (read-number "Enter number of buffers to display (or 0 for unlimited): "))) (if (eq val 0) nil val)))] ["%_Multi-Operation Buffers Sub-Menus" (customize-set-variable (quote complex-buffers-menu-p) (not complex-buffers-menu-p)):style toggle :selected complex-buffers-menu-p] ["S%_ubmenus for Buffer Groups" (customize-set-variable (quote buffers-menu-submenus-for-groups-p) (not buffers-menu-submenus-for-groups-p)) :style toggle :selected buffers-menu-submenus-for-groups-p] ["%_Verbose Buffer Menu Entries" (if (eq buffers-menu-format-buffer-line-function (quote slow-format-buffers-menu-line)) (customize-set-variable (quote buffers-menu-format-buffer-line-function) (quote format-buffers-menu-line)) (customize-set-variable (quote buffers-menu-format-buffer-line-function) (quote slow-format-buffers-menu-line))):style toggle :selected (eq buffers-menu-format-buffer-line-function (quote slow-format-buffers-menu-line))] ("Buffers Menu %_Sorting" ["%_Most Recently Used" (progn (customize-set-variable (quote buffers-menu-sort-function) nil) (customize-set-variable (quote buffers-menu-grouping-function) nil)):style radio :selected (null buffers-menu-sort-function)] ["%_Alphabetically" (progn (customize-set-variable (quote buffers-menu-sort-function) (quote sort-buffers-menu-alphabetically)) (customize-set-variable (quote buffers-menu-grouping-function) nil)) :style radio :selected (eq (quote sort-buffers-menu-alphabetically) buffers-menu-sort-function)] ["%_By Major Mode, Then Alphabetically" (progn (customize-set-variable (quote buffers-menu-sort-function) (quote sort-buffers-menu-by-mode-then-alphabetically)) (customize-set-variable (quote buffers-menu-grouping-function) (quote group-buffers-menu-by-mode-then-alphabetically))):style radio :selected (eq (quote sort-buffers-menu-by-mode-then-alphabetically) buffers-menu-sort-function)]) "---" ["%_Ignore Scaled Fonts" (customize-set-variable (quote font-menu-ignore-scaled-fonts) (not font-menu-ignore-scaled-fonts)) :style toggle :selected (and (boundp (quote font-menu-ignore-scaled-fonts)) font-menu-ignore-scaled-fonts)]) ("S%_yntax Highlighting" ["%_In This Buffer" (progn (font-lock-mode) (customize-set-variable (quote font-lock-mode) font-lock-mode)) :style toggle :selected (and (boundp (quote font-lock-mode)) font-lock-mode) :active (boundp (quote font-lock-mode))] ["%_Automatic" (customize-set-variable (quote font-lock-auto-fontify) (not font-lock-auto-fontify)) :style toggle:selected (and (boundp (quote font-lock-auto-fontify)) font-lock-auto-fontify):active (fboundp (quote font-lock-mode))] "-----" ["Force %_Rehighlight in this Buffer" (customize-set-variable (quote font-lock-auto-fontify) (not font-lock-auto-fontify)) :style toggle :selected (and (boundp (quote font-lock-auto-fontify)) font-lock-auto-fontify) :active (fboundp (quote font-lock-mode))] "-----" ["%_Fonts" (progn (require (quote font-lock)) (font-lock-use-default-fonts) (customize-set-variable (quote font-lock-use-fonts) t) (customize-set-variable (quote font-lock-use-colors) nil) (font-lock-mode 1)) :style radio :selected (and (boundp (quote font-lock-use-fonts)) font-lock-use-fonts):active (fboundp (quote font-lock-mode))] ["%_Colors" (progn (require (quote font-lock)) (font-lock-use-default-colors) (customize-set-variable (quote font-lock-use-colors) t) (customize-set-variable (quote font-lock-use-fonts) nil) (font-lock-mode 1)) :style radio :selected (and (boundp (quote font-lock-use-colors)) font-lock-use-colors) :active (boundp (quote font-lock-mode))] "-----" ["%_1 Least" (progn (require (quote font-lock)) (if (or (and (not (integerp font-lock-maximum-decoration)) (not (eq t font-lock-maximum-decoration))) (and (integerp font-lock-maximum-decoration) (<= font-lock-maximum-decoration 0))) nil (customize-set-variable (quote font-lock-maximum-decoration) nil) (font-lock-recompute-variables))) :style radio :active (fboundp (quote font-lock-mode)) :selected (and (boundp (quote font-lock-maximum-decoration)) (or (and (not (integerp font-lock-maximum-decoration)) (not (eq t font-lock-maximum-decoration))) (and (integerp font-lock-maximum-decoration) (<= font-lock-maximum-decoration 0))))] ["%_2 More" (progn (require (quote font-lock)) (if (and (integerp font-lock-maximum-decoration) (= 1 font-lock-maximum-decoration)) nil (customize-set-variable (quote font-lock-maximum-decoration) 1) (font-lock-recompute-variables))):style radio :active (fboundp (quote font-lock-mode)) :selected (and (boundp (quote font-lock-maximum-decoration)) (integerp font-lock-maximum-decoration) (= 1 font-lock-maximum-decoration))] ["%_3 Even More" (progn (require (quote font-lock)) (if (and (integerp font-lock-maximum-decoration) (= 2 font-lock-maximum-decoration)) nil (customize-set-variable (quote font-lock-maximum-decoration) 2) (font-lock-recompute-variables))) :style radio:active (fboundp (quote font-lock-mode)) :selected (and (boundp (quote font-lock-maximum-decoration)) (integerp font-lock-maximum-decoration) (= 2 font-lock-maximum-decoration))] ["%_4 Most" (progn (require (quote font-lock)) (if (or (eq font-lock-maximum-decoration t) (and (integerp font-lock-maximum-decoration) (>= font-lock-maximum-decoration 3))) nil (customize-set-variable (quote font-lock-maximum-decoration) t) (font-lock-recompute-variables))):style radio :active (fboundp (quote font-lock-mode)) :selected (and (boundp (quote font-lock-maximum-decoration)) (or (eq font-lock-maximum-decoration t) (and (integerp font-lock-maximum-decoration) (>= font-lock-maximum-decoration 3))))] "-----" ["Lazy %_Lock" (progn (lazy-lock-mode) (customize-set-variable (quote lazy-lock-mode) lazy-lock-mode) (redraw-modeline)):active (and (boundp (quote font-lock-mode)) (boundp (quote lazy-lock-mode)) font-lock-mode) :style toggle :selected (and (boundp (quote lazy-lock-mode)) lazy-lock-mode)] ["Lazy %_Shot" (progn (lazy-shot-mode) (customize-set-variable (quote lazy-shot-mode) lazy-shot-mode) (redraw-modeline)):active (and (boundp (quote font-lock-mode)) (boundp (quote lazy-shot-mode)) font-lock-mode) :style toggle :selected (and (boundp (quote lazy-shot-mode)) lazy-shot-mode)] ["Cac%_hing" (progn (fast-lock-mode) (customize-set-variable (quote fast-lock-mode) fast-lock-mode) (redraw-modeline)) :active (and (boundp (quote font-lock-mode)) (boundp (quote fast-lock-mode)) font-lock-mode):style toggle :selected (and (boundp (quote fast-lock-mode)) fast-lock-mode)]) ("%_Font" :filter font-menu-family-constructor) ("Font Si%_ze":filter font-menu-size-constructor) ["Edit Fa%_ces..." (customize-face nil)] "-----" ["Edit I%_nit File" (let ((el-file (or user-init-file "~/.xemacs/init.el"))) (if (string-match "\\.elc$" el-file) (setq el-file (substring user-init-file 0 (1- (length el-file))))) (find-file el-file) (or (eq major-mode (quote emacs-lisp-mode)) (emacs-lisp-mode)))] ["%_Save Options to Custom File" customize-save-customized]) ("%_Buffers" :filter buffers-menu-filter ["Go To %_Previous Buffer" switch-to-other-buffer] ["Go To %_Buffer..." switch-to-buffer] "----" ["%_List All Buffers" list-all-buffers] ["%_Delete Buffer" kill-this-buffer :suffix (if put-buffer-names-in-file-menu (buffer-name) "")] "----") nil ("%_Help" ["%_About XEmacs..." about-xemacs] ["%_Home Page (www.xemacs.org)" xemacs-www-page :active (fboundp (quote browse-url))] ["What's %_New in XEmacs" view-emacs-news] ["B%_eta Info" describe-beta:included (string-match "beta" emacs-version)] "-----" ("%_Info (Online Docs)" ["%_Info Contents" (Info-goto-node "(dir)")] "-----" ["XEmacs %_User's Manual" (Info-goto-node "(XEmacs)")] ["XEmacs %_Lisp Reference Manual" (Info-goto-node "(Lispref)")] ["All About %_Packages" (Info-goto-node "(xemacs)Packages")] ["%_Getting Started with XEmacs" (Info-goto-node "(New-Users-Guide)")] ["%_XEmacs Internals Manual" (Info-goto-node "(Internals)")] ["%_How to Use Info" (Info-goto-node "(Info)")] "-----" ["Lookup %_Key Sequence in User's Manual..." Info-goto-emacs-key-command-node] ["Lookup %_Command in User's Manual..." Info-goto-emacs-command-node] ["Lookup %_Function in Lisp Reference..." Info-elisp-ref] "-----" ["Find %_Topic in User's Manual/Lispref..." Info-search-index-in-xemacs-and-lispref] ["%_Search Text in User's Manual..." Info-search-text-in-xemacs] ["S%_earch Text in Lisp Reference..." Info-search-text-in-lispref]) ("XEmacs %_FAQ" ["%_FAQ (local)" xemacs-local-faq] ["FAQ via %_WWW" xemacs-www-faq :active (fboundp (quote browse-url))]) ("%_Tutorials" :filter tutorials-menu-filter) ("%_Samples" ["View Sample %_init.el" view-sample-init-el :active (locate-data-file "sample.init.el")] ["View Sample .%_gtkrc" (Help-find-file (locate-data-file "sample.gtkrc")):included (featurep (quote gtk)) :active (locate-data-file "sample.gtkrc")] ["View Sample .%_Xresources" (Help-find-file (locate-data-file "sample.Xresources")):included (featurep (quote x)) :active (locate-data-file "sample.Xresources")] ["View Sample %_enriched.doc" (Help-find-file (locate-data-file "enriched.doc")) :active (locate-data-file "enriched.doc")]) ("%_Commands, Variables, Keys" ["Describe %_Mode" describe-mode] ["%_Apropos..." hyper-apropos] ["%_Command-Only Apropos..." command-hyper-apropos] ["Apropos %_Docs..." apropos-documentation] "-----" ["Describe %_Key..." describe-key] ["Show %_Bindings" describe-bindings] ["Show M%_ouse Bindings" describe-pointer] "-----" ["Describe %_Function..." describe-function] ["Describe %_Variable..." describe-variable] ["%_Locate Command in Keymap..." where-is]) (\,＠ (when (featurep (quote mule)) (quote (("Internationa%_l" ("Describe %_Language Support" :filter (lambda (menu) (menu-split-long-menu-and-sort (mapcar (function (lambda (entry) (backquote [(\, (car entry)) (describe-language-environment (quote (\, (car entry)))) :style radio :selected (\, (equal (car entry) current-language-environment))]))) language-info-alist)))) ["Describe %_Input Method" describe-input-method] ["Describe Current %_Coding Systems" describe-current-coding-system] ["Show Character %_Table" view-charset-by-menu] ["Show %_Diagnosis for MULE" mule-diag :active nil] ["Show \"%_hello\" in Many Languages" view-hello-file]))))) ("%_Other" ["%_Current Installation Info" describe-installation :active (boundp (quote Installation-string))] ["%_Known Problems" view-xemacs-problems] ["%_Obtaining the Latest Version" describe-distribution] ["%_No Warranty" describe-no-warranty] ["XEmacs %_License" describe-copying] ["Find %_Packages" finder-by-keyword] ["View %_Splash Screen" xemacs-splash-buffer] ["%_Unix Manual..." manual-entry]) "-----" ["Recent %_Messages" (view-lossage t)] ["Recent %_Keystrokes" view-lossage] ["Recent %_Warnings" view-warnings] ["Send %_Bug Report..." report-xemacs-bug :active (fboundp (quote report-xemacs-bug))])))))
# (unwind-protect ...)
#<compiled-function nil "...(43)" [byte-compile-unresolved-functions byte-compile-inbuffer 1 " \n " nil looking-at ";" byte-compile-file-form read byte-compile-flush-pending byte-compile-warn-about-unresolved-functions] 3>()
# (unwind-protect ...)
call-with-condition-handler(#<compiled-function (error-info) "...(4)" [error-info byte-compile-report-error] 2> #<compiled-function nil "...(43)" [byte-compile-unresolved-functions byte-compile-inbuffer 1 " \n " nil looking-at ";" byte-compile-file-form read byte-compile-flush-pending byte-compile-warn-about-unresolved-functions] 3>)
# (unwind-protect ...)
# bind (byte-compile-warnings-beginning byte-compile-point-max-prev byte-compile-log-buffer byte-compile-macro-environment byte-compile-function-environment byte-compile-autoload-environment byte-compile-unresolved-functions byte-compile-bound-variables byte-compile-free-references byte-compile-free-assignments byte-compile-verbose byte-optimize byte-compile-emacs19-compatibility byte-compile-dynamic byte-compile-dynamic-docstrings byte-compile-warnings byte-compile-file-domain byte-compile-outbuffer float-output-format case-fold-search print-length print-level byte-compile-constants byte-compile-variables byte-compile-tag-number byte-compile-depth byte-compile-maxdepth byte-compile-output eval filename byte-compile-inbuffer)
byte-compile-from-buffer(#<buffer " *Compiler Input*"> "c:\\Hacking\\cvs.xemacs.org\\XEmacs\\xemacs-21.5-clean\\lisp\\menubar-items.el")
# bind (byte-compile-current-file target-file input-buffer output-buffer byte-compile-dest-file load filename)
byte-compile-file("c:\\Hacking\\cvs.xemacs.org\\XEmacs\\xemacs-21.5-clean\\lisp\\menubar-items.el")
byte-code("..." [file byte-compile-file t] 2)
<1 line deleted by Adrian Aichner>
# bind (file)
batch-byte-compile-1("c:\\Hacking\\cvs.xemacs.org\\XEmacs\\xemacs-21.5-clean\\lisp\\menubar-items.el")
# bind (error file-to-process)
batch-byte-compile-one-file()
# bind (error)
batch-byte-compile()
funcall(batch-byte-compile)
# bind (arg)
command-line-do-funcall("-f")
funcall(command-line-do-funcall "-f")
(cond (end-of-options (setq file-p t)) ((setq tem (when (eq (aref arg 0) ?-) (or (assoc arg command-switch-alist) (assoc (substring arg 1) command-switch-alist)))) (funcall (cdr tem) arg)) ((string-match "\\`\\+[0-9]+\\'" arg) (setq line (string-to-int arg))) ((or (string= arg "-") (string= arg "--")) (setq end-of-options t)) (t (setq file-p t)))
(while command-line-args-left (setq arg (pop command-line-args-left)) (cond (end-of-options (setq file-p t)) ((setq tem (when (eq (aref arg 0) ?-) (or (assoc arg command-switch-alist) (assoc (substring arg 1) command-switch-alist)))) (funcall (cdr tem) arg)) ((string-match "\\`\\+[0-9]+\\'" arg) (setq line (string-to-int arg))) ((or (string= arg "-") (string= arg "--")) (setq end-of-options t)) (t (setq file-p t))) (when file-p (setq file-p nil) (incf file-count) (setq arg (expand-file-name arg dir)) (cond ((= file-count 1) (find-file arg)) (noninteractive (find-file arg)) (t (find-file-other-window arg))) (when line (goto-line line) (setq line nil))))
# bind (tem arg file-p end-of-options line file-count dir)
(let ((dir command-line-default-directory) (file-count 0) (line nil) (end-of-options nil) file-p arg tem) (while command-line-args-left (setq arg (pop command-line-args-left)) (cond (end-of-options (setq file-p t)) ((setq tem (when (eq (aref arg 0) ?-) (or (assoc arg command-switch-alist) (assoc (substring arg 1) command-switch-alist)))) (funcall (cdr tem) arg)) ((string-match "\\`\\+[0-9]+\\'" arg) (setq line (string-to-int arg))) ((or (string= arg "-") (string= arg "--")) (setq end-of-options t)) (t (setq file-p t))) (when file-p (setq file-p nil) (incf file-count) (setq arg (expand-file-name arg dir)) (cond ((= file-count 1) (find-file arg)) (noninteractive (find-file arg)) (t (find-file-other-window arg))) (when line (goto-line line) (setq line nil)))))
(cond ((null command-line-args-left) (unless noninteractive (run-hooks (quote term-setup-hook)) (setq term-setup-hook nil) (when (string= (buffer-name) "*scratch*") (unless (or inhibit-startup-message (input-pending-p)) (let (tmout) (unwind-protect (catch (quote tmout) (setq tmout (add-timeout startup-message-timeout (lambda (ignore) (condition-case nil (throw (quote tmout) t) (error nil))) nil)) (display-splash-screen) (or nil (goto-char (point-min))) (sit-for 0) (setq unread-command-event (next-command-event))) (when tmout (disable-timeout tmout))))) (with-current-buffer (get-buffer "*scratch*") (erase-buffer) (when (stringp initial-scratch-message) (insert initial-scratch-message)) (set-buffer-modified-p nil))))) (t (let ((dir command-line-default-directory) (file-count 0) (line nil) (end-of-options nil) file-p arg tem) (while command-line-args-left (setq arg (pop command-line-args-left)) (cond (end-of-options (setq file-p t)) ((setq tem (when (eq (aref arg 0) ?-) (or (assoc arg command-switch-alist) (assoc (substring arg 1) command-switch-alist)))) (funcall (cdr tem) arg)) ((string-match "\\`\\+[0-9]+\\'" arg) (setq line (string-to-int arg))) ((or (string= arg "-") (string= arg "--")) (setq end-of-options t)) (t (setq file-p t))) (when file-p (setq file-p nil) (incf file-count) (setq arg (expand-file-name arg dir)) (cond ((= file-count 1) (find-file arg)) (noninteractive (find-file arg)) (t (find-file-other-window arg))) (when line (goto-line line) (setq line nil)))))))
command-line-1()
# bind (command-line-args-left)
(let ((command-line-args-left (cdr command-line-args))) (let ((debugger (quote early-error-handler)) (debug-on-error t)) (setq command-line-args-left (command-line-early command-line-args-left)) (when (eq system-type (quote windows-nt)) (declare-fboundp (init-mswindows-at-startup))) (when (featurep (quote toolbar)) (init-toolbar-location)) (when (featurep (quote mule)) (declare-fboundp (init-mule-at-startup))) (if (featurep (quote toolbar)) (if (featurep (quote infodock)) (require (quote id-x-toolbar)) (init-toolbar))) (when (and initial-window-system (not noninteractive)) (funcall (intern (concat "init-" (symbol-name initial-window-system) "-win")))) (frame-initialize)) (startup-initialize-custom-faces) (if (featurep (quote menubar)) (init-menubar-at-startup)) (load-init-file) (with-current-buffer (get-buffer "*scratch*") (erase-buffer) (set-buffer-modified-p nil) (when (eq major-mode (quote fundamental-mode)) (funcall initial-major-mode)) (font-lock-set-defaults)) (when (and (eq (quote tty) (console-type)) (not (noninteractive))) (load-terminal-library)) (command-line-1) (setq inhibit-warning-display nil) (when (noninteractive) (kill-emacs t)))
command-line()
(if (noninteractive) (command-line) (condition-case data (command-line) (t (setq error-data data))))
# bind (error-data)
(let (error-data) (if (noninteractive) (command-line) (condition-case data (command-line) (t (setq error-data data)))) (setq default-directory (abbreviate-file-name default-directory)) (if auto-save-list-file-prefix (setq auto-save-list-file-name (expand-file-name (format "%s%d-%s" auto-save-list-file-prefix (emacs-pid) (system-name))))) (run-hooks (quote emacs-startup-hook)) (and term-setup-hook (run-hooks (quote term-setup-hook))) (setq term-setup-hook nil) (frame-notice-user-settings) (when window-setup-hook (run-hooks (quote window-setup-hook))) (setq window-setup-hook nil) (if error-data (signal-error (car error-data) (cdr error-data))))
(if command-line-processed (message "Back to top level.") (setq command-line-processed t) (when (getenv "XEMACSDEBUG") (eval (read (getenv "XEMACSDEBUG")))) (let ((value (user-home-directory))) (if (and value (< (length value) (length default-directory)) (equal (file-attributes default-directory) (file-attributes value))) (setq default-directory (file-name-as-directory value)))) (setq default-directory (abbreviate-file-name default-directory)) (initialize-xemacs-paths) (startup-set-invocation-environment) (startup-setup-paths (cond (inhibit-all-packages t) (inhibit-early-packages (quote (early))) (t nil)) nil) (startup-setup-paths-warning) (startup-load-autoloads) (let (error-data) (if (noninteractive) (command-line) (condition-case data (command-line) (t (setq error-data data)))) (setq default-directory (abbreviate-file-name default-directory)) (if auto-save-list-file-prefix (setq auto-save-list-file-name (expand-file-name (format "%s%d-%s" auto-save-list-file-prefix (emacs-pid) (system-name))))) (run-hooks (quote emacs-startup-hook)) (and term-setup-hook (run-hooks (quote term-setup-hook))) (setq term-setup-hook nil) (frame-notice-user-settings) (when window-setup-hook (run-hooks (quote window-setup-hook))) (setq window-setup-hook nil) (if error-data (signal-error (car error-data) (cdr error-data)))) (if load-user-init-file-p (maybe-migrate-user-init-file)))
normal-top-level()
# (condition-case ... . error)
# (catch top-level ...)
Fatal error.
Your files have been auto-saved.
byte-compile-file-form((defconst default-menubar (backquote (("%_File" ["%_Open..." find-file] ["Open in Other %_Window..." find-file-other-window] ["Open in New %_Frame..." find-file-other-frame] ("Open with Specified %_Encoding":filter (lambda (menu) (coding-system-menu-filter (lambda (entry) (let ((coding-system-for-read entry)) (call-interactively (quote find-file)))) (lambda (entry) t) t))) ["%_Hex Edit File..." hexl-find-file :active (fboundp (quote hexl-find-file))] ["%_Insert File..." insert-file] ["%_View File..." view-file] "------" ["%_New Frame" make-frame] ["Frame on Other %_Display..." make-frame-on-display :active (fboundp (quote make-frame-on-display))] ["%_Close Frame" delete-frame :active (not (eq (next-frame (selected-frame) (quote nomini) (quote window-system)) (selected-frame)))] "-----" ["%_Save" save-buffer :active (buffer-modified-p) :suffix (if put-buffer-names-in-file-menu (buffer-name) "")] ["Save %_As..." write-file] ["Save So%_me Buffers" save-some-buffers] "-----" (\,＠ (if (valid-specifier-tag-p (quote msprinter)) (quote (["Page Set%_up..." generic-page-setup])))) ["%_Print" generic-print-buffer:active (or (valid-specifier-tag-p (quote msprinter)) (and (not (eq system-type (quote windows-nt))) (fboundp (quote lpr-region)))):suffix (if (region-active-p) "Selection..." (if put-buffer-names-in-file-menu (concat (buffer-name) "...") "..."))] (\,＠ (unless (valid-specifier-tag-p (quote msprinter)) (quote (["Prett%_y-Print" ps-print-buffer-with-faces:active (fboundp (quote ps-print-buffer-with-faces)) :suffix (if put-buffer-names-in-file-menu (buffer-name) "")])))) "-----" ["%_Revert Buffer" revert-buffer:active (or buffer-file-name revert-buffer-function) :suffix (if put-buffer-names-in-file-menu (buffer-name) "")] ("Rever%_t/Recover" ("Revert Buffer with Specified %_Encoding" :filter (lambda (menu) (coding-system-menu-filter (lambda (entry) (let ((coding-system-for-read entry)) (revert-buffer))) (lambda (entry) (or buffer-file-name revert-buffer-function)) t))) ["Re%_cover Buffer from Autosave" (recover-file buffer-file-name) :active buffer-file-name :suffix (if put-buffer-names-in-file-menu (buffer-name) "")] ["Recover %_Session..." recover-session]) "-----" ["E%_xit XEmacs" save-buffers-kill-emacs]) ("%_Edit" ["%_Undo" undo :active (and (not (eq buffer-undo-list t)) (or buffer-undo-list pending-undo-list)) :suffix (if (eq last-command (quote undo)) "More" "")] ["%_Redo" redo :included (fboundp (quote redo)) :active (not (or (eq buffer-undo-list t) (eq last-buffer-undo-list nil) (not (or (eq last-buffer-undo-list buffer-undo-list) (and (null (car-safe buffer-undo-list)) (eq last-buffer-undo-list (cdr-safe buffer-undo-list))))) (or (eq buffer-undo-list pending-undo-list) (eq (cdr buffer-undo-list) pending-undo-list)))) :suffix (if (eq last-command (quote redo)) "More" "")] "----" ["Cu%_t" kill-primary-selection :active (selection-owner-p)] ["%_Copy" copy-primary-selection :active (selection-owner-p)] ["%_Paste" yank-clipboard-selection:active (selection-exists-p (quote CLIPBOARD))] ["%_Delete" delete-primary-selection :active (selection-owner-p)] "----" ["Select %_All" mark-whole-buffer] ["Select Pa%_ge" mark-page] ["Select Paragrap%_h" mark-paragraph] ["Re%_select Region" activate-region :active (mark t)] "----" ["%_Find..." make-search-dialog] ["R%_eplace..." query-replace] ["Replace (Rege%_xp)..." query-replace-regexp] ["List %_Matching Lines..." list-matching-lines]) ("%_View" ["%_Split Window" split-window-vertically] ["S%_plit Window (Side by Side)" split-window-horizontally] ["%_Un-Split (Keep This)" delete-other-windows :active (not (one-window-p t))] ["Un-Split (Keep %_Others)" delete-window :active (not (one-window-p t))] ["Balance %_Windows" balance-windows :active (not (one-window-p t))] ["Shrink Window to %_Fit" shrink-window-if-larger-than-buffer] "----" ("N%_arrow" ["%_Narrow to Region" narrow-to-region :active (region-exists-p)] ["Narrow to %_Page" narrow-to-page] ["Narrow to %_Defun" narrow-to-defun] "----" ["%_Widen" widen :active (or (/= (point-min) 1) (/= (point-max) (1+ (buffer-size))))]) "----" ["%_Goto Line..." goto-line] ["Beginning of %_Defun" beginning-of-defun] ["%_End of Defun" end-of-defun] ["%_Count Lines in Buffer" count-lines-buffer:included (not (region-active-p))] ["%_Count Lines in Region" count-lines-region:included (region-active-p)] "----" ["%_Jump to Previous Mark" (set-mark-command t) :active (mark t)] ["Se%_t Bookmark" bookmark-set :active (fboundp (quote bookmark-set))] ("%_Bookmarks" :filter (lambda (menu) (let ((alist (and-boundp (quote bookmark-alist) bookmark-alist))) (if (not alist) menu (let ((items (submenu-generate-accelerator-spec (mapcar (function (lambda (bmk) (backquote [(\, bmk) (bookmark-jump (quote (\, bmk)))]))) (bookmark-all-names))))) (append menu (quote ("---")) items))))) "---" ["Insert %_Contents" bookmark-menu-insert :active (fboundp (quote bookmark-menu-insert))] ["Insert L%_ocation" bookmark-menu-locate :active (fboundp (quote bookmark-menu-locate))] "---" ["%_Rename Bookmark" bookmark-menu-rename :active (fboundp (quote bookmark-menu-rename))] ("%_Delete Bookmark" :filter (lambda (menu) (submenu-generate-accelerator-spec (mapcar (function (lambda (bmk) (backquote [(\, bmk) (bookmark-delete (quote (\, bmk)))]))) (bookmark-all-names))))) ["%_Edit Bookmark List" bookmark-bmenu-list :active (and-boundp (quote bookmark-alist) bookmark-alist)] "---" ["%_Save Bookmarks" bookmark-save:active (and-boundp (quote bookmark-alist) bookmark-alist)] ["Save Bookmarks %_As..." bookmark-write :active (and-boundp (quote bookmark-alist) bookmark-alist)] ["%_Load a Bookmark File" bookmark-load :active (fboundp (quote bookmark-load))])) ("C%_mds" ["Repeat Last Comple%_x Command..." repeat-complex-command] ["E%_valuate Lisp Expression..." eval-expression] ["Execute %_Named Command..." execute-extended-command] "----" ["Start %_Defining Macro" start-kbd-macro :included (not defining-kbd-macro)] ["Stop %_Defining Macro" end-kbd-macro :included defining-kbd-macro] ["%_Execute Last Macro" call-last-kbd-macro :active last-kbd-macro] ("Other %_Macro" ["Edit %_Last Macro" edit-last-kbd-macro :active last-kbd-macro] ["%_Edit Macro..." edit-kbd-macro] ["%_Append to Last Macro" (start-kbd-macro t) :active (and (not defining-kbd-macro) last-kbd-macro)] "---" ["%_Name Last Macro..." name-last-kbd-macro:active last-kbd-macro] ["Assign Last Macro to %_Key..." assign-last-kbd-macro-to-key :active (and last-kbd-macro (fboundp (quote assign-last-kbd-macro-to-key)))] "---" ["E%_xecute Last Macro on Region Lines":active (and last-kbd-macro (region-exists-p))] "---" ["%_Query User During Macro" kbd-macro-query :active defining-kbd-macro] ["Enter %_Recursive Edit During Macro" (kbd-macro-query t) :active defining-kbd-macro] "---" ["%_Insert Named Macro into Buffer..." insert-kbd-macro] ["Read Macro from Re%_gion" read-kbd-macro :active (region-exists-p)]) "----" ["D%_ynamic Abbrev Expand" dabbrev-expand] ["Define %_Global Abbrev for " add-global-abbrev :suffix (truncate-string-to-width (abbrev-string-to-be-defined nil) 40 nil nil t)] ("Other %_Abbrev" ["Dynamic Abbrev %_Complete" dabbrev-completion] ["Dynamic Abbrev Complete in %_All Buffers" (dabbrev-completion 16)] "----" "----" ["%_Define Global Abbrev for " add-global-abbrev :suffix (truncate-string-to-width (abbrev-string-to-be-defined nil) 40 nil nil t)] ["Define %_Mode-Specific Abbrev for " add-mode-abbrev :suffix (truncate-string-to-width (abbrev-string-to-be-defined nil) 40 nil nil t)] ["Define Global Ex%_pansion for " inverse-add-global-abbrev :suffix (truncate-string-to-width (inverse-abbrev-string-to-be-defined 1) 40 nil nil t)] ["Define Mode-Specific Expa%_nsion for " inverse-add-mode-abbrev :suffix (truncate-string-to-width (inverse-abbrev-string-to-be-defined 1) 40 nil nil t)] "---" ["E%_xpand Abbrev" expand-abbrev] ["Expand Abbrevs in Re%_gion" expand-region-abbrevs :active (region-exists-p)] ["%_Unexpand Last Abbrev" unexpand-abbrev :active (and (stringp last-abbrev-text) (> last-abbrev-location 0))] "---" ["%_Kill All Abbrevs" kill-all-abbrevs] ["%_Insert All Abbrevs into Buffer" insert-abbrevs] ["%_List Abbrevs" list-abbrevs] "---" ["%_Edit Abbrevs" edit-abbrevs] ["%_Redefine Abbrevs from Buffer" edit-abbrevs-redefine :active (eq major-mode (quote edit-abbrevs-mode))] "---" ["%_Save Abbrevs As..." write-abbrev-file] ["L%_oad Abbrevs..." read-abbrev-file]) "---" ["%_Cut Rectangle" kill-rectangle] ["%_Prefix Rectangle..." string-rectangle] ("Other %_Rectangles/Register" ["%_Yank Rectangle" yank-rectangle] ["Rectangle %_to Register" copy-rectangle-to-register] ["Rectangle %_from Register" insert-register] ["%_Delete Rectangle" clear-rectangle] ["%_Open Rectangle" open-rectangle] ["Rectangle %_Mousing" (customize-set-variable (quote mouse-track-rectangle-p) (not mouse-track-rectangle-p)) :style toggle :selected mouse-track-rectangle-p] "---" ["%_Copy to Register..." copy-to-register :active (region-exists-p)] ["%_Append to Register..." append-register :active (region-exists-p)] ["%_Insert Register..." insert-register] "---" ["%_Save Point to Register" point-to-register] ["%_Jump to Register" register-to-point]) "---" ["%_Sort Lines in Region" sort-lines :active (region-exists-p)] ["%_Uppercase Region or Word" upcase-region-or-word] ["%_Lowercase Region or Word" downcase-region-or-word] ["%_Indent Region or Balanced Expression" indent-region-or-balanced-expression] ["%_Fill Paragraph or Region" fill-paragraph-or-region] ("Other %_Text Commands" ["Sort %_Paragraphs in Region" sort-paragraphs:active (region-exists-p)] ["Sort Pa%_ges in Region" sort-pages :active (region-exists-p)] ["Sort C%_olumns in Region" sort-columns :active (region-exists-p)] ["Sort %_Regexp..." sort-regexp-fields :active (region-exists-p)] "---" ["%_Capitalize Region" capitalize-region :active (region-exists-p)] ["Title-C%_ase Region" capitalize-region-as-title :active (region-exists-p)] "----" ["C%_enter Region or Paragraph" (if (region-active-p) (center-region) (center-line))] ["Center %_Line" center-line] "---" ["%_Indent Region Rigidly" indent-rigidly :active (region-exists-p)] ["In%_dent To Column..." indent-to-column] "---" ["%_Untabify (Tabs to Spaces)" untabify :active (and (region-exists-p) (fboundp (quote untabify)))] ["%_Tabify (Spaces to Tabs)" tabify :active (and (region-exists-p) (fboundp (quote tabify)))] ["Tab to Tab %_Stop" tab-to-tab-stop] ["Edit Ta%_b Stops" edit-tab-stops]) "---" ("%_Tags" ["%_Find Tag..." find-tag] ["Find %_Other Window..." find-tag-other-window] ["%_Next Tag..." (find-tag nil)] ["N%_ext Other Window..." (find-tag-other-window nil)] ["Next %_File" next-file] "-----" ["Tags %_Search..." tags-search] ["Tags %_Replace..." tags-query-replace] ["%_Continue Search/Replace" tags-loop-continue] "-----" ["%_Pop stack" pop-tag-mark] ["%_Apropos..." tags-apropos] "-----" ["%_Set Tags Table File..." visit-tags-table])) ("%_Tools" ("%_Packages" ("%_Set Download Site" ("%_Official Releases" :filter (lambda (&rest junk) (menu-split-long-menu (submenu-generate-accelerator-spec (package-ui-download-menu))))) ("%_Pre-Releases" :filter (lambda (&rest junk) (menu-split-long-menu (submenu-generate-accelerator-spec (package-ui-pre-release-download-menu))))) ("%_Site Releases" :filter (lambda (&rest junk) (menu-split-long-menu (submenu-generate-accelerator-spec (package-ui-site-release-download-menu)))))) "--:shadowEtchedIn" ["%_Update Package Index" package-get-update-base] ["%_List and Install" pui-list-packages] ["U%_pdate Installed Packages" package-get-update-all] ["%_Help" (Info-goto-node "(xemacs)Packages")]) ("%_Internet" ["Read Mail %_1 (VM)..." vm :active (fboundp (quote vm))] ["Read Mail %_2 (MH)..." (mh-rmail t) :active (fboundp (quote mh-rmail))] ["Send %_Mail..." compose-mail :active (fboundp (quote compose-mail))] ["Usenet %_News" gnus :active (fboundp (quote gnus))] ["Browse the %_Web" w3 :active (fboundp (quote w3))]) "---" ("%_Grep" :filter (lambda (menu) (if (or (not (boundp (quote grep-history))) (null grep-history)) menu (let ((items (submenu-generate-accelerator-spec (mapcar (function (lambda (label-value) (vector (first label-value) (list (quote grep) (second label-value))))) (Menubar-items-truncate-history grep-history 10 50))))) (append menu (quote ("---")) items)))) ["%_Grep..." grep :active (fboundp (quote grep))] ["%_Kill Grep" kill-compilation :active (and (fboundp (quote kill-compilation)) (fboundp (quote compilation-find-buffer)) (let ((buffer (condition-case nil (compilation-find-buffer) (error nil)))) (and buffer (get-buffer-process buffer))))] "---" ["Grep %_All Files in Current Directory..." grep-all-files-in-current-directory :active (fboundp (quote grep-all-files-in-current-directory))] ["Grep All Files in Current Directory %_Recursively..." grep-all-files-in-current-directory-and-below :active (fboundp (quote grep-all-files-in-current-directory-and-below))] "---" ["Grep %_C and C Header Files in Current Directory..." (progn (require (quote compile)) (let ((grep-command (cons (concat grep-command " *.[chCH]") (length grep-command)))) (call-interactively (quote grep)))) :active (fboundp (quote grep))] ["Grep C Hea%_der Files in Current Directory..." (progn (require (quote compile)) (let ((grep-command (cons (concat grep-command " *.[hH]") (length grep-command)))) (call-interactively (quote grep)))) :active (fboundp (quote grep))] ["Grep %_E-Lisp Files in Current Directory..." (progn (require (quote compile)) (let ((grep-command (cons (concat grep-command " *.el") (length grep-command)))) (call-interactively (quote grep)))) :active (fboundp (quote grep))] ["Grep %_Perl Files in Current Directory..." (progn (require (quote compile)) (let ((grep-command (cons (concat grep-command " *.pl") (length grep-command)))) (call-interactively (quote grep)))) :active (fboundp (quote grep))] ["Grep %_HTML Files in Current Directory..." (progn (require (quote compile)) (let ((grep-command (cons (concat grep-command " *.*htm*") (length grep-command)))) (call-interactively (quote grep)))) :active (fboundp (quote grep))] "---" ["%_Next Match" next-error :active (and (fboundp (quote compilation-errors-exist-p)) (compilation-errors-exist-p))] ["Pre%_vious Match" previous-error :active (and (fboundp (quote compilation-errors-exist-p)) (compilation-errors-exist-p))] ["%_First Match" first-error :active (and (fboundp (quote compilation-errors-exist-p)) (compilation-errors-exist-p))] ["G%_oto Match" compile-goto-error :active (and (fboundp (quote compilation-errors-exist-p)) (compilation-errors-exist-p))] "---" ["%_Set Grep Command..." (progn (require (quote compile)) (customize-set-variable (quote grep-command) (read-shell-command "Default Grep Command: " grep-command))):active (fboundp (quote grep))]) ("%_Compile" :filter (lambda (menu) (if (or (not (boundp (quote compile-history))) (null compile-history)) menu (let ((items (submenu-generate-accelerator-spec (mapcar (function (lambda (label-value) (vector (first label-value) (list (quote compile) (second label-value))))) (Menubar-items-truncate-history compile-history 10 50))))) (append menu (quote ("---")) items)))) ["%_Compile..." compile :active (fboundp (quote compile))] ["%_Repeat Compilation" recompile :active (fboundp (quote recompile))] ["%_Kill Compilation" kill-compilation :active (and (fboundp (quote kill-compilation)) (fboundp (quote compilation-find-buffer)) (let ((buffer (condition-case nil (compilation-find-buffer) (error nil)))) (and buffer (get-buffer-process buffer))))] "---" ["%_Next Error" next-error :active (and (fboundp (quote compilation-errors-exist-p)) (compilation-errors-exist-p))] ["Pre%_vious Error" previous-error :active (and (fboundp (quote compilation-errors-exist-p)) (compilation-errors-exist-p))] ["%_First Error" first-error :active (and (fboundp (quote compilation-errors-exist-p)) (compilation-errors-exist-p))] ["G%_oto Error" compile-goto-error :active (and (fboundp (quote compilation-errors-exist-p)) (compilation-errors-exist-p))]) ("%_Debug" ["%_GDB..." gdb :active (fboundp (quote gdb))] ["%_DBX..." dbx:active (fboundp (quote dbx))]) ("%_Shell" ["%_Shell" shell :active (fboundp (quote shell))] ["S%_hell Command..." shell-command :active (fboundp (quote shell-command))] ["Shell Command on %_Region..." shell-command-on-region:active (and (fboundp (quote shell-command-on-region)) (region-exists-p))]) ("%_Tags" ["%_Find Tag..." find-tag] ["Find %_Other Window..." find-tag-other-window] ["%_Next Tag..." (find-tag nil)] ["N%_ext Other Window..." (find-tag-other-window nil)] ["Next %_File" next-file] "-----" ["Tags %_Search..." tags-search] ["Tags %_Replace..." tags-query-replace] ["%_Continue Search/Replace" tags-loop-continue] "-----" ["%_Pop stack" pop-tag-mark] ["%_Apropos..." tags-apropos] "-----" ["%_Set Tags Table File..." visit-tags-table]) "----" ("Ca%_lendar" ["%_3-Month Calendar" calendar :active (fboundp (quote calendar))] ["%_Diary" diary :active (fboundp (quote diary))] ["%_Holidays" holidays :active (fboundp (quote holidays))] ["%_Phases of the Moon" phases-of-moon :active (fboundp (quote phases-of-moon))] ["%_Sunrise/Sunset" sunrise-sunset :active (fboundp (quote sunrise-sunset))]) ("Ga%_mes" ["%_Mine Game" xmine :active (fboundp (quote xmine))] ["%_Tetris" tetris :active (fboundp (quote tetris))] ["%_Sokoban" sokoban :active (fboundp (quote sokoban))] ["Quote from %_Zippy" yow :active (fboundp (quote yow))] ["%_Psychoanalyst" doctor :active (fboundp (quote doctor))] ["Ps%_ychoanalyze Zippy!" psychoanalyze-pinhead :active (fboundp (quote psychoanalyze-pinhead))] ["%_Random Flames" flame :active (fboundp (quote flame))] ["%_Dunnet (Adventure)" dunnet :active (fboundp (quote dunnet))] ["Towers of %_Hanoi" hanoi:active (fboundp (quote hanoi))] ["Game of %_Life" life :active (fboundp (quote life))] ["M%_ultiplication Puzzle" mpuz :active (fboundp (quote mpuz))]) "----") ("%_Options" ("%_Advanced (Customize)" ("%_Emacs" :filter (lambda (&rest junk) (cdr (custom-menu-create (quote emacs))))) ["%_Group..." customize-group] ["%_Variable..." customize-variable] ["%_Face..." customize-face] ["%_Saved..." customize-saved] ["Se%_t..." customize-customized] ["%_Apropos..." customize-apropos] ["%_Browse..." customize-browse]) "---" ("%_Editing" ["This Buffer %_Read Only" (toggle-read-only) :style toggle :selected buffer-read-only] ["%_Yank/Kill Interact With Clipboard" (if (eq interprogram-cut-function (quote own-clipboard)) (progn (customize-set-variable (quote interprogram-cut-function) nil) (customize-set-variable (quote interprogram-paste-function) nil)) (customize-set-variable (quote interprogram-cut-function) (quote own-clipboard)) (customize-set-variable (quote interprogram-paste-function) (quote get-clipboard))) :style toggle :selected (eq interprogram-cut-function (quote own-clipboard))] ["%_Overstrike" (progn (setq overwrite-mode (if overwrite-mode nil (quote overwrite-mode-textual))) (customize-set-variable (quote overwrite-mode) overwrite-mode)) :style toggle:selected overwrite-mode] ["%_Abbrev Mode" (customize-set-variable (quote abbrev-mode) (not (default-value (quote abbrev-mode)))) :style toggle :selected (default-value (quote abbrev-mode))] ["Active Re%_gions" (customize-set-variable (quote zmacs-regions) (not zmacs-regions)) :style toggle :selected zmacs-regions] "---" ["%_Case Sensitive Search" (customize-set-variable (quote case-fold-search) (setq case-fold-search (not case-fold-search))) :style toggle :selected (not case-fold-search)] ["Case %_Matching Replace" (customize-set-variable (quote case-replace) (not case-replace)) :style toggle:selected case-replace] "---" ("%_Newline at End of File..." ["%_Don't Require" (customize-set-variable (quote require-final-newline) nil) :style radio:selected (not require-final-newline)] ["%_Require" (customize-set-variable (quote require-final-newline) t) :style radio :selected (eq require-final-newline t)] ["%_Ask" (customize-set-variable (quote require-final-newline) (quote ask)) :style radio :selected (and require-final-newline (not (eq require-final-newline t)))]) ["Add Newline When Moving Past %_End" (customize-set-variable (quote next-line-add-newlines) (not next-line-add-newlines)):style toggle :selected next-line-add-newlines]) ("%_Keyboard and Mouse" ["%_Delete Key Deletes Selection" (customize-set-variable (quote pending-delete-mode) (not pending-delete-mode)) :style toggle :selected (and (boundp (quote pending-delete-mode)) pending-delete-mode) :active (boundp (quote pending-delete-mode))] ["`kill-%_word' Stores in Clipboard" (customize-set-variable (quote kill-word-into-kill-ring) (not kill-word-into-kill-ring)) :style toggle :selected kill-word-into-kill-ring] ["`kill-%_line' Kills Whole Line at Beg" (customize-set-variable (quote kill-whole-line) (not kill-whole-line)):style toggle :selected kill-whole-line] ["Size for %_Block-Movement Commands..." (customize-set-variable (quote block-movement-size) (read-number "Block Movement Size: " t block-movement-size))] ["%_VI Emulation" (progn (toggle-viper-mode) (customize-set-variable (quote viper-mode) viper-mode)):style toggle :selected (and (boundp (quote viper-mode)) viper-mode):active (fboundp (quote toggle-viper-mode))] "----" ["S%_hifted Motion Keys Select Region" (customize-set-variable (quote shifted-motion-keys-select-region) (not shifted-motion-keys-select-region)) :style toggle :selected shifted-motion-keys-select-region] ["%_After Shifted Motion, Unshifted Motion Keys Deselect" (customize-set-variable (quote unshifted-motion-keys-deselect-region) (not unshifted-motion-keys-deselect-region)) :style toggle :selected unshifted-motion-keys-deselect-region] "----" ["%_Set Key..." global-set-key] ["%_Unset Key..." global-unset-key] "---" ["%_Mouse Paste at Text Cursor (not Clicked Location)" (customize-set-variable (quote mouse-yank-at-point) (not mouse-yank-at-point)) :style toggle :selected mouse-yank-at-point] "---" ["%_Teach Extended Commands" (customize-set-variable (quote teach-extended-commands-p) (not teach-extended-commands-p)) :style toggle :selected teach-extended-commands-p]) ("%_Printing" ["Set Printer %_Name for Generic Print Support..." (customize-set-variable (quote printer-name) (read-string "Set printer name: " printer-name))] "---" ["Command-Line %_Switches for `lpr'/`lp'..." (customize-variable (quote lpr-switches)) (boundp (quote lpr-switches))] ("%_Pretty-Print Paper Size" ["%_Letter" (customize-set-variable (quote ps-paper-type) (quote letter)) :style radio :selected (and (boundp (quote ps-paper-type)) (eq ps-paper-type (quote letter))) :active (boundp (quote ps-paper-type))] ["Lette%_r-Small" (customize-set-variable (quote ps-paper-type) (quote letter-small)) :style radio :selected (and (boundp (quote ps-paper-type)) (eq ps-paper-type (quote letter-small))) :active (boundp (quote ps-paper-type))] ["Le%_gal" (customize-set-variable (quote ps-paper-type) (quote legal)) :style radio :selected (and (boundp (quote ps-paper-type)) (eq ps-paper-type (quote legal))) :active (boundp (quote ps-paper-type))] ["%_Statement" (customize-set-variable (quote ps-paper-type) (quote statement)) :style radio :selected (and (boundp (quote ps-paper-type)) (eq ps-paper-type (quote statement))) :active (boundp (quote ps-paper-type))] ["%_Executive" (customize-set-variable (quote ps-paper-type) (quote executive)):style radio :selected (and (boundp (quote ps-paper-type)) (eq ps-paper-type (quote executive))) :active (boundp (quote ps-paper-type))] ["%_Tabloid" (customize-set-variable (quote ps-paper-type) (quote tabloid)) :style radio :selected (and (boundp (quote ps-paper-type)) (eq ps-paper-type (quote tabloid))) :active (boundp (quote ps-paper-type))] ["Le%_dger" (customize-set-variable (quote ps-paper-type) (quote ledger)) :style radio :selected (and (boundp (quote ps-paper-type)) (eq ps-paper-type (quote ledger))) :active (boundp (quote ps-paper-type))] ["A%_3" (customize-set-variable (quote ps-paper-type) (quote a3)) :style radio :selected (and (boundp (quote ps-paper-type)) (eq ps-paper-type (quote a3))) :active (boundp (quote ps-paper-type))] ["%_A4" (customize-set-variable (quote ps-paper-type) (quote a4)) :style radio :selected (and (boundp (quote ps-paper-type)) (eq ps-paper-type (quote a4))) :active (boundp (quote ps-paper-type))] ["A4s%_mall" (customize-set-variable (quote ps-paper-type) (quote a4small)) :style radio :selected (and (boundp (quote ps-paper-type)) (eq ps-paper-type (quote a4small))) :active (boundp (quote ps-paper-type))] ["B%_4" (customize-set-variable (quote ps-paper-type) (quote b4)) :style radio :selected (and (boundp (quote ps-paper-type)) (eq ps-paper-type (quote b4))) :active (boundp (quote ps-paper-type))] ["%_B5" (customize-set-variable (quote ps-paper-type) (quote b5)):style radio :selected (and (boundp (quote ps-paper-type)) (eq ps-paper-type (quote b5))) :active (boundp (quote ps-paper-type))]) ["%_Color Printing" (cond (ps-print-color-p (customize-set-variable (quote ps-print-color-p) nil) (and (boundp (quote original-face-background)) original-face-background (set-face-background (quote default) original-face-background))) (t (customize-set-variable (quote ps-print-color-p) t) (setq original-face-background (face-background-instance (quote default))) (set-face-background (quote default) "white"))) :style toggle :selected (and (boundp (quote ps-print-color-p)) ps-print-color-p) :active (boundp (quote ps-print-color-p))]) ("%_Internet" ("%_Compose Mail With" ["VM mail package" (customize-set-variable (quote mail-user-agent) (quote vm-user-agent)) :style radio :selected (eq mail-user-agent (quote vm-user-agent)) :active (get (quote vm-user-agent) (quote composefunc))] ["Bare-bones Emacs Mailer" (customize-set-variable (quote mail-user-agent) (quote sendmail-user-agent)) :style radio :selected (eq mail-user-agent (quote sendmail-user-agent))] ["MH" (customize-set-variable (quote mail-user-agent) (quote mh-e-user-agent)) :style radio :selected (eq mail-user-agent (quote mh-e-user-agent)) :active (get (quote mh-e-user-agent) (quote composefunc))] ["GNUS" (customize-set-variable (quote mail-user-agent) (quote message-user-agent)) :style radio :selected (eq mail-user-agent (quote message-user-agent)) :active (get (quote message-user-agent) (quote composefunc))]) ["Set My %_Email Address..." (customize-set-variable (quote user-mail-address) (read-string "Set email address: " user-mail-address))] ["Set %_Machine Email Name..." (customize-set-variable (quote mail-host-address) (read-string "Set machine email name: " mail-host-address))] ["Set %_SMTP Server..." (progn (require (quote smtpmail)) (customize-set-variable (quote smtpmail-smtp-server) (read-string "Set SMTP server: " smtpmail-smtp-server))):active (and (boundp (quote send-mail-function)) (eq send-mail-function (quote smtpmail-send-it)))] ["SMTP %_Debug Info" (progn (require (quote smtpmail)) (customize-set-variable (quote smtpmail-debug-info) (not smtpmail-debug-info))) :style toggle :selected (and (boundp (quote smtpmail-debug-info)) smtpmail-debug-info) :active (and (boundp (quote send-mail-function)) (eq send-mail-function (quote smtpmail-send-it)))]) ("%_Troubleshooting" ["%_Debug on Error [not saved]" (setq debug-on-error (not debug-on-error)):style toggle :selected debug-on-error] ["Debug on %_Quit [not saved]" (setq debug-on-quit (not debug-on-quit)) :style toggle :selected debug-on-quit] ["Debug on S%_ignal [not saved]" (setq debug-on-signal (not debug-on-signal)):style toggle :selected debug-on-signal] ["%_Stack Trace on Error [not saved]" (setq stack-trace-on-error (not stack-trace-on-error)) :style toggle :selected stack-trace-on-error] ["Stack Trace on Si%_gnal [not saved]" (setq stack-trace-on-signal (not stack-trace-on-signal)) :style toggle:selected stack-trace-on-signal]) ("Encodin%_g" ["Automatic %_EOL Detection" (customize-set-variable (quote eol-detection-enabled-p) (not eol-detection-enabled-p)):style toggle :selected eol-detection-enabled-p :included (not (memq system-type (quote (windows-nt cygwin32))))] ("Set Coding System of %_Buffer File" :filter (lambda (menu) (coding-system-menu-filter (lambda (entry) (set-buffer-file-coding-system entry)) (lambda (entry) t)))) ("Set Coding System of %_Terminal" :filter (lambda (menu) (coding-system-menu-filter (lambda (entry) (set-terminal-coding-system entry)) (lambda (entry) nil)))) ("Set Coding System of %_Keyboard" :filter (lambda (menu) (coding-system-menu-filter (lambda (entry) (set-keyboard-coding-system entry)) (lambda (entry) nil)))) ("Set Coding System of %_Process" :filter (lambda (menu) (coding-system-menu-filter (lambda (entry) (set-buffer-process-coding-system entry)) (lambda (entry) (get-buffer-process (current-buffer))))))) (\,＠ (when (featurep (quote mule)) (quote (("Internationa%_l" ("Set %_Language Environment" :filter (lambda (menu) (menu-split-long-menu-and-sort (mapcar (function (lambda (entry) (backquote [(\, (car entry)) (set-language-environment (quote (\, (car entry)))) :style radio :selected (\, (equal (car entry) current-language-environment))]))) language-info-alist)))) ["%_Toggle Input Method" toggle-input-method] ["Select %_Input Method" set-input-method]))))) "-----" ("%_Display" (\,＠ (if (featurep (quote scrollbar)) (quote (["%_Scrollbars" (customize-set-variable (quote scrollbars-visible-p) (not scrollbars-visible-p)):style toggle :selected scrollbars-visible-p])))) ["%_Wrap Long Lines" (progn (setq truncate-lines (not truncate-lines)) (customize-set-variable (quote truncate-lines) truncate-lines)) :style toggle :selected (not truncate-lines)] "----" ["%_3D Modeline" (customize-set-variable (quote modeline-3d-p) (not modeline-3d-p)) :style toggle :selected modeline-3d-p] ("Modeline %_Horizontal Scrolling" ["%_None" (customize-set-variable (quote modeline-scrolling-method) nil) :style radio :selected (not modeline-scrolling-method)] ["As %_Text" (customize-set-variable (quote modeline-scrolling-method) t) :style radio :selected (eq modeline-scrolling-method t)] ["As %_Scrollbar" (customize-set-variable (quote modeline-scrolling-method) (quote scrollbar)) :style radio :selected (eq modeline-scrolling-method (quote scrollbar))]) (\,＠ (if (featurep (quote toolbar)) (quote ("---" ["%_Toolbars Visible" (customize-set-variable (quote toolbar-visible-p) (not toolbar-visible-p)):style toggle :selected toolbar-visible-p] ["Toolbars Ca%_ptioned" (customize-set-variable (quote toolbar-captioned-p) (not toolbar-captioned-p)):style toggle :active toolbar-visible-p :selected toolbar-captioned-p] ("Default Toolba%_r Location" ["%_Top" (customize-set-variable (quote default-toolbar-position) (quote top)) :style radio :active toolbar-visible-p:selected (eq default-toolbar-position (quote top))] ["%_Bottom" (customize-set-variable (quote default-toolbar-position) (quote bottom)) :style radio :active toolbar-visible-p :selected (eq default-toolbar-position (quote bottom))] ["%_Left" (customize-set-variable (quote default-toolbar-position) (quote left)) :style radio :active toolbar-visible-p :selected (eq default-toolbar-position (quote left))] ["%_Right" (customize-set-variable (quote default-toolbar-position) (quote right)) :style radio :active toolbar-visible-p:selected (eq default-toolbar-position (quote right))]))))) (\,＠ (if (featurep (quote gutter)) (quote ("---" ["B%_uffers Tab Visible" (customize-set-variable (quote gutter-buffers-tab-visible-p) (not gutter-buffers-tab-visible-p)):style toggle :selected gutter-buffers-tab-visible-p] ("Default %_Gutter Location" ["%_Top" (customize-set-variable (quote default-gutter-position) (quote top)) :style radio :selected (eq default-gutter-position (quote top))] ["%_Bottom" (customize-set-variable (quote default-gutter-position) (quote bottom)) :style radio :selected (eq default-gutter-position (quote bottom))] ["%_Left" (customize-set-variable (quote default-gutter-position) (quote left)) :style radio :selected (eq default-gutter-position (quote left))] ["%_Right" (customize-set-variable (quote default-gutter-position) (quote right)) :style radio :selected (eq default-gutter-position (quote right))]))))) "-----" ["%_Blinking Cursor" (customize-set-variable (quote blink-cursor-mode) (not blink-cursor-mode)) :style toggle :selected (and (boundp (quote blink-cursor-mode)) blink-cursor-mode) :active (boundp (quote blink-cursor-mode))] ["Bl%_ock Cursor" (progn (customize-set-variable (quote bar-cursor) nil) (force-cursor-redisplay)) :style radio :selected (null bar-cursor)] ["Bar Cursor (%_1 Pixel)" (progn (customize-set-variable (quote bar-cursor) t) (force-cursor-redisplay)) :style radio :selected (eq bar-cursor t)] ["Bar Cursor (%_2 Pixels)" (progn (customize-set-variable (quote bar-cursor) 2) (force-cursor-redisplay)) :style radio :selected (and bar-cursor (not (eq bar-cursor t)))] "----" ("Pa%_ren Highlighting" ["%_None" (customize-set-variable (quote paren-mode) nil) :style radio :selected (and (boundp (quote paren-mode)) (not paren-mode)) :active (boundp (quote paren-mode))] ["%_Blinking Paren" (customize-set-variable (quote paren-mode) (quote blink-paren)) :style radio :selected (and (boundp (quote paren-mode)) (eq paren-mode (quote blink-paren))) :active (boundp (quote paren-mode))] ["%_Steady Paren" (customize-set-variable (quote paren-mode) (quote paren)) :style radio :selected (and (boundp (quote paren-mode)) (eq paren-mode (quote paren))) :active (boundp (quote paren-mode))] ["%_Expression" (customize-set-variable (quote paren-mode) (quote sexp)) :style radio :selected (and (boundp (quote paren-mode)) (eq paren-mode (quote sexp))) :active (boundp (quote paren-mode))]) "------" ["%_Line Numbers" (progn (customize-set-variable (quote line-number-mode) (not line-number-mode)) (redraw-modeline)) :style toggle :selected line-number-mode] ["%_Column Numbers" (progn (customize-set-variable (quote column-number-mode) (not column-number-mode)) (redraw-modeline)):style toggle :selected column-number-mode] ("\"Other %_Window\" Location" ["%_Always in Same Frame" (customize-set-variable (quote get-frame-for-buffer-default-instance-limit) nil) :style radio :selected (null get-frame-for-buffer-default-instance-limit)] ["Other Frame (%_2 Frames Max)" (customize-set-variable (quote get-frame-for-buffer-default-instance-limit) 2) :style radio :selected (eq 2 get-frame-for-buffer-default-instance-limit)] ["Other Frame (%_3 Frames Max)" (customize-set-variable (quote get-frame-for-buffer-default-instance-limit) 3) :style radio :selected (eq 3 get-frame-for-buffer-default-instance-limit)] ["Other Frame (%_4 Frames Max)" (customize-set-variable (quote get-frame-for-buffer-default-instance-limit) 4):style radio :selected (eq 4 get-frame-for-buffer-default-instance-limit)] ["Other Frame (%_5 Frames Max)" (customize-set-variable (quote get-frame-for-buffer-default-instance-limit) 5) :style radio :selected (eq 5 get-frame-for-buffer-default-instance-limit)] ["Always Create %_New Frame" (customize-set-variable (quote get-frame-for-buffer-default-instance-limit) 0) :style radio :selected (eq 0 get-frame-for-buffer-default-instance-limit)] "-----" ["%_Temp Buffers Always in Same Frame" (customize-set-variable (quote temp-buffer-show-function) (quote show-temp-buffer-in-current-frame)) :style radio :selected (eq temp-buffer-show-function (quote show-temp-buffer-in-current-frame))] ["Temp Buffers %_Like Other Buffers" (customize-set-variable (quote temp-buffer-show-function) nil) :style radio :selected (null temp-buffer-show-function)] "-----" ["%_Make Current Frame Gnuserv Target" (customize-set-variable (quote gnuserv-frame) (if (eq gnuserv-frame t) nil t)) :style toggle :selected (and (boundp (quote gnuserv-frame)) (eq gnuserv-frame t)) :active (boundp (quote gnuserv-frame))])) ("%_Menubars" ["%_Frame-Local Font Menu" (customize-set-variable (quote font-menu-this-frame-only-p) (not font-menu-this-frame-only-p)) :style toggle :selected (and (boundp (quote font-menu-this-frame-only-p)) font-menu-this-frame-only-p)] ["%_Alt/Meta Selects Menu Items" (if (eq menu-accelerator-enabled (quote menu-force)) (customize-set-variable (quote menu-accelerator-enabled) nil) (customize-set-variable (quote menu-accelerator-enabled) (quote menu-force))) :style toggle:selected (eq menu-accelerator-enabled (quote menu-force))] "----" ["Buffers Menu %_Length..." (customize-set-variable (quote buffers-menu-max-size) (let ((val (read-number "Enter number of buffers to display (or 0 for unlimited): "))) (if (eq val 0) nil val)))] ["%_Multi-Operation Buffers Sub-Menus" (customize-set-variable (quote complex-buffers-menu-p) (not complex-buffers-menu-p)):style toggle :selected complex-buffers-menu-p] ["S%_ubmenus for Buffer Groups" (customize-set-variable (quote buffers-menu-submenus-for-groups-p) (not buffers-menu-submenus-for-groups-p)) :style toggle :selected buffers-menu-submenus-for-groups-p] ["%_Verbose Buffer Menu Entries" (if (eq buffers-menu-format-buffer-line-function (quote slow-format-buffers-menu-line)) (customize-set-variable (quote buffers-menu-format-buffer-line-function) (quote format-buffers-menu-line)) (customize-set-variable (quote buffers-menu-format-buffer-line-function) (quote slow-format-buffers-menu-line))):style toggle :selected (eq buffers-menu-format-buffer-line-function (quote slow-format-buffers-menu-line))] ("Buffers Menu %_Sorting" ["%_Most Recently Used" (progn (customize-set-variable (quote buffers-menu-sort-function) nil) (customize-set-variable (quote buffers-menu-grouping-function) nil)):style radio :selected (null buffers-menu-sort-function)] ["%_Alphabetically" (progn (customize-set-variable (quote buffers-menu-sort-function) (quote sort-buffers-menu-alphabetically)) (customize-set-variable (quote buffers-menu-grouping-function) nil)) :style radio :selected (eq (quote sort-buffers-menu-alphabetically) buffers-menu-sort-function)] ["%_By Major Mode, Then Alphabetically" (progn (customize-set-variable (quote buffers-menu-sort-function) (quote sort-buffers-menu-by-mode-then-alphabetically)) (customize-set-variable (quote buffers-menu-grouping-function) (quote group-buffers-menu-by-mode-then-alphabetically))):style radio :selected (eq (quote sort-buffers-menu-by-mode-then-alphabetically) buffers-menu-sort-function)]) "---" ["%_Ignore Scaled Fonts" (customize-set-variable (quote font-menu-ignore-scaled-fonts) (not font-menu-ignore-scaled-fonts)) :style toggle :selected (and (boundp (quote font-menu-ignore-scaled-fonts)) font-menu-ignore-scaled-fonts)]) ("S%_yntax Highlighting" ["%_In This Buffer" (progn (font-lock-mode) (customize-set-variable (quote font-lock-mode) font-lock-mode)) :style toggle :selected (and (boundp (quote font-lock-mode)) font-lock-mode) :active (boundp (quote font-lock-mode))] ["%_Automatic" (customize-set-variable (quote font-lock-auto-fontify) (not font-lock-auto-fontify)) :style toggle:selected (and (boundp (quote font-lock-auto-fontify)) font-lock-auto-fontify):active (fboundp (quote font-lock-mode))] "-----" ["Force %_Rehighlight in this Buffer" (customize-set-variable (quote font-lock-auto-fontify) (not font-lock-auto-fontify)) :style toggle :selected (and (boundp (quote font-lock-auto-fontify)) font-lock-auto-fontify) :active (fboundp (quote font-lock-mode))] "-----" ["%_Fonts" (progn (require (quote font-lock)) (font-lock-use-default-fonts) (customize-set-variable (quote font-lock-use-fonts) t) (customize-set-variable (quote font-lock-use-colors) nil) (font-lock-mode 1)) :style radio :selected (and (boundp (quote font-lock-use-fonts)) font-lock-use-fonts):active (fboundp (quote font-lock-mode))] ["%_Colors" (progn (require (quote font-lock)) (font-lock-use-default-colors) (customize-set-variable (quote font-lock-use-colors) t) (customize-set-variable (quote font-lock-use-fonts) nil) (font-lock-mode 1)) :style radio :selected (and (boundp (quote font-lock-use-colors)) font-lock-use-colors) :active (boundp (quote font-lock-mode))] "-----" ["%_1 Least" (progn (require (quote font-lock)) (if (or (and (not (integerp font-lock-maximum-decoration)) (not (eq t font-lock-maximum-decoration))) (and (integerp font-lock-maximum-decoration) (<= font-lock-maximum-decoration 0))) nil (customize-set-variable (quote font-lock-maximum-decoration) nil) (font-lock-recompute-variables))) :style radio :active (fboundp (quote font-lock-mode)) :selected (and (boundp (quote font-lock-maximum-decoration)) (or (and (not (integerp font-lock-maximum-decoration)) (not (eq t font-lock-maximum-decoration))) (and (integerp font-lock-maximum-decoration) (<= font-lock-maximum-decoration 0))))] ["%_2 More" (progn (require (quote font-lock)) (if (and (integerp font-lock-maximum-decoration) (= 1 font-lock-maximum-decoration)) nil (customize-set-variable (quote font-lock-maximum-decoration) 1) (font-lock-recompute-variables))):style radio :active (fboundp (quote font-lock-mode)) :selected (and (boundp (quote font-lock-maximum-decoration)) (integerp font-lock-maximum-decoration) (= 1 font-lock-maximum-decoration))] ["%_3 Even More" (progn (require (quote font-lock)) (if (and (integerp font-lock-maximum-decoration) (= 2 font-lock-maximum-decoration)) nil (customize-set-variable (quote font-lock-maximum-decoration) 2) (font-lock-recompute-variables))) :style radio:active (fboundp (quote font-lock-mode)) :selected (and (boundp (quote font-lock-maximum-decoration)) (integerp font-lock-maximum-decoration) (= 2 font-lock-maximum-decoration))] ["%_4 Most" (progn (require (quote font-lock)) (if (or (eq font-lock-maximum-decoration t) (and (integerp font-lock-maximum-decoration) (>= font-lock-maximum-decoration 3))) nil (customize-set-variable (quote font-lock-maximum-decoration) t) (font-lock-recompute-variables))):style radio :active (fboundp (quote font-lock-mode)) :selected (and (boundp (quote font-lock-maximum-decoration)) (or (eq font-lock-maximum-decoration t) (and (integerp font-lock-maximum-decoration) (>= font-lock-maximum-decoration 3))))] "-----" ["Lazy %_Lock" (progn (lazy-lock-mode) (customize-set-variable (quote lazy-lock-mode) lazy-lock-mode) (redraw-modeline)):active (and (boundp (quote font-lock-mode)) (boundp (quote lazy-lock-mode)) font-lock-mode) :style toggle :selected (and (boundp (quote lazy-lock-mode)) lazy-lock-mode)] ["Lazy %_Shot" (progn (lazy-shot-mode) (customize-set-variable (quote lazy-shot-mode) lazy-shot-mode) (redraw-modeline)):active (and (boundp (quote font-lock-mode)) (boundp (quote lazy-shot-mode)) font-lock-mode) :style toggle :selected (and (boundp (quote lazy-shot-mode)) lazy-shot-mode)] ["Cac%_hing" (progn (fast-lock-mode) (customize-set-variable (quote fast-lock-mode) fast-lock-mode) (redraw-modeline)) :active (and (boundp (quote font-lock-mode)) (boundp (quote fast-lock-mode)) font-lock-mode):style toggle :selected (and (boundp (quote fast-lock-mode)) fast-lock-mode)]) ("%_Font" :filter font-menu-family-constructor) ("Font Si%_ze":filter font-menu-size-constructor) ["Edit Fa%_ces..." (customize-face nil)] "-----" ["Edit I%_nit File" (let ((el-file (or user-init-file "~/.xemacs/init.el"))) (if (string-match "\\.elc$" el-file) (setq el-file (substring user-init-file 0 (1- (length el-file))))) (find-file el-file) (or (eq major-mode (quote emacs-lisp-mode)) (emacs-lisp-mode)))] ["%_Save Options to Custom File" customize-save-customized]) ("%_Buffers" :filter buffers-menu-filter ["Go To %_Previous Buffer" switch-to-other-buffer] ["Go To %_Buffer..." switch-to-buffer] "----" ["%_List All Buffers" list-all-buffers] ["%_Delete Buffer" kill-this-buffer :suffix (if put-buffer-names-in-file-menu (buffer-name) "")] "----") nil ("%_Help" ["%_About XEmacs..." about-xemacs] ["%_Home Page (www.xemacs.org)" xemacs-www-page :active (fboundp (quote browse-url))] ["What's %_New in XEmacs" view-emacs-news] ["B%_eta Info" describe-beta:included (string-match "beta" emacs-version)] "-----" ("%_Info (Online Docs)" ["%_Info Contents" (Info-goto-node "(dir)")] "-----" ["XEmacs %_User's Manual" (Info-goto-node "(XEmacs)")] ["XEmacs %_Lisp Reference Manual" (Info-goto-node "(Lispref)")] ["All About %_Packages" (Info-goto-node "(xemacs)Packages")] ["%_Getting Started with XEmacs" (Info-goto-node "(New-Users-Guide)")] ["%_XEmacs Internals Manual" (Info-goto-node "(Internals)")] ["%_How to Use Info" (Info-goto-node "(Info)")] "-----" ["Lookup %_Key Sequence in User's Manual..." Info-goto-emacs-key-command-node] ["Lookup %_Command in User's Manual..." Info-goto-emacs-command-node] ["Lookup %_Function in Lisp Reference..." Info-elisp-ref] "-----" ["Find %_Topic in User's Manual/Lispref..." Info-search-index-in-xemacs-and-lispref] ["%_Search Text in User's Manual..." Info-search-text-in-xemacs] ["S%_earch Text in Lisp Reference..." Info-search-text-in-lispref]) ("XEmacs %_FAQ" ["%_FAQ (local)" xemacs-local-faq] ["FAQ via %_WWW" xemacs-www-faq :active (fboundp (quote browse-url))]) ("%_Tutorials" :filter tutorials-menu-filter) ("%_Samples" ["View Sample %_init.el" view-sample-init-el :active (locate-data-file "sample.init.el")] ["View Sample .%_gtkrc" (Help-find-file (locate-data-file "sample.gtkrc")):included (featurep (quote gtk)) :active (locate-data-file "sample.gtkrc")] ["View Sample .%_Xresources" (Help-find-file (locate-data-file "sample.Xresources")):included (featurep (quote x)) :active (locate-data-file "sample.Xresources")] ["View Sample %_enriched.doc" (Help-find-file (locate-data-file "enriched.doc")) :active (locate-data-file "enriched.doc")]) ("%_Commands, Variables, Keys" ["Describe %_Mode" describe-mode] ["%_Apropos..." hyper-apropos] ["%_Command-Only Apropos..." command-hyper-apropos] ["Apropos %_Docs..." apropos-documentation] "-----" ["Describe %_Key..." describe-key] ["Show %_Bindings" describe-bindings] ["Show M%_ouse Bindings" describe-pointer] "-----" ["Describe %_Function..." describe-function] ["Describe %_Variable..." describe-variable] ["%_Locate Command in Keymap..." where-is]) (\,＠ (when (featurep (quote mule)) (quote (("Internationa%_l" ("Describe %_Language Support" :filter (lambda (menu) (menu-split-long-menu-and-sort (mapcar (function (lambda (entry) (backquote [(\, (car entry)) (describe-language-environment (quote (\, (car entry)))) :style radio :selected (\, (equal (car entry) current-language-environment))]))) language-info-alist)))) ["Describe %_Input Method" describe-input-method] ["Describe Current %_Coding Systems" describe-current-coding-system] ["Show Character %_Table" view-charset-by-menu] ["Show %_Diagnosis for MULE" mule-diag :active nil] ["Show \"%_hello\" in Many Languages" view-hello-file]))))) ("%_Other" ["%_Current Installation Info" describe-installation :active (boundp (quote Installation-string))] ["%_Known Problems" view-xemacs-problems] ["%_Obtaining the Latest Version" describe-distribution] ["%_No Warranty" describe-no-warranty] ["XEmacs %_License" describe-copying] ["Find %_Packages" finder-by-keyword] ["View %_Splash Screen" xemacs-splash-buffer] ["%_Unix Manual..." manual-entry]) "-----" ["Recent %_Messages" (view-lossage t)] ["Recent %_Keystrokes" view-lossage] ["Recent %_Warnings" view-warnings] ["Send %_Bug Report..." report-xemacs-bug :active (fboundp (quote report-xemacs-bug))])))))
call-with-condition-handler(#<compiled-function (error-info) "...(4)" [error-info byte-compile-report-error] 2> #<compiled-function nil "...(43)" [byte-compile-unresolved-functions byte-compile-inbuffer 1 " \n " nil looking-at ";" byte-compile-file-form read byte-compile-flush-pending byte-compile-warn-about-unresolved-functions] 3>)
# bind (byte-compile-warnings-beginning byte-compile-point-max-prev byte-compile-log-buffer byte-compile-macro-environment byte-compile-function-environment byte-compile-autoload-environment byte-compile-unresolved-functions byte-compile-bound-variables byte-compile-free-references byte-compile-free-assignments byte-compile-verbose byte-optimize byte-compile-emacs19-compatibility byte-compile-dynamic byte-compile-dynamic-docstrings byte-compile-warnings byte-compile-file-domain byte-compile-outbuffer float-output-format case-fold-search print-length print-level byte-compile-constants byte-compile-variables byte-compile-tag-number byte-compile-depth byte-compile-maxdepth byte-compile-output eval filename byte-compile-inbuffer)
--
Adrian Aichner
mailto:adrian＠xemacs.org
http://www.xemacs.org/
- 1 participants
- 0 comments
[Success, itimer-gc Crash] XEmacs 21.5-b23 "daikon" (+CVS-20051124) i586-pc-win32
18 years, 5 months
Adrian Aichner
Adrian Aichner
Native Windows -DNEW_GC now builds (this time I built with optimization).
Gnus basically works, but after idling a bit inside Gnus I get this crash:
Now building without optimization.
Adrian
> XEmacs Build Report generated by emacs-version
> 21.5 (beta23) "daikon" (+CVS-20051031) XEmacs Lucid
> with system-configuration
> i586-pc-win32
> follows:
> Contents of c:\Hacking\cvs.xemacs.org\XEmacs\xemacs-21.5-clean\Installation:
> (Output from most recent run of ./configure)
OS version:
Microsoft Windows XP [Version 5.1.2600]
OS: Windows_NT
XEmacs 21.5-b23 "daikon" (+CVS-20051124) configured for `i586-pc-win32'.
Building XEmacs using "NMAKE".
Building XEmacs using make flags " ".
Building XEmacs in source tree "c:\\Hacking\\cvs.xemacs.org\\XEmacs\\xemacs-21.5-clean".
For src, using compiler "cl -nologo -W3 -DSTRICT -Zi -O2 -G5 -Ob2 -MDd -c -Ic:\Hacking\cvs.xemacs.org\XEmacs\xemacs-21.5-clean\nt\inc -Ic:\Hacking\cvs.xemacs.org\XEmacs\xemacs-21.5-clean\src -I"c:\Hacking\libs4xemacs\xpm-3.4k" -I"c:\Hacking\libs4xemacs\xpm-3.4k\lib" -I"c:\Hacking\libs4xemacs\libpng-1.0.2" -I"c:\Hacking\libs4xemacs\zlib" -I"c:\Hacking\libs4xemacs\tiff-v3.4\libtiff" -I"c:\Hacking\libs4xemacs\jpeg-6b" -I"c:\Hacking\libs4xemacs\compface" -I"c:\Hacking\libs4xemacs\zlib" -DHAVE_MS_WINDOWS -DHAVE_MENUBARS -DHAVE_SCROLLBARS -DHAVE_TOOLBARS -DHAVE_WIDGETS -DHAVE_DIALOGS -DHAVE_XPM -DFOR_MSW -DHAVE_GIF -DHAVE_PNG -DHAVE_TIFF -DHAVE_JPEG -DHAVE_XFACE -DHAVE_ZLIB -DHAVE_NATIVE_SOUND -DMULE -DPDUMP -DNEW_GC -DUSE_KKCC -DMC_ALLOC -DSYSTEM_MALLOC -DDEBUG_XEMACS -D_DEBUG -DWIN32_LEAN_AND_MEAN -DWIN32_NATIVE -Demacs -DHAVE_CONFIG_H -DPATH_VERSION=\"21.5-b23\" -DPATH_PROGNAME=\"xemacs\" -DEMACS_VERSION=\"21.5-b23\" -DEMACS_PROGNAME=\"xemacs\" -DSTACK_TRACE_EYE_CATCHER=xemacs_21_5_b23_i586_pc_win32 -DPATH_PREFIX=\"..\" -DEMACS_MAJOR_VERSION=21 -DEMACS_MINOR_VERSION=5 -DEMACS_BETA_VERSION=23 -DXEMACS_CODENAME=\""daikon"\" -DXEMACS_EXTRA_NAME=\"(+CVS-20051124)\" -DEMACS_CONFIGURATION=\"i586-pc-win32\" -DPATH_PACKAGEPATH=\""~\\.xemacs;;c:\\Program Files\\XEmacs\\site-packages;c:\\Program Files\\XEmacs\\mule-packages;c:\\Program Files\\XEmacs\\xemacs-packages"\"".
For lib-src, using compiler "cl -nologo -W3 -DSTRICT -Zi -O2 -G5 -Ob2 -MDd -Ic:\Hacking\cvs.xemacs.org\XEmacs\xemacs-21.5-clean\lib-src -Ic:\Hacking\cvs.xemacs.org\XEmacs\xemacs-21.5-clean\src -DHAVE_CONFIG_H -DWIN32_NATIVE".
Installing XEmacs in "c:\\Program Files\\XEmacs\\XEmacs-21.5-b23".
Package path is "~\\.xemacs;;c:\\Program Files\\XEmacs\\site-packages;c:\\Program Files\\XEmacs\\mule-packages;c:\\Program Files\\XEmacs\\xemacs-packages".
Compiling in support for Microsoft Windows native GUI.
Compiling in international (MULE) support.
Compiling in support for XPM images.
Compiling in support for GIF images.
Compiling in support for PNG images.
Compiling in support for TIFF images.
Compiling in support for JPEG images.
Compiling in support for X-Face message headers.
Compiling in support for GZIP compression/decompression.
Compiling in support for toolbars.
Compiling in support for dialogs.
Compiling in support for widgets.
Compiling in support for native sounds.
Using portable dumper.
Using system malloc.
Using DLL version of C runtime library.
Compiling in debugging support (no slowdown).
Compiling with optimization.
Using new experimental GC algorithms.
Using new experimental allocator.
Using new experimental incremental garbage collector.
> Contents of c:\Hacking\cvs.xemacs.org\XEmacs\xemacs-21.5-clean\xemacs-21.5-clean-cvs-update.err
> keeping lines matching
> "^--\[\[\|\]\]$\|^\(cd\|n?make\)\s-\|errors?\|warnings?\|pure.*\(space\|size\)\|hides\b\|strange\|shadowings\|^Compil\(ing\s-+in\|ation\)\|^Using\|not\s-+found\|^While\s-+compiling.*\(
\s-+.+\)*\|^Note:\|Installing\|[Ff]ile(s) copied\|\s-+tests\s-+\|^[A-Z] [^ ]+$\|^Wrong number of arguments:\|^ \*\* "
> and then deleting lines matching
> "confl.*with.*auto-inlining\|^Formatting:"
cd c:\Hacking\cvs.xemacs.org\XEmacs\xemacs-21.5-clean\
Compilation started at Fri Nov 25 18:18:33 2005 +0100 (W. Europe Standard Time)
? gunzip-error.txt
? man/lispref/errors.texi.new
? nt/xemacs-21.5-clean-make-all-texinfo-error.err
P ChangeLog
P Makefile.in.in
P PROBLEMS
P configure
P configure.ac
P version.sh
P dynodump/Makefile.in.in
U etc/.cvsignore
P etc/ChangeLog
U etc/HELLO
P lib-src/ChangeLog
P lib-src/Makefile.in.in
P lib-src/etags.c
rcsmerge: warning: conflicts during merge
C lisp/ChangeLog
M lisp/cmdloop.el
P lisp/cus-start.el
P lisp/derived.el
P lisp/diagnose.el
P lisp/files.el
P lisp/frame.el
P lisp/glyphs.el
P lisp/help.el
P lisp/hyper-apropos.el
P lisp/menubar-items.el
P lisp/mouse.el
M lisp/package-get.el
P lisp/select.el
P lisp/simple.el
P lisp/specifier.el
P lisp/syntax.el
P lisp/toolbar.el
P lwlib/ChangeLog
P lwlib/Makefile.in.in
P lwlib/xlwcheckbox.c
P lwlib/xlwradio.c
P man/ChangeLog
P man/Makefile
P man/internals/internals.texi
P modules/ChangeLog
P modules/canna/canna_api.c
P modules/common/Makefile.common
P netinstall/ChangeLog
P netinstall/Makefile.in.in
P nt/ChangeLog
P nt/config.inc.samp
P nt/xemacs.dsp
P nt/xemacs.mak
P src/.cvsignore
U src/.dbxrc.in
U src/.gdbinit.in
P src/ChangeLog
P src/Makefile.in.in
P src/alloc.c
P src/buffer.c
P src/buffer.h
P src/bytecode.c
P src/bytecode.h
P src/config.h.in
P src/console-gtk-impl.h
P src/console-msw-impl.h
P src/console-stream-impl.h
P src/console-stream.c
P src/console-stream.h
P src/console-tty-impl.h
P src/console-tty.c
P src/console-x-impl.h
P src/console.c
P src/database.c
P src/depend
P src/device-gtk.c
P src/device-msw.c
P src/device-tty.c
P src/device-x.c
P src/device.c
P src/dumper.c
P src/dynarr.c
P src/elhash.c
P src/elhash.h
P src/emacs.c
P src/eval.c
P src/event-Xt.c
P src/event-msw.c
P src/events.c
P src/extents.c
P src/extents.h
P src/faces.h
P src/frame-gtk.c
rcsmerge: warning: conflicts during merge
C src/frame-msw.c
P src/frame-x.c
P src/frame.c
U src/gc.c
U src/gc.h
P src/glyphs-gtk.c
P src/glyphs-gtk.h
P src/glyphs.c
P src/glyphs.h
P src/gtk-xemacs.c
P src/keymap.c
P src/lisp.h
P src/lrecord.h
P src/mc-alloc.c
P src/mc-alloc.h
P src/mule-coding.c
P src/objects-tty-impl.h
P src/objects-tty.c
P src/objects.c
P src/print.c
P src/redisplay-gtk.c
P src/sound.c
P src/specifier.c
P src/specifier.h
P src/syntax.c
P src/syntax.h
P src/text.h
P src/toolbar.c
U src/vdb-fake.c
U src/vdb-mach.c
U src/vdb-posix.c
U src/vdb-win32.c
U src/vdb.c
U src/vdb.h
P src/window.c
cvs server: Updating tests
cvs server: Updating tests/DLL
M tests/automated/region-tests.el
U PROBLEMS
U dynodump/Makefile.in.in
U lib-src/Makefile.in.in
U lib-src/etags.c
U lisp/derived.el
U lisp/files.el
U lisp/frame.el
U lisp/glyphs.el
U lisp/hyper-apropos.el
U lisp/menubar-items.el
U lisp/mouse.el
U lisp/select.el
U lisp/specifier.el
U lisp/syntax.el
U lisp/toolbar.el
U lwlib/Makefile.in.in
U lwlib/xlwcheckbox.c
U man/Makefile
U modules/common/Makefile.common
U netinstall/Makefile.in.in
U src/glyphs-gtk.h
U src/gtk-xemacs.c
U src/mule-coding.c
U src/redisplay-gtk.c
U src/sound.c
U src/text.h
Compilation finished at Fri Nov 25 18:19:56
> Contents of c:\Hacking\cvs.xemacs.org\XEmacs\xemacs-21.5-clean\nt\xemacs-21.5-clean-make-all.err
> keeping lines matching
> "^--\[\[\|\]\]$\|^\(cd\|n?make\)\s-\|errors?\|warnings?\|pure.*\(space\|size\)\|hides\b\|strange\|shadowings\|^Compil\(ing\s-+in\|ation\)\|^Using\|not\s-+found\|^While\s-+compiling.*\(
\s-+.+\)*\|^Note:\|Installing\|[Ff]ile(s) copied\|\s-+tests\s-+\|^[A-Z] [^ ]+$\|^Wrong number of arguments:\|^ \*\* "
> and then deleting lines matching
> "confl.*with.*auto-inlining\|^Formatting:"
cd c:\Hacking\cvs.xemacs.org\XEmacs\xemacs-21.5-clean\nt\
nmake /f xemacs.mak all
Compilation started at Fri Nov 25 18:26:18 2005 +0100 (W. Europe Standard Time)
Installing XEmacs in "c:\\Program Files\\XEmacs\\XEmacs-21.5-b23".
1 file(s) copied.
1 File(s) copied
1 File(s) copied
Using load-path (c:\Hacking\cvs.xemacs.org\XEmacs\xemacs-21.5-clean\lisp\)
Using module-load-path (c:\Hacking\cvs.xemacs.org\XEmacs\xemacs-21.5-clean\modules)
Generating autoloads for lisp/next-error.el...
While compiling describe-register-1 in file c:\Hacking\cvs.xemacs.org\XEmacs\xemacs-21.5-clean\lisp\register.el:
** reference to free variable yank-excluded-properties
While compiling the end of the data:
** the function remove-list-of-text-properties is not known to be defined.
While compiling the end of the data in file c:\Hacking\cvs.xemacs.org\XEmacs\xemacs-21.5-clean\lisp\diagnose.el:
** The following functions are not known to be defined:
sort-numeric-fields, gc-stats
While compiling forward-paragraph in file c:\Hacking\cvs.xemacs.org\XEmacs\xemacs-21.5-clean\lisp\paragraphs.el:
** variable multiple-lines bound but not referenced
While compiling the end of the data:
** the function constrain-to-field is not known to be defined.
Using load-path (c:\Hacking\cvs.xemacs.org\XEmacs\xemacs-21.5-clean\lisp\)
Using module-load-path (c:\Hacking\cvs.xemacs.org\XEmacs\xemacs-21.5-clean\modules)
While compiling the end of the data in file c:\Hacking\cvs.xemacs.org\XEmacs\xemacs-21.5-clean\lisp\x-init.el:
** the function x-keysym-hash-table is not known to be defined.
Requiring next-error...
While compiling multi-occur in file c:\Hacking\cvs.xemacs.org\XEmacs\xemacs-21.5-clean\lisp\occur.el:
** variable ido-ignore-item-temp-list bound but not referenced
** misplaced interactive spec: (interactive (cons (let* ((bufs (list (read-buffer "First buffer to search: " (current-buffer) t))) (buf nil) (ido-ignore-item-temp-list bufs)) (while (not (string-equal (setq buf (read-buffer (if (and-boundp (quote read-buffer-function) (quote (eq read-buffer-function (quote ido-read-buffer)))) "Next buffer to search (C-j to end): " "Next buffer to search (RET to end): ") nil t)) "")) (add-to-list (quote bufs) buf) (setq ido-ignore-item-temp-list bufs)) (nreverse (mapcar (function get-buffer) bufs))) (occur-read-primary-args)))
While compiling occur-engine:
** reference to free variable jit-lock-mode
While compiling the end of the data:
** the function jit-lock-fontify-now is not known to be defined.
Compiling c:\Hacking\cvs.xemacs.org\XEmacs\xemacs-21.5-clean\lisp\next-error.el...
Wrote c:\Hacking\cvs.xemacs.org\XEmacs\xemacs-21.5-clean\lisp\next-error.elc
While compiling the end of the data in file c:\Hacking\cvs.xemacs.org\XEmacs\xemacs-21.5-clean\lisp\gtk.el:
** the function gtk-import-function is not known to be defined.
While compiling toplevel forms in file c:\Hacking\cvs.xemacs.org\XEmacs\xemacs-21.5-clean\lisp\gtk-iso8859-1.el:
** assignment to free variable character-set-property
While compiling toplevel forms in file c:\Hacking\cvs.xemacs.org\XEmacs\xemacs-21.5-clean\lisp\mule\thai-util.el:
** define-category called with 3 arguments, but accepts only 2
** define-category called with 3 arguments, but accepts only 2
** define-category called with 3 arguments, but accepts only 2
While compiling the end of the data:
** the function make-category-table is not known to be defined.
While compiling toplevel forms in file c:\Hacking\cvs.xemacs.org\XEmacs\xemacs-21.5-clean\lisp\mule\lao-util.el:
** define-category called with 3 arguments, but accepts only 2
** define-category called with 3 arguments, but accepts only 2
** define-category called with 3 arguments, but accepts only 2
** define-category called with 3 arguments, but accepts only 2
While compiling the end of the data:
** the function make-category-table is not known to be defined.
While compiling ethio-modify-vowel in file c:\Hacking\cvs.xemacs.org\XEmacs\xemacs-21.5-clean\lisp\mule\ethio-util.el:
** decompose-composite-char is an obsolete function; use char-to-string instead.
Computing custom-loads for next-error...
Compilation finished at Fri Nov 25 18:29:21
> Contents of c:\Hacking\cvs.xemacs.org\XEmacs\xemacs-21.5-clean\nt\xemacs-21.5-clean-make-check-temacs.err
> keeping lines matching
> "^--\[\[\|\]\]$\|^\(cd\|n?make\)\s-\|errors?\|warnings?\|pure.*\(space\|size\)\|hides\b\|strange\|shadowings\|^Compil\(ing\s-+in\|ation\)\|^Using\|not\s-+found\|^While\s-+compiling.*\(
\s-+.+\)*\|^Note:\|Installing\|[Ff]ile(s) copied\|\s-+tests\s-+\|^[A-Z] [^ ]+$\|^Wrong number of arguments:\|^ \*\* "
> and then deleting lines matching
> "confl.*with.*auto-inlining\|^Formatting:"
cd c:\Hacking\cvs.xemacs.org\XEmacs\xemacs-21.5-clean\nt\
nmake /f xemacs.mak check-temacs
Compilation started at Fri Nov 25 18:29:32 2005 +0100 (W. Europe Standard Time)
Using load-path (c:\Hacking\cvs.xemacs.org\XEmacs\xemacs-21.5-clean\lisp\)
Using module-load-path (c:\Hacking\cvs.xemacs.org\XEmacs\xemacs-21.5-clean\modules)
base64-tests.el: 1234 of 1234 tests successful (100%).
0 errors that should have been generated, but weren't
0 wrong-error failures
byte-compiler-tests.el: 66 of 66 tests successful (100%).
38 tests skipped because can't defadvice.
0 errors that should have been generated, but weren't
0 wrong-error failures
c-tests.el: 4 of 4 tests successful (100%).
0 errors that should have been generated, but weren't
0 wrong-error failures
case-tests.el: 1148 of 1148 tests successful (100%).
0 errors that should have been generated, but weren't
0 wrong-error failures
ccl-tests.el: 4570 of 4570 tests successful (100%).
0 errors that should have been generated, but weren't
0 wrong-error failures
database-tests.el: No tests run.
0 errors that should have been generated, but weren't
0 wrong-error failures
extent-tests.el: 194 of 194 tests successful (100%).
0 errors that should have been generated, but weren't
0 wrong-error failures
hash-table-tests.el: 9866 of 9866 tests successful (100%).
0 errors that should have been generated, but weren't
0 wrong-error failures
lisp-tests.el: 3672 of 3672 tests successful (100%).
0 errors that should have been generated, but weren't
0 wrong-error failures
md5-tests.el: 56 of 56 tests successful (100%).
0 errors that should have been generated, but weren't
0 wrong-error failures
mule-tests.el: 232 of 236 tests successful ( 98%).
0 errors that should have been generated, but weren't
0 wrong-error failures
Unexpected error (void-function executable-find) while executing interpreted code.
Unexpected error (void-function executable-find) while executing byte-compiled code.
os-tests.el: No tests run.
Unexpected error (void-function executable-find) while executing interpreted code
Unexpected error (void-function executable-find) while executing byte-compiled code
0 errors that should have been generated, but weren't
0 wrong-error failures
regexp-tests.el: 350 of 350 tests successful (100%).
0 errors that should have been generated, but weren't
0 wrong-error failures
region-tests-1-1.el: 28 of 28 tests successful (100%).
0 errors that should have been generated, but weren't
0 wrong-error failures
region-tests.el: 38 of 38 tests successful (100%).
0 errors that should have been generated, but weren't
0 wrong-error failures
symbol-tests.el: 246 of 246 tests successful (100%).
0 errors that should have been generated, but weren't
0 wrong-error failures
syntax-tests.el: 56 of 56 tests successful (100%).
2 tests skipped because c-mode unavailable.
0 errors that should have been generated, but weren't
0 wrong-error failures
tag-tests.el: 6 of 6 tests successful (100%).
0 errors that should have been generated, but weren't
0 wrong-error failures
weak-tests.el: 140 of 140 tests successful (100%).
0 errors that should have been generated, but weren't
0 wrong-error failures
base64-tests.el: 1234 of 1234 tests successful (100%).
byte-compiler-tests.el: 66 of 66 tests successful (100%).
c-tests.el: 4 of 4 tests successful (100%).
case-tests.el: 1148 of 1148 tests successful (100%).
ccl-tests.el: 4570 of 4570 tests successful (100%).
database-tests.el: No tests run.
extent-tests.el: 194 of 194 tests successful (100%).
hash-table-tests.el: 9866 of 9866 tests successful (100%).
lisp-tests.el: 3672 of 3672 tests successful (100%).
md5-tests.el: 56 of 56 tests successful (100%).
mule-tests.el: 232 of 236 tests successful ( 98%).
os-tests.el: No tests run.
regexp-tests.el: 350 of 350 tests successful (100%).
region-tests-1-1.el: 28 of 28 tests successful (100%).
region-tests.el: 38 of 38 tests successful (100%).
symbol-tests.el: 246 of 246 tests successful (100%).
syntax-tests.el: 56 of 56 tests successful (100%).
tag-tests.el: 6 of 6 tests successful (100%).
weak-tests.el: 140 of 140 tests successful (100%).
Compilation finished at Fri Nov 25 18:30:03
> Contents of c:\Hacking\cvs.xemacs.org\XEmacs\xemacs-21.5-clean\nt\xemacs-21.5-clean-make-check.err
> keeping lines matching
> "^--\[\[\|\]\]$\|^\(cd\|n?make\)\s-\|errors?\|warnings?\|pure.*\(space\|size\)\|hides\b\|strange\|shadowings\|^Compil\(ing\s-+in\|ation\)\|^Using\|not\s-+found\|^While\s-+compiling.*\(
\s-+.+\)*\|^Note:\|Installing\|[Ff]ile(s) copied\|\s-+tests\s-+\|^[A-Z] [^ ]+$\|^Wrong number of arguments:\|^ \*\* "
> and then deleting lines matching
> "confl.*with.*auto-inlining\|^Formatting:"
cd c:\Hacking\cvs.xemacs.org\XEmacs\xemacs-21.5-clean\nt\
nmake /f xemacs.mak check
Compilation started at Fri Nov 25 18:30:14 2005 +0100 (W. Europe Standard Time)
base64-tests.el: 1234 of 1234 tests successful (100%).
0 errors that should have been generated, but weren't
0 wrong-error failures
byte-compiler-tests.el: 104 of 104 tests successful (100%).
0 errors that should have been generated, but weren't
0 wrong-error failures
c-tests.el: 4 of 4 tests successful (100%).
0 errors that should have been generated, but weren't
0 wrong-error failures
case-tests.el: 1148 of 1148 tests successful (100%).
0 errors that should have been generated, but weren't
0 wrong-error failures
ccl-tests.el: 4570 of 4570 tests successful (100%).
0 errors that should have been generated, but weren't
0 wrong-error failures
database-tests.el: No tests run.
0 errors that should have been generated, but weren't
0 wrong-error failures
extent-tests.el: 194 of 194 tests successful (100%).
0 errors that should have been generated, but weren't
0 wrong-error failures
hash-table-tests.el: 9866 of 9866 tests successful (100%).
0 errors that should have been generated, but weren't
0 wrong-error failures
lisp-tests.el: 3672 of 3672 tests successful (100%).
0 errors that should have been generated, but weren't
0 wrong-error failures
md5-tests.el: 56 of 56 tests successful (100%).
0 errors that should have been generated, but weren't
0 wrong-error failures
mule-tests.el: 232 of 236 tests successful ( 98%).
0 errors that should have been generated, but weren't
0 wrong-error failures
os-tests.el: 20 of 20 tests successful (100%).
0 errors that should have been generated, but weren't
0 wrong-error failures
regexp-tests.el: 350 of 350 tests successful (100%).
0 errors that should have been generated, but weren't
0 wrong-error failures
region-tests-1-1.el: 28 of 28 tests successful (100%).
0 errors that should have been generated, but weren't
0 wrong-error failures
region-tests.el: 38 of 38 tests successful (100%).
0 errors that should have been generated, but weren't
0 wrong-error failures
symbol-tests.el: 246 of 246 tests successful (100%).
0 errors that should have been generated, but weren't
0 wrong-error failures
syntax-tests.el: 60 of 60 tests successful (100%).
0 errors that should have been generated, but weren't
0 wrong-error failures
tag-tests.el: 6 of 6 tests successful (100%).
0 errors that should have been generated, but weren't
0 wrong-error failures
weak-tests.el: 140 of 140 tests successful (100%).
0 errors that should have been generated, but weren't
0 wrong-error failures
base64-tests.el: 1234 of 1234 tests successful (100%).
byte-compiler-tests.el: 104 of 104 tests successful (100%).
c-tests.el: 4 of 4 tests successful (100%).
case-tests.el: 1148 of 1148 tests successful (100%).
ccl-tests.el: 4570 of 4570 tests successful (100%).
database-tests.el: No tests run.
extent-tests.el: 194 of 194 tests successful (100%).
hash-table-tests.el: 9866 of 9866 tests successful (100%).
lisp-tests.el: 3672 of 3672 tests successful (100%).
md5-tests.el: 56 of 56 tests successful (100%).
mule-tests.el: 232 of 236 tests successful ( 98%).
os-tests.el: 20 of 20 tests successful (100%).
regexp-tests.el: 350 of 350 tests successful (100%).
region-tests-1-1.el: 28 of 28 tests successful (100%).
region-tests.el: 38 of 38 tests successful (100%).
symbol-tests.el: 246 of 246 tests successful (100%).
syntax-tests.el: 60 of 60 tests successful (100%).
tag-tests.el: 6 of 6 tests successful (100%).
weak-tests.el: 140 of 140 tests successful (100%).
Compilation finished at Fri Nov 25 18:30:47
--
Adrian Aichner
mailto:adrian＠xemacs.org
http://www.xemacs.org/
- 1 participants
- 0 comments
XEmacs Packages have been pre-released (2005-11-25-09)
18 years, 5 months
Norbert Koch
Norbert Koch
-----BEGIN PGP SIGNED MESSAGE-----
Hash: SHA1
Hey there everyone.
I have just added the following packages to the 'Pre-Releases'
directory:
New Packages in Pre-Release:
===========================
ediff-1.59-pkg.tar.gz upstream version: 2.75
edit-utils-2.31-pkg.tar.gz upstream version: none
viper-1.47-pkg.tar.gz upstream version: 3.09
Previously Announced Packages Still in Pre-Release:
==================================================
apel-1.30-pkg.tar.gz upstream version: 10.2
bbdb-1.29-pkg.tar.gz upstream version: 2.34
c-support-1.22-pkg.tar.gz upstream version: none
ecrypto-0.20-pkg.tar.gz upstream version: 2.0
erc-0.19-pkg.tar.gz upstream version: Version 5.0 Revision: 1.776
games-1.17-pkg.tar.gz upstream version: 1.04
gnus-1.87-pkg.tar.gz upstream version: 5.10.7
ispell-1.32-pkg.tar.gz upstream version: 3.6
mail-lib-1.75-pkg.tar.gz upstream version: none
net-utils-1.48-pkg.tar.gz upstream version: N/A
pgg-1.06-pkg.tar.gz upstream version: 0.1
re-builder-1.05-pkg.tar.gz upstream version: 1.20
riece-1.21-pkg.tar.gz upstream version: 2.0.2
sasl-1.16-pkg.tar.gz upstream version: 1.14.4
sh-script-1.21-pkg.tar.gz upstream version: 2.0f
sieve-1.18-pkg.tar.gz upstream version: none
sml-mode-0.12-pkg.tar.gz upstream version: 3.9.5
speedbar-1.28-pkg.tar.gz upstream version: 0.14beta4
supercite-1.21-pkg.tar.gz upstream version: 3.55x3
texinfo-1.30-pkg.tar.gz upstream version: none
text-modes-1.90-pkg.tar.gz upstream version: none
tramp-1.28-pkg.tar.gz upstream version: 2.0.51
xemacs-base-2.00-pkg.tar.gz upstream version: none
xemacs-devel-1.72-pkg.tar.gz upstream version: none
xslt-process-1.12-pkg.tar.gz upstream version: 1.2.1
Detailed Changes:
================
- ------- ChangeLog Entries from xemacs-packages/ediff/ChangeLog -------
2005-11-25 Norbert Koch <viteno(a)xemacs.org>
* Makefile (VERSION): XEmacs package 1.59 released.
2005-11-25 Michael Kifer <kifer(a)cs.stonybrook.edu>
* ediff-wind (ediff-make-wide-display): Slight simplification.
* ediff.el (ediff-date): Changed the date of last update.
- ------- ChangeLog Entries from xemacs-packages/edit-utils/ChangeLog -------
2005-11-25 Norbert Koch <viteno(a)xemacs.org>
* Makefile (VERSION): XEmacs package 2.31 released.
2005-11-21 Adrian Aichner <adrian(a)xemacs.org>
* Makefile (ELCS): Add crm.elc.
- ------- ChangeLog Entries from xemacs-packages/viper/ChangeLog -------
2005-11-25 Norbert Koch <viteno(a)xemacs.org>
* Makefile (VERSION): XEmacs package 1.47 released.
2005-11-25 Michael Kifer <kifer(a)cs.stonybrook.edu>
* viper-keym.el (viper-ESC-key): use different values in terminal and
window modes.
* viper.el (viper-emacs-state-mode-list): delete mail-mode, add
jde-javadoc-checker-report-mode.
Installing These:
================
Manually:
- --------
1) Download the packages that you want to install from:
/ftp.xemacs.org:/pub/xemacs/beta/experimental/packages/
2) Unpack them to: [1]
/usr/local/lib/xemacs/xemacs-packages/
3) Re-start XEmacs.
Using XEmacs Package Tools (XEmacs 21.[245].x):
- ----------------------------------------------
1) Tools -> Packages -> Add Download Site -> Pre-Releases
2) Tools -> Packages -> List and Install
3) Select the packages you wish to install (there are brief
instructions at the bottom of the packages buffer).
4) Packages -> Install/Remove Selected
5) Re-start XEmacs.
Using XEmacs Package Tools (XEmacs 21.1.14):
- -------------------------------------------
1) Options -> Manage Packages -> Add Download Site -> Pre-Releases
2) Options -> Manage Packages -> List and Install
3 - 5) As per XEmacs 21.[245].x.
norbert - XEmacs Package Release Manager.
Footnotes:
[1] Note: Mule packages should be installed into:
/usr/local/lib/xemacs/mule-packages/
-----BEGIN PGP SIGNATURE-----
Version: GnuPG v1.2.7 (GNU/Linux)
iD8DBQFDhtUfgu3ywdHdhM0RArC/AJ4zMKWP+DcL0bLao+ADG4mkO3++aQCePl09
bOi08PifUyWT3b6sbZ+wv0c=
=33Wu
-----END PGP SIGNATURE-----
- 2 participants
- 1 comments
[Bug: 21.5-b23] [NEWGC] Crash
18 years, 5 months
Ilpo Nyyssönen
Ilpo Nyyssönen
================================================================
Dear Bug Team!
--8<---------------cut here---------------start------------->8---
Fatal Error: Received SIGSEGV (11) for address 0x34
Fatal error (11).
Your files have been auto-saved.
Use `M-x recover-session' to recover them.
Your version of XEmacs was distributed with a PROBLEMS file that may describe
your crash, and with luck a workaround. Please check it first, but do report
the crash anyway.
Please report this bug by invoking M-x report-emacs-bug, or by selecting
`Send Bug Report' from the Help menu. If that won't work, send ordinary
email to `xemacs-beta(a)xemacs.org'. *MAKE SURE* to include this entire
output from this crash, especially including the Lisp backtrace, as well as
the XEmacs configuration from M-x describe-installation (or equivalently,
the file `Installation' in the top of the build tree).
*Please* try *hard* to obtain a C stack backtrace; without it, we are unlikely
to be able to analyze the problem. Locate the core file produced as a result
of this crash (often called `core' or `core.<process-id>', and located in
the directory in which you started XEmacs or your home directory), and type
gdb /opt/xemacs/bin/xemacs core
then type `where' at the debugger prompt. No GDB on your system? You may
have DBX, or XDB, or SDB. (Ask your system administrator if you need help.)
If no core file was produced, enable them (often with `ulimit -c unlimited')
in case of future recurrance of the crash.
Lisp backtrace follows:
# (unwind-protect ...)
# (unwind-protect ...)
# (unwind-protect ...)
# (unwind-protect ...)
# (unwind-protect ...)
# (unwind-protect ...)
# (unwind-protect ...)
("(in garbage collection)" "[internal]")
# (unwind-protect ...)
# bind (direction saved-window window configuration)
restore-saved-window([cl-struct-window-configuration #<x-frame "XEmacs" 0x48220> 0 348 505 816 #<buffer "*Article*"> 13 10 4 [cl-struct-saved-window nil nil nil nil nil nil nil 0 0 497 795 0 0 nil nil [cl-struct-saved-window nil nil nil #<buffer "*Summary nnimap+ypy:inbox.lists.linux.kernel*"> #<marker in no buffer 0xbd3af00> #<marker at 1 in *Summary nnimap+ypy:inbox.lists.linux.kernel* 0xbd3af30> #<marker at 11 in *Summary nnimap+ypy:inbox.lists.linux.kernel* 0xbd3af18> 0 0 497 78 0 0 nil nil nil [cl-struct-saved-window t nil nil #<buffer "*Article*"> #<marker in no buffer 0xbd3af48> #<marker at 1 in *Article* 0xbd3af78> #<marker at 1 in *Article* 0xbd3af60> 0 78 497 795 0 0 nil nil nil nil]] [cl-struct-saved-window nil t nil #<buffer " *Minibuf-0*"> #<marker in no buffer 0xbd3aeb8> #<marker at 1 in *Minibuf-0* 0xbd3aee8> #<marker at 1 in *Minibuf-0* 0xbd3aed0> 0 795 497 808 0 0 nil nil nil nil]]] #<window on "*Summary nnimap+ypy:inbox.lists.linux.kernel*" 0x48225> [cl!
-struct-saved-window nil nil nil #<buffer "*Summary nnimap+ypy:inbox.lists.linux.kernel*"> #<marker in no buffer 0xbd3af00> #<marker at 1 in *Summary nnimap+ypy:inbox.lists.linux.kernel* 0xbd3af30> #<marker at 11 in *Summary nnimap+ypy:inbox.lists.linux.kernel* 0xbd3af18> 0 0 497 78 0 0 nil nil nil [cl-struct-saved-window t nil nil #<buffer "*Article*"> #<marker in no buffer 0xbd3af48> #<marker at 1 in *Article* 0xbd3af78> #<marker at 1 in *Article* 0xbd3af60> 0 78 497 795 0 0 nil nil nil nil]] vertical)
# bind (direction saved-window window configuration)
restore-saved-window([cl-struct-window-configuration #<x-frame "XEmacs" 0x48220> 0 348 505 816 #<buffer "*Article*"> 13 10 4 [cl-struct-saved-window nil nil nil nil nil nil nil 0 0 497 795 0 0 nil nil [cl-struct-saved-window nil nil nil #<buffer "*Summary nnimap+ypy:inbox.lists.linux.kernel*"> #<marker in no buffer 0xbd3af00> #<marker at 1 in *Summary nnimap+ypy:inbox.lists.linux.kernel* 0xbd3af30> #<marker at 11 in *Summary nnimap+ypy:inbox.lists.linux.kernel* 0xbd3af18> 0 0 497 78 0 0 nil nil nil [cl-struct-saved-window t nil nil #<buffer "*Article*"> #<marker in no buffer 0xbd3af48> #<marker at 1 in *Article* 0xbd3af78> #<marker at 1 in *Article* 0xbd3af60> 0 78 497 795 0 0 nil nil nil nil]] [cl-struct-saved-window nil t nil #<buffer " *Minibuf-0*"> #<marker in no buffer 0xbd3aeb8> #<marker at 1 in *Minibuf-0* 0xbd3aee8> #<marker at 1 in *Minibuf-0* 0xbd3aed0> 0 795 497 808 0 0 nil nil nil nil]]] #<window on "*Summary nnimap+ypy:inbox.lists.linux.kernel*" 0x48225> [cl!
-struct-saved-window nil nil nil nil nil nil nil 0 0 497 795 0 0 nil nil [cl-struct-saved-window nil nil nil #<buffer "*Summary nnimap+ypy:inbox.lists.linux.kernel*"> #<marker in no buffer 0xbd3af00> #<marker at 1 in *Summary nnimap+ypy:inbox.lists.linux.kernel* 0xbd3af30> #<marker at 11 in *Summary nnimap+ypy:inbox.lists.linux.kernel* 0xbd3af18> 0 0 497 78 0 0 nil nil nil [cl-struct-saved-window t nil nil #<buffer "*Article*"> #<marker in no buffer 0xbd3af48> #<marker at 1 in *Article* 0xbd3af78> #<marker at 1 in *Article* 0xbd3af60> 0 78 497 795 0 0 nil nil nil nil]] [cl-struct-saved-window nil t nil #<buffer " *Minibuf-0*"> #<marker in no buffer 0xbd3aeb8> #<marker at 1 in *Minibuf-0* 0xbd3aee8> #<marker at 1 in *Minibuf-0* 0xbd3aed0> 0 795 497 808 0 0 nil nil nil nil]] vertical)
# bind (window-configuration-current-window root-window configuration frame)
really-set-window-configuration(#<x-frame "XEmacs" 0x48220> [cl-struct-window-configuration #<x-frame "XEmacs" 0x48220> 0 348 505 816 #<buffer "*Article*"> 13 10 4 [cl-struct-saved-window nil nil nil nil nil nil nil 0 0 497 795 0 0 nil nil [cl-struct-saved-window nil nil nil #<buffer "*Summary nnimap+ypy:inbox.lists.linux.kernel*"> #<marker in no buffer 0xbd3af00> #<marker at 1 in *Summary nnimap+ypy:inbox.lists.linux.kernel* 0xbd3af30> #<marker at 11 in *Summary nnimap+ypy:inbox.lists.linux.kernel* 0xbd3af18> 0 0 497 78 0 0 nil nil nil [cl-struct-saved-window t nil nil #<buffer "*Article*"> #<marker in no buffer 0xbd3af48> #<marker at 1 in *Article* 0xbd3af78> #<marker at 1 in *Article* 0xbd3af60> 0 78 497 795 0 0 nil nil nil nil]] [cl-struct-saved-window nil t nil #<buffer " *Minibuf-0*"> #<marker in no buffer 0xbd3aeb8> #<marker at 1 in *Minibuf-0* 0xbd3aee8> #<marker at 1 in *Minibuf-0* 0xbd3aed0> 0 795 497 808 0 0 nil nil nil nil]]])
# bind (frame configuration)
set-window-configuration([cl-struct-window-configuration #<x-frame "XEmacs" 0x48220> 0 348 505 816 #<buffer "*Article*"> 13 10 4 [cl-struct-saved-window nil nil nil nil nil nil nil 0 0 497 795 0 0 nil nil [cl-struct-saved-window nil nil nil #<buffer "*Summary nnimap+ypy:inbox.lists.linux.kernel*"> #<marker in no buffer 0xbd3af00> #<marker at 1 in *Summary nnimap+ypy:inbox.lists.linux.kernel* 0xbd3af30> #<marker at 11 in *Summary nnimap+ypy:inbox.lists.linux.kernel* 0xbd3af18> 0 0 497 78 0 0 nil nil nil [cl-struct-saved-window t nil nil #<buffer "*Article*"> #<marker in no buffer 0xbd3af48> #<marker at 1 in *Article* 0xbd3af78> #<marker at 1 in *Article* 0xbd3af60> 0 78 497 795 0 0 nil nil nil nil]] [cl-struct-saved-window nil t nil #<buffer " *Minibuf-0*"> #<marker in no buffer 0xbd3aeb8> #<marker at 1 in *Minibuf-0* 0xbd3aee8> #<marker at 1 in *Minibuf-0* 0xbd3aed0> 0 795 497 808 0 0 nil nil nil nil]]])
# bind (obuf owin opoint win func in-buffer selected new-sum-start new-sum-hscroll nosaves nosave-but-article nosave-in-article up-to-top keys new-sum-point not-restore-window key arg)
gnus-article-read-summary-keys(nil)
# bind (command-debug-status)
call-interactively(gnus-article-read-summary-keys)
(dispatch-event "[internal]")
# (condition-case ... . error)
# (catch top-level ...)
--8<---------------cut here---------------end--------------->8---
--8<---------------cut here---------------start------------->8---
#0 0xb7fe8402 in __kernel_vsyscall ()
#1 0x00696586 in ?? () from /lib/libc.so.6
#2 0x080ecab4 in fatal_error_signal (sig=6) at emacs.c:3767
#3 <signal handler called>
#4 0xb7fe8402 in __kernel_vsyscall ()
#5 0x00696586 in ?? () from /lib/libc.so.6
#6 0x080eca9e in fatal_error_signal (sig=11) at emacs.c:3765
#7 <signal handler called>
#8 0x0811e7fe in detagged_lisp_object_size (h=0x113cc0dc) at lrecord.h:1786
#9 0x081f0abd in remove_cell (ptr=0x113cc0dc, ph=0xc019488) at mc-alloc.c:1452
#10 0x081f0f78 in sweep_page (ph=0xc019488) at mc-alloc.c:1618
#11 0x081ef480 in visit_all_used_page_headers (f=0x81f0e52 <sweep_page>)
at mc-alloc.c:449
#12 0x081f0fe4 in mc_sweep () at mc-alloc.c:1634
#13 0x0818109f in gc_sweep () at gc.c:1718
#14 0x0818152b in gc_1 (incremental=1) at gc.c:1897
#15 0x0818156a in gc (incremental=1) at gc.c:1917
#16 0x081815c2 in gc_incremental () at gc.c:1946
#17 0x080f799d in Ffuncall (nargs=5, args=0xbfde4174) at eval.c:3822
#18 0x080a16a9 in execute_optimized_program (
program=0xb831e88 "\fﾅH\vsｬ\006ﾆﾇ\f\"\210\fﾈHｫk\fﾅH\vsｬ\006ﾆﾇ\f\"\210\fﾈHﾅH\vsｬ\024ﾆﾉ\fﾅH\vsｬ\006ﾆﾇ\f\"\210\fﾈH\"\210\fﾅH\vsｬ\006ﾆﾇ\f\"\210\fﾈHﾊHｬ0\bﾋaｫ\tﾌ\nﾍ\211#\210ｪ\f\bﾎaｫ\aﾌ\nﾍﾏ#\210ﾐ\tﾑ\n!\fﾅH\vsｬ\006ﾆﾇ\f\"\210\fﾈH\b$\210\fﾅH\vsｬ\006ﾆﾒ\f\"\210\fﾓHｫ\026ﾐ\t\n\fﾅH\vsｬ\006ﾆﾒ\f\"\210\fﾓHﾎ$\210\fﾅH\vsｬ\006ﾆﾔ\f\"\210\fﾕHｫ\026ﾐ\t\n\fﾅH\vsｬ\006ﾆﾔ\f\"\210\fﾕHﾋ$\210\f"..., stack_depth=6,
constants_data=0xa6e6580) at bytecode.c:862
#19 0x080f77ba in funcall_compiled_function (fun=175963540, nargs=4,
args=0xbfde44a8) at eval.c:3495
#20 0x080f7ef0 in Ffuncall (nargs=5, args=0xbfde44a4) at eval.c:3929
#21 0x080a16a9 in execute_optimized_program (
program=0xb831e88 "\fﾅH\vsｬ\006ﾆﾇ\f\"\210\fﾈHｫk\fﾅH\vsｬ\006ﾆﾇ\f\"\210\fﾈHﾅH\vsｬ\024ﾆﾉ\fﾅH\vsｬ\006ﾆﾇ\f\"\210\fﾈH\"\210\fﾅH\vsｬ\006ﾆﾇ\f\"\210\fﾈHﾊHｬ0\bﾋaｫ\tﾌ\nﾍ\211#\210ｪ\f\bﾎaｫ\aﾌ\nﾍﾏ#\210ﾐ\tﾑ\n!\fﾅH\vsｬ\006ﾆﾇ\f\"\210\fﾈH\b$\210\fﾅH\vsｬ\006ﾆﾒ\f\"\210\fﾓHｫ\026ﾐ\t\n\fﾅH\vsｬ\006ﾆﾒ\f\"\210\fﾓHﾎ$\210\fﾅH\vsｬ\006ﾆﾔ\f\"\210\fﾕHｫ\026ﾐ\t\n\fﾅH\vsｬ\006ﾆﾔ\f\"\210\fﾕHﾋ$\210\f"..., stack_depth=6,
constants_data=0xa6e6580) at bytecode.c:862
#22 0x080f77ba in funcall_compiled_function (fun=175963540, nargs=4,
args=0xbfde47d8) at eval.c:3495
#23 0x080f7ef0 in Ffuncall (nargs=5, args=0xbfde47d4) at eval.c:3929
#24 0x080a16a9 in execute_optimized_program (
program=0xbbbb468 "ﾆ\211\026%\026&ﾇ\026(ﾈ\f!\210ﾉ\r!\210\rﾆH\vsｬ\006ﾊﾋ\r\"\210\rﾌH\rﾆH\vsｬ\006ﾊﾍ\r\"\210\rﾎH\032\211\036\020ﾏ\fﾐ\"kｬ\bﾑ\fﾐ\016\020#\210\nﾏ\fﾂ\"kｬ\aﾑ\fﾂ\n#\210*ﾒ\f!\036'ﾓ\rﾆH\vsｬ\006ﾊﾔ\r\"\210\rﾕHﾖﾗ\f!!Zﾇﾗ\f!#\210ﾘﾗ\f!!\210ﾇ\031ﾙ\r\016'\rﾆH\vsｬ\006ﾊﾚ\r\"\210\rﾛHﾜ$\210\tｫ\005ﾘ\t!\210*\rﾆH\vsｬ\006ﾊﾝ\r\"\210\rﾞH\026%\rﾆH\vsｬ\006ﾊﾟ\r\"\210\r潯\026&\rﾆH\vsｬ\006ﾊ畚r\"\210\r礬"...,
stack_depth=7, constants_data=0xa7252b8) at bytecode.c:862
#25 0x080f77ba in funcall_compiled_function (fun=175963760, nargs=2,
args=0xbfde4b08) at eval.c:3495
#26 0x080f7ef0 in Ffuncall (nargs=3, args=0xbfde4b04) at eval.c:3929
#27 0x080a16a9 in execute_optimized_program (
program=0xa4b7588 "\nﾃH\bsｬ\006ﾄﾅ\n\"\210\nﾆH\031ﾇ\t!ｭ\rﾈ\nﾉ \"?ｭ\005ﾊ\t\n\")\207", stack_depth=3, constants_data=0xa73c4e8) at bytecode.c:862
#28 0x080f77ba in funcall_compiled_function (fun=175983184, nargs=1,
args=0xbfde4e28) at eval.c:3495
#29 0x080f7ef0 in Ffuncall (nargs=2, args=0xbfde4e24) at eval.c:3929
#30 0x080a16a9 in execute_optimized_program (
program=0xc4093e0 "ﾆ \210ﾇﾈﾉﾊﾋ\211\031\035\0364\030\036)\0361\212\nq\210ﾋ\036*\0165ｮ\003\0166\0162B\0262ﾌﾍ!ｫ\bﾎﾏﾋ!!ｪ\004ﾏﾋ!\025*ﾐﾑ!\210\r\0161ｶｬ\f\r\016)ｶｬ\006\r\bｶｫAﾋ\034ﾒ \0367ﾓ\216ﾔ\nﾕ\"\210ﾋ\036*ﾖﾗ \r\"\024+\fｫ\005\fｧｫ\006ﾘ \210ｪ\017\r\bｶｬ\004\nq\210ﾙ\f!\210`\021\r\016)ｶｭ\006ﾔ\0168ﾕ\")\202ｵ", stack_depth=9,
constants_data=0xb38aa58) at bytecode.c:862
#31 0x080f77ba in funcall_compiled_function (fun=193379776, nargs=1,
args=0xbfde5164) at eval.c:3495
#32 0x080f7ef0 in Ffuncall (nargs=2, args=0xbfde5160) at eval.c:3929
#33 0x080aa175 in Fcall_interactively (function=186794152,
record_flag=174412952, keys=174412952) at callint.c:994
#34 0x080f58c2 in Fcommand_execute (cmd=186794152, record_flag=174412952,
keys=174412952) at eval.c:3116
#35 0x0811344c in execute_command_event (command_builder=0x9fd0420,
event=185774312) at event-stream.c:4286
#36 0x08113e33 in Fdispatch_event (event=185774312) at event-stream.c:4590
#37 0x080b499f in Fcommand_loop_1 () at cmdloop.c:600
#38 0x080b4764 in command_loop_1 (unused_dummy=174412952) at cmdloop.c:505
#39 0x080f3c7f in condition_case_1 (handlers=174408088,
bfun=0x80b4734 <command_loop_1>, barg=174412952,
hfun=0x80b436b <cmd_error>, harg=174412952) at eval.c:1924
#40 0x080b448b in command_loop_3 () at cmdloop.c:262
#41 0x080b44ae in command_loop_2 (unused_dummy=174412952) at cmdloop.c:275
#42 0x080f373a in internal_catch (tag=174164488,
func=0x80b44a3 <command_loop_2>, arg=174412952, threw=0x0, thrown_tag=0x0,
backtrace_before_throw=0x0) at eval.c:1530
#43 0x080b4595 in initial_command_loop (load_me=174412952) at cmdloop.c:313
#44 0x080eb815 in xemacs_21_5_b23_i686_pc_linux (argc=1, argv=0xbfde5884,
unused_envp=0x0, restart=0) at emacs.c:2641
#45 0x080ec177 in main (argc=1, argv=0xbfde5884, unused_envp=0xbfde588c)
at emacs.c:3085
--8<---------------cut here---------------end--------------->8---
================================================================
System Info to help track down your bug:
---------------------------------------
uname -a: Linux iny.iki.fi 2.6.14-1.1637_FC4smp #1 SMP Wed Nov 9 18:34:11 EST 2005 i686 i686 i386 GNU/Linux
./configure '--prefix=/opt/xemacs' '--enable-mule' '--enable-widgets=athena' '--enable-dialogs=athena' '--with-socks' '--without-canna' '--without-wnn' '--with-newgc'
XEmacs 21.5-b23 "daikon" (+CVS-20051124) configured for `i686-pc-linux'.
Compilation Environment and Installation Defaults:
Source code location: /home/biny/packages/repositories/xemacs
Installation prefix: /opt/xemacs
Operating system description file: `s/linux.h'
Machine description file: `m/intel386.h'
Compiler version: gcc (GCC) 4.0.1 20050727 (Red Hat 4.0.1-5)
- GCC specs file: specs.
- Compiler command: gcc -Wall -Wno-switch -Wundef -Wsign-compare -Wno-char-subscripts -Wpacked -Wunused-parameter -g
libc version: glibc-2.3.5-10.3
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/Xaw
- Athena library to link: Xaw
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 LDAP.
Compiling in support for PostgreSQL.
- Using PostgreSQL header file: libpq-fe.h
- Using PostgreSQL V7 bindings.
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.
Mail:
Compiling in support for "file" mail spool file locking method.
Other Features:
Inhibiting IPv6 canonicalization at startup.
Compiling in support for SOCKS.
Compiling in support for dynamic shared object modules.
Using the new GC algorithms.
WARNING: ---------------------------------------------------------
WARNING: The new algorithms are experimental. They are enabled by
WARNING: default for this release. Use `--disable-kkcc' to
WARNING: turn it off.
WARNING: ---------------------------------------------------------
Using the new allocator.
WARNING: ---------------------------------------------------------
WARNING: The new allocator is experimental. It is enabled by
WARNING: default for this release. Use `--disable-mc-alloc' to
WARNING: turn it off.
WARNING: ---------------------------------------------------------
Using the new incremental garbage collector.
Using POSIX sigaction() to install fault handler.
Using the new portable dumper.
Compiling in support for extra debugging code.
Compiling in support for runtime error checking.
WARNING: ---------------------------------------------------------
WARNING: XEmacs will run noticeably more slowly as a result.
WARNING: Error checking is on by default for XEmacs beta releases.
WARNING: ---------------------------------------------------------
Load-Path Lisp Shadows:
----------------------
(/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/encrypt
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/ecrypto/encrypt
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/md4
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/ecrypto/md4
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/sha1
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/ecrypto/sha1
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/hex-util
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/ecrypto/hex-util
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/password
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/ecrypto/password
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/yenc
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/yenc
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/webmail
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/webmail
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/uudecode
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/uudecode
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/utf7
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/utf7
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/time-date
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/time-date
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/spam
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/spam
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/spam-stat
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/spam-stat
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/spam-report
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/spam-report
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/smime
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/smime
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/smiley
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/smiley
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/score-mode
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/score-mode
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/rfc2231
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/rfc2231
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/rfc2047
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/rfc2047
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/rfc2045
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/rfc2045
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/rfc1843
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/rfc1843
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/qp
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/qp
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/parse-time
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/parse-time
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/nnwfm
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/nnwfm
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/nnweb
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/nnweb
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/nnwarchive
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/nnwarchive
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/nnvirtual
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/nnvirtual
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/nnultimate
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/nnultimate
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/nntp
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/nntp
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/nnspool
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/nnspool
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/nnsoup
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/nnsoup
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/nnslashdot
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/nnslashdot
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/nnrss
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/nnrss
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/nnoo
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/nnoo
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/nnnil
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/nnnil
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/nnml
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/nnml
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/nnmh
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/nnmh
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/nnmbox
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/nnmbox
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/nnmaildir
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/nnmaildir
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/nnmail
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/nnmail
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/nnlistserv
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/nnlistserv
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/nnkiboze
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/nnkiboze
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/nnimap
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/nnimap
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/nnheaderxm
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/nnheaderxm
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/nnheader
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/nnheader
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/nngateway
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/nngateway
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/nnfolder
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/nnfolder
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/nneething
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/nneething
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/nndraft
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/nndraft
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/nndoc
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/nndoc
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/nndir
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/nndir
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/nndiary
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/nndiary
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/nndb
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/nndb
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/nnbabyl
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/nnbabyl
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/nnagent
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/nnagent
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/mml2015
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/mml2015
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/mml1991
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/mml1991
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/mml
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/mml
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/mml-smime
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/mml-smime
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/mml-sec
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/mml-sec
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/mm-view
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/mm-view
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/mm-uu
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/mm-uu
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/mm-util
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/mm-util
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/mm-url
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/mm-url
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/mm-partial
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/mm-partial
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/mm-extern
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/mm-extern
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/mm-encode
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/mm-encode
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/mm-decode
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/mm-decode
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/mm-bodies
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/mm-bodies
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/messcompat
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/messcompat
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/messagexmas
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/messagexmas
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/message
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/message
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/mailcap
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/mailcap
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/mail-source
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/mail-source
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/mail-prsvr
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/mail-prsvr
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/mail-parse
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/mail-parse
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/imap
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/imap
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/ietf-drums
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/ietf-drums
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/html2text
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/html2text
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/hashcash
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/hashcash
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/gnus
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/gnus
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/gnus-xmas
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/gnus-xmas
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/gnus-win
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/gnus-win
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/gnus-vm
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/gnus-vm
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/gnus-uu
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/gnus-uu
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/gnus-util
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/gnus-util
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/gnus-undo
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/gnus-undo
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/gnus-topic
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/gnus-topic
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/gnus-sum
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/gnus-sum
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/gnus-start
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/gnus-start
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/gnus-srvr
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/gnus-srvr
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/gnus-spec
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/gnus-spec
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/gnus-soup
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/gnus-soup
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/gnus-sieve
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/gnus-sieve
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/gnus-setup
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/gnus-setup
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/gnus-score
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/gnus-score
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/gnus-salt
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/gnus-salt
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/gnus-registry
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/gnus-registry
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/gnus-range
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/gnus-range
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/gnus-picon
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/gnus-picon
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/gnus-nocem
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/gnus-nocem
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/gnus-msg
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/gnus-msg
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/gnus-move
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/gnus-move
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/gnus-mlspl
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/gnus-mlspl
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/gnus-ml
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/gnus-ml
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/gnus-mh
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/gnus-mh
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/gnus-logic
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/gnus-logic
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/gnus-kill
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/gnus-kill
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/gnus-int
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/gnus-int
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/gnus-group
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/gnus-group
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/gnus-fun
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/gnus-fun
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/gnus-ems
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/gnus-ems
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/gnus-eform
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/gnus-eform
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/gnus-dup
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/gnus-dup
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/gnus-draft
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/gnus-draft
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/gnus-dired
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/gnus-dired
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/gnus-diary
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/gnus-diary
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/gnus-demon
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/gnus-demon
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/gnus-delay
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/gnus-delay
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/gnus-cus
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/gnus-cus
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/gnus-cite
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/gnus-cite
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/gnus-cache
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/gnus-cache
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/gnus-bcklg
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/gnus-bcklg
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/gnus-audio
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/gnus-audio
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/gnus-async
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/gnus-async
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/gnus-art
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/gnus-art
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/gnus-agent
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/gnus-agent
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/format-spec
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/format-spec
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/flow-fill
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/flow-fill
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/earcon
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/earcon
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/deuglify
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/deuglify
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/compface
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/compface
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/canlock
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/canlock
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/binhex
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/gnus/binhex
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/starttls
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/mail-lib/starttls
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/rfc2104
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/mail-lib/rfc2104
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/tls
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/mail-lib/tls
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/netrc
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/mail-lib/netrc
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/pop3
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/mail-lib/pop3
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/dns-mode
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/net-utils/dns-mode
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/dig
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/net-utils/dig
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/dns
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/net-utils/dns
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/pgg-parse
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/pgg/pgg-parse
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/pgg-pgp5
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/pgg/pgg-pgp5
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/pgg-def
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/pgg/pgg-def
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/pgg
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/pgg/pgg
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/pgg-pgp
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/pgg/pgg-pgp
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/pgg-gpg
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/pgg/pgg-gpg
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/sasl-ntlm
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/sasl/sasl-ntlm
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/sasl-cram
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/sasl/sasl-cram
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/sasl-digest
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/sasl/sasl-digest
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/hmac-md5
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/sasl/hmac-md5
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/sasl
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/sasl/sasl
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/hmac-def
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/sasl/hmac-def
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/ntlm
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/sasl/ntlm
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/sieve-mode
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/sieve/sieve-mode
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/sieve-manage
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/sieve/sieve-manage
/opt/xemacs/lib/xemacs/site-packages/lisp/gnus/sieve
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/sieve/sieve
/opt/xemacs/lib/xemacs/mule-packages/lisp/mule-base/viet-util
/opt/xemacs/lib/xemacs-21.5-b23/lisp/mule/viet-util
/opt/xemacs/lib/xemacs/mule-packages/lisp/mule-base/japan-util
/opt/xemacs/lib/xemacs-21.5-b23/lisp/mule/japan-util
/opt/xemacs/lib/xemacs/mule-packages/lisp/mule-base/ethio-util
/opt/xemacs/lib/xemacs-21.5-b23/lisp/mule/ethio-util
/opt/xemacs/lib/xemacs/mule-packages/lisp/mule-base/cyril-util
/opt/xemacs/lib/xemacs-21.5-b23/lisp/mule/cyril-util
/opt/xemacs/lib/xemacs/mule-packages/lisp/mule-base/china-util
/opt/xemacs/lib/xemacs-21.5-b23/lisp/mule/china-util
/opt/xemacs/lib/xemacs/mule-packages/lisp/mule-base/korea-util
/opt/xemacs/lib/xemacs-21.5-b23/lisp/mule/korea-util
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/xemacs-base/regexp-opt
/opt/xemacs/lib/xemacs-21.5-b23/lisp/regexp-opt
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/build/build-report
/opt/xemacs/lib/xemacs-21.5-b23/lisp/build-report
/opt/xemacs/lib/xemacs/mule-packages/lisp/mule-ucs/unicode
/opt/xemacs/lib/xemacs-21.5-b23/lisp/unicode /home/biny/.xemacs/custom
/opt/xemacs/lib/xemacs-21.5-b23/lisp/custom
/opt/xemacs/lib/xemacs/xemacs-packages/lisp/xemacs-base/easy-mmode
/opt/xemacs/lib/xemacs-21.5-b23/lisp/easy-mmode)
Installed XEmacs Packages:
-------------------------
(zenirc ver: 1.16 upstream: 2.112)
(xwem ver: 1.21 upstream: lg(a)xwem.org--2005/xwem--main--2.1--versionfix-1)
(xslt-process ver: 1.12 upstream: 1.2.1)
(xslide ver: 1.09 upstream: 0.2.2)
(xlib ver: 1.14 upstream: lg(a)xwem.org--2005/xlib--main--2.1--version-0)
(xetla ver: 1.0 upstream: steve(a)eicq.org--2005/xetla--main--1.0--version-0)
(xemacs-devel ver: 1.72 upstream: No-Upstream-Ver)
(xemacs-base ver: 2.0 upstream: No-Upstream-Ver)
(x-symbol ver: 1.1 upstream: 4.5.1)
(w3 ver: 1.31 upstream: 4.0pre47)
(vm ver: 7.22 upstream: 7.17)
(viper ver: 1.47 upstream: 3.09)
(view-process ver: 1.13 upstream: 2.4)
(vhdl ver: 1.2 upstream: 3.33.2)
(vc-cc ver: 1.22 upstream: No-Upstream-Ver)
(vc ver: 1.41 upstream: No-Upstream-Ver)
(tramp ver: 1.28 upstream: 2.0.51)
(tpu ver: 1.14 upstream: 4.2X)
(tooltalk ver: 1.15 upstream: No-Upstream-Ver)
(tm ver: 1.38 upstream: No-Upstream-Ver)
(time ver: 1.14 upstream: 1.17)
(textools ver: 1.15 upstream: No-Upstream-Ver)
(text-modes ver: 1.9 upstream: No-Upstream-Ver)
(texinfo ver: 1.3 upstream: No-Upstream-Ver)
(supercite ver: 1.21 upstream: 3.55x3)
(strokes ver: 1.1 upstream: No-Upstream-Ver)
(speedbar ver: 1.28 upstream: 0.14beta4)
(sounds-wav ver: 1.12 upstream: No-Upstream-Ver)
(sounds-au ver: 1.12 upstream: No-Upstream-Ver)
(sml-mode ver: 0.12 upstream: 3.9.5)
(slider ver: 1.15 upstream: 0.3x1)
(sieve ver: 1.18 upstream: No-Upstream-Ver)
(sh-script ver: 1.21 upstream: 2.0f)
(sgml ver: 1.11 upstream: No-Upstream-Ver)
(semantic ver: 1.19 upstream: 1.4.2)
(scheme ver: 1.14 upstream: No-Upstream-Ver)
(sasl ver: 1.16 upstream: 1.14.4)
(ruby-modes ver: 1.02 upstream: 1.6.8)
(rmail ver: 1.14 upstream: No-Upstream-Ver)
(riece ver: 1.21 upstream: 2.0.2)
(reftex ver: 1.34 upstream: 4.21)
(re-builder ver: 1.05 upstream: 1.20)
(python-modes ver: 1.06 upstream: No-Upstream-Ver)
(psgml-dtds ver: 1.03 upstream: No-Upstream-Ver)
(psgml ver: 1.44 upstream: 1.3.1)
(ps-print ver: 1.11 upstream: 6.5.6)
(prog-modes ver: 2.05 upstream: No-Upstream-Ver)
(pgg ver: 1.06 upstream: 0.1)
(perl-modes ver: 1.08 upstream: No-Upstream-Ver)
(pcomplete ver: 1.04 upstream: 1.1.6)
(pcl-cvs ver: 1.66 upstream: R-2_9_9)
(pc ver: 1.28 upstream: No-Upstream-Ver)
(os-utils ver: 1.36 upstream: No-Upstream-Ver)
(oo-browser ver: 1.04 upstream: 4.08)
(ocaml ver: 0.05 upstream: 3.06)
(net-utils ver: 1.48 upstream: N/A)
(mmm-mode ver: 1.02 upstream: 0.4.7)
(misc-games ver: 1.18 upstream: No-Upstream-Ver)
(mine ver: 1.16 upstream: 1.9)
(mh-e ver: 1.29 upstream: 7.4.2)
(mew ver: 1.19 upstream: 1.94.2)
(mailcrypt ver: 2.14 upstream: 3.5.8)
(mail-lib ver: 1.75 upstream: No-Upstream-Ver)
(liece ver: 1.15 upstream: 1.4.9)
(jde ver: 1.48 upstream: 2.3.2)
(ispell ver: 1.32 upstream: 3.6)
(ilisp ver: 1.33 upstream: 5.12.0)
(igrep ver: 1.13 upstream: 2.111)
(idlwave ver: 1.32 upstream: 5.1)
(ibuffer ver: 1.09 upstream: No-Upstream-Ver)
(hyperbole ver: 1.16 upstream: 4.18)
(hm--html-menus ver: 1.23 upstream: 5.9)
(haskell-mode ver: 1.07 upstream: 1.45)
(gnats ver: 1.17 upstream: 3.101)
(general-docs ver: 1.04 upstream: No-Upstream-Ver)
(games ver: 1.17 upstream: 1.04)
(fsf-compat ver: 1.15 upstream: No-Upstream-Ver)
(frame-icon ver: 1.11 upstream: No-Upstream-Ver)
(fortran-modes ver: 1.04 upstream: No-Upstream-Ver)
(forms ver: 1.15 upstream: 2.37)
(footnote ver: 1.16 upstream: 0.18x)
(eudc ver: 1.39 upstream: 1.32)
(eterm ver: 1.17 upstream: No-Upstream-Ver)
(ess ver: 1.16 upstream: 5.2.7)
(eshell ver: 1.1 upstream: 2.4.1)
(escreen ver: 1.01 upstream: 1.16)
(erc ver: 0.19 upstream: Version 5.0 Revision: 1.776)
(emerge ver: 1.11 upstream: No-Upstream-Ver)
(elib ver: 1.11 upstream: 1.0)
(eieio ver: 1.05 upstream: 0.17)
(efs ver: 1.33 upstream: 1.23)
(edt ver: 1.13 upstream: No-Upstream-Ver)
(edit-utils ver: 2.31 upstream: No-Upstream-Ver)
(ediff ver: 1.59 upstream: 2.75)
(edebug ver: 1.21 upstream: No-Upstream-Ver)
(ecrypto ver: 0.2 upstream: 2.0)
(ecb ver: 1.22 upstream: 2.31)
(docbookide ver: 0.07000000000000001 upstream: 0.1)
(dired ver: 1.17 upstream: 7.13)
(dictionary ver: 1.16 upstream: 1.8)
(debug ver: 1.17 upstream: No-Upstream-Ver)
(crisp ver: 1.15 upstream: 1.34)
(cookie ver: 1.15 upstream: No-Upstream-Ver)
(clearcase ver: 1.1 upstream: /main/laptop/165)
(cc-mode ver: 1.45 upstream: 5.30.10)
(calendar ver: 1.23 upstream: No-Upstream-Ver)
(calc ver: 1.26 upstream: 2.02fX3)
(c-support ver: 1.22 upstream: No-Upstream-Ver)
(build ver: 1.14 upstream: 2.02)
(bbdb ver: 1.29 upstream: 2.34)
(auctex ver: 1.46 upstream: 11.55)
(apel ver: 1.3 upstream: 10.2)
(ada ver: 1.14 upstream: 2.27)
(skk ver: 1.23 upstream: regular)
(mule-ucs ver: 1.14 upstream: 0.84)
(mule-base ver: 1.47 upstream: No-Upstream-Ver)
(lookup ver: 1.15 upstream: 1.0)
(locale ver: 1.22 upstream: No-Upstream-Ver)
(leim ver: 1.22 upstream: No-Upstream-Ver)
(latin-unity ver: 1.15 upstream: 1.15)
(latin-euro-standards ver: 1.07 upstream: 1.07)
(egg-its ver: 1.27 upstream: No-Upstream-Ver)
(edict ver: 1.16 upstream: 0.9.9)
Installed Modules:
-----------------
Features:
--------
(xemacsbug shadow gnus-topic utf7 nnimap imap nndraft nnmh bbdb-gnus
bbdb-snarf mail-extr encrypt gnus-picon gnus-salt gnus-demon spam
spam-stat bbdb-com gnus-uu gnus-agent gnus-srvr gnus-score score-mode
nnvirtual gnus-msg gnus-art mm-uu mml2015 pgg pgg-parse pgg-def
mm-view gnus-sum gnus-group gnus-undo gnus-start gnus-spec gnus-int
gnus-range gnus-win nntp nnoo nnmail mail-source format-spec message
mml mml-sec mml-smime smime password smime-ldap ldap dig mm-decode
mm-bodies mm-encode mailcap lpr mail-parse rfc2045 rfc2231 rfc2047 qp
ietf-drums mail-abbrevs mailheader canlock sha1 executable hex-util
gnus-cache gnus gnus-ems gnus-xmas messagexmas nnheader nnheaderxm
timer-funcs gnus-util netrc time-date mail-utils mm-util mail-prsvr
cc-mode cc-fonts cc-menus cc-cmds cc-styles cc-align cc-engine cc-vars
cc-defs efs-cu backup-dir dot-xemacs-local cus-edit cus-load wid-edit
xetla xetla-core xetla-defs ffap add-log diff diff-mode ewoc pp
sendmail rfc822 ediff-merg ediff-diff ediff-tbar ediff-wind ediff-help
ediff-util ediff-mult ediff-init ediff xetla-version vc ring vc-hooks
biny-majors autoinsert font-lock cus-face bbdb regexp-opt timezone
byte-optimize advice advice-preload uniquify mwheel bytecomp
byte-compile latin-unity-tables latin-euro-standards
latin-euro-latin10 latin-euro-latin9 latin-euro-latin8
latin-euro-latin7 latin-unity-vars latin-unity zenirc-autoloads
xwem-autoloads 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-cc-autoloads vc-autoloads
tramp-autoloads tpu-autoloads tooltalk-autoloads tm-autoloads
time-autoloads textools-autoloads text-modes-autoloads
texinfo-autoloads supercite-autoloads strokes-autoloads
speedbar-autoloads sounds-wav-autoloads sounds-au-autoloads
sml-mode-autoloads slider-autoloads sieve-autoloads
sh-script-autoloads sgml-autoloads semantic-autoloads scheme-autoloads
sasl-autoloads ruby-modes-autoloads rmail-autoloads riece-autoloads
reftex-autoloads re-builder-autoloads python-modes-autoloads
psgml-dtds-autoloads psgml-autoloads ps-print-autoloads
prog-modes-autoloads pgg-autoloads perl-modes-autoloads
pcomplete-autoloads pcl-cvs-autoloads pc-autoloads os-utils-autoloads
oo-browser-autoloads ocaml-autoloads net-utils-autoloads
mmm-mode-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 hyperbole-autoloads
hm--html-menus-autoloads haskell-mode-autoloads gnats-autoloads
general-docs-autoloads games-autoloads fsf-compat-autoloads
frame-icon-autoloads fortran-modes-autoloads forms-autoloads
footnote-autoloads eudc-autoloads eterm-autoloads ess-autoloads
eshell-autoloads escreen-autoloads erc-autoloads emerge-autoloads
elib-autoloads eieio-autoloads efs-autoloads edt-autoloads
edit-utils-autoloads ediff-autoloads edebug-autoloads
ecrypto-autoloads ecb-autoloads docbookide-autoloads dired-autoloads
dictionary-autoloads debug-autoloads crisp-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 skk-autoloads
mule-ucs-autoloads mule-base-autoloads lookup-autoloads
locale-autoloads leim-autoloads latin-unity-autoloads
latin-euro-standards-autoloads egg-its-autoloads edict-autoloads
gnus-autoloads modules-autoloads mule-autoloads auto-autoloads
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 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 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-f p a c TAB r e TAB x e TAB s r TAB l r TAB c
TAB RET M-g kp-1 kp-7 kp-9 BS kp-8 kp-6 kp-enter RET
C-x k RET M-x C-g C-f9 y s q y M-x r e TAB p o TAB
r TAB x e TAB RET
Recent messages (most recent first):
-----------------------------------
Parsing BBDB... (frobnicating...done)
Parsing BBDB... (frobnicating...)
Parsing BBDB... (reading...)
Parsing BBDB...
Loading xemacsbug...done
Loading xemacsbug...
Making completion list...
Making completion list...
(No changes need to be saved)
Are you sure you want to quit reading news? (y or n) Yes
Are you sure you want to quit reading news? (y or n)
Saving /home/biny/.newsrc-gnus-otax.eld...done
Wrote /home/biny/.newsrc-gnus-otax.eld
Saving /home/biny/.newsrc-gnus-otax.eld...
Loading gnus-topic...done
Loading gnus-topic...
Checking new news...done
Opening nntp server on news.gmane.org...done
Opening nntp server on news.gmane.org...
Opening nntp server on usenet...done
- 1 participants
- 0 comments