What’s the current status of the discussion about a new bug tracker?
--
On the quay of the little Black Sea port, where the rescued pair came once
more into contact with civilization, Dobrinton was bitten by a dog which was
assumed to be mad, though it may only have been indiscriminating. (Saki)
_______________________________________________
XEmacs-Beta mailing list
XEmacs-Beta(a)xemacs.org
http://calypso.tux.org/cgi-bin/mailman/listinfo/xemacs-beta
Dear XEmacs friends,
I plan on releasing XEmacs-21.4.21 this weekend. At this point, I
don't think I will be adding any major new patches to the source tree,
but I will be reviewing my entire queue of unapplied patches, so if
there's a patch *you* want to lobby for, please feel free to drop me a
line.
I recently made a new gnuclient_setup window kit. This version has a
few improvements:
1. The installation process is a little bit cleaner, with fewer windows.
2. The uninstall process tries harder not to leave behind any traces
of the installed kit.
3. The modifications to site-start.el attempt to be a little more
careful not to disrupt an existing XEmacs installation.
4. The kit now allows the user to add gnuclient to the SendTo menu.
Regards,
Vin
--
The Journey by Mary Oliver
http://www.poemhunter.com/p/m/poem.asp?poet=6771&poem=30506
_______________________________________________
XEmacs-Beta mailing list
XEmacs-Beta(a)xemacs.org
http://calypso.tux.org/cgi-bin/mailman/listinfo/xemacs-beta
Hi all,
This is a patch for a preference-corruption issue. XEmacs (I use
xemacs-21.5.27) corrupts the ~/.emacs file when you follow the steps below. It
has happened to me both on Ubuntu Linux and on FreeBSD. The poor guy posting at
https://stat.ethz.ch/pipermail/ess-help/2005-September/002851.html also
experienced it.
== How-To-Repeat ==
* Make a new user on your *nix PC
* Log on as that user
* Make a ~/.emacs file
* Use GNU Emacs's custom.el tool, or use vi, to customize one or more variables
* Add something to the top of the ~/.emacs file (somewhere above the
custom-set-variables statement) that xemacs can't understand, such as
the lone word:
foobarbazquux
* As that user, start xemacs for the first time
* At the "Migrate init file to ~/.xemacs/? (yes or no)" prompt, enter "no"
Now XEmacs will clobber the custom-set-variables and custom-set-fonts clauses in
your ~/.emacs file. It replaces them with:
(custom-set-variables
'(load-home-init-file t t))
(custom-set-faces)
== Fix ==
See patch below. To make the patch, I copied two lines from
http://cvs.savannah.gnu.org/viewvc/emacs/emacs/lisp/cus-edit.el?revision=...
into the xemacs21-devel-mule port's unpacked source. Then I modified it to
check even more aggressively: it refuses to try to save a user's customizations
any time the init file didn't fully load, even if the custom file is a different
file than the init file. This is because it seems that the variable custom-file
was set (to /home/j/.emacs) on my PC and I am worried it may be set
elsewhere too.
I tested the patch by deleting my cus-edit.elc and pasting in the new
cus-edit.el in my xemacs lisp directory. It works fine.
I sent the patch to the FreeBSD folk (at
http://www.freebsd.org/cgi/query-pr.cgi?pr=114031 you can see my bug report) and
they merged the patch into their own XEmacs distribution. But they did not send
the patch to you folks. So, I am sending it to you now.
The patch follows.
Cheers,
Jason
--- xemacs-21.5.27/lisp/cus-edit.el.orig Tue Jun 26 04:10:18 2007
+++ xemacs-21.5.27/lisp/cus-edit.el Tue Jun 26 04:14:52 2007
@@ -3756,6 +3756,8 @@
;;;###autoload
(defun custom-save-all ()
"Save all customizations in `custom-file'."
+ (when init-file-had-error
+ (error "Cannot save customizations; init file was not fully loaded"))
(let ((inhibit-read-only t))
(custom-save-variables)
(custom-save-faces)
_______________________________________________
XEmacs-Beta mailing list
XEmacs-Beta(a)xemacs.org
http://calypso.tux.org/cgi-bin/mailman/listinfo/xemacs-beta
Hi,
I'm getting an assertion error with latest version from CVS under both
Linux and Windows (cygwin). The assertion occurs when the frame is
iconified. Info from Linux follows. The assertion is this.
----------------------------------------------------------------------
Fatal error: assertion failed, file glyphs-shared.c, line 331, ((((enum Lisp_Type) (((unsigned long)(dfc_slsta)) & ~(((1UL << ((4 * 8) - 2)) - 1UL) << 2))) == Lisp_Type_Record) && (((struct lrecord_header *) ((void *) (dfc_slsta)))->type == (unsigned int) (lrecord_type_string)))
Fatal error (6).
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 /src/beta/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 ...)
# (unwind-protect ...)
# (catch #<INTERNAL OBJECT (XEmacs bug?) (opaque, size=0) 0x8d73020> ...)
# (unwind-protect ...)
add-spec-list-to-specifier(#<image-specifier global=<unspecified> fallback=((nil . [nothing])) 0x1c4d33> ((global (nil . "/src/xemacs/xemacs-packages/etc/frame-icon/question.xbm"))) nil)
# bind (is-valid nval how-to-add tag-set locale value specifier)
set-specifier(#<image-specifier global=<unspecified> fallback=((nil . [nothing])) 0x1c4d33> "/src/xemacs/xemacs-packages/etc/frame-icon/question.xbm" nil nil nil)
# bind (how-to-add tag-set locale value property glyph)
set-glyph-property(#<glyph (buffer) #<image-specifier global=<unspecified> fallback=((nil . [nothing])) 0x1c4d33>0x1c4d32> image "/src/xemacs/xemacs-packages/etc/frame-icon/question.xbm" nil nil nil)
# bind (how-to-add tag-set locale spec glyph)
set-glyph-image(#<glyph (buffer) #<image-specifier global=<unspecified> fallback=((nil . [nothing])) 0x1c4d33>0x1c4d32> "/src/xemacs/xemacs-packages/etc/frame-icon/question.xbm")
# bind (glyph type spec-list)
make-glyph("/src/xemacs/xemacs-packages/etc/frame-icon/question.xbm")
# bind (image-file image pix icon-sym)
# (unwind-protect ...)
# bind (iconified-frame)
icon-set-frame(#<x-frame "XEmacs" 0x6bd1a>)
("execute_internal_event()" "[internal]")
(dispatch-event "[internal]")
# (condition-case ... . error)
# (catch top-level ...)
Avbruten (SIGABRT) (core dumped)
----------------------------------------------------------------------
The backtrace
----------------------------------------------------------------------
(gdb) backtrace
#0 0xffffe410 in ?? ()
#1 0xbfea8478 in ?? ()
#2 0x00003eb0 in ?? ()
#3 0x00000006 in ?? ()
#4 0xb79ab406 in kill () from /lib/libc.so.6
#5 0x080fde16 in fatal_error_signal (sig=6) at emacs.c:3793
#6 0xffffe420 in ?? ()
#7 0x00000006 in ?? ()
#8 0x00000033 in ?? ()
#9 0xc0100000 in ?? ()
#10 0x0000007b in ?? ()
#11 0x0000007b in ?? ()
#12 0xb7aadff4 in ?? () from /lib/libc.so.6
#13 0xbfea881c in ?? ()
#14 0xbfea877c in ?? ()
#15 0xbfea8764 in ?? ()
#16 0x00003eb0 in ?? ()
#17 0x00000006 in ?? ()
#18 0x00003eb0 in ?? ()
#19 0x00000000 in ?? ()
(gdb)
----------------------------------------------------------------------
Info about the build.
----------------------------------------------------------------------
uname -a: Linux spencer 2.6.22-suspend2-r2 #1 SMP Mon Sep 24 23:53:44 CEST 2007 i686 Intel(R) Core(TM)2 CPU T7200 @ 2.00GHz GenuineIntel GNU/Linux
./configure '--prefix=/src/beta/xemacs' '--enable-mule' '--with-package-path=/src/xemacs/xemacs-packages:/src/xemacs/mule-packages:/src/xemacs/site-packages' '--enable-sound=esd' '--enable-database=no' '--enable-widgets=athena' '--enable-dialogs=athena' '--with-athena=3d' '--with-newgc' '--with-xft=emacs,tabs,menubars,gauges' '--with-xim=no'
XEmacs 21.5-b28 "fuki" (+CVS-20071021) configured for `i686-pc-linux'.
Compilation Environment and Installation Defaults:
Source code location: /src/xemacs/working_repo
Installation prefix: /src/beta/xemacs
Operating system description file: `s/linux.h'
Machine description file: `m/intel386.h'
Compiler version: gcc (GCC) 4.1.2 (Gentoo 4.1.2)
- GCC specs file: specs.
- Compiler command: gcc -Wall -Wno-switch -Wundef -Wsign-compare -Wno-char-subscripts -Wpacked -Wunused-parameter -g
libc version: 2.6.1
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.
- Using fontconfig to manage fonts.
- Compiling in support for Xft antialiased fonts (EXPERIMENTAL).
Compiling in support for the Athena widget set:
- Athena headers location: X11/Xaw3d
- Athena library to link: Xaw3d
Using Lucid menubars.
- Using Xft to render antialiased fonts in menubars.
WARNING: This feature will be replaced with a face.
Using Lucid scrollbars.
Using Athena dialog boxes.
Using Athena native widgets.
- Using Xft to render antialiased fonts in tab controls.
WARNING: This feature will be replaced with a face.
- Using Xft to render antialiased fonts in progress bars.
WARNING: This feature will be replaced with a face.
WARNING: This feature not yet implemented; setting ignored.
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.
Sound:
Compiling in support for sound (native).
Compiling in support for ALSA (Advanced Linux Sound Architecture).
Compiling in support for ESD (Enlightened Sound Daemon).
Databases:
Compiling in support for LDAP.
Internationalization:
Compiling in support for Mule (multi-lingual Emacs).
Mail:
Compiling in support for "file" mail spool file locking method.
Other Features:
Inhibiting IPv6 canonicalization at startup.
Compiling in support for dynamic shared object modules.
Using the new GC mark algorithms (KKCC).
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 incremental garbage collector and the new allocator.
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: ---------------------------------------------------------
----------------------------------------------------------------------
Yours
--
%% Mats
_______________________________________________
XEmacs-Beta mailing list
XEmacs-Beta(a)xemacs.org
http://calypso.tux.org/cgi-bin/mailman/listinfo/xemacs-beta
Inline display of certain gif images produced by Microsoft Office/Outlook, like the one attached here, seem to have an incorrect color map, displaying most as a black/faint image.
Something may be non-standard with those images, as XV also has trouble displaying them, complaining that the file is truncated. However, ImageMagick and the Gimp have no problems. The files identify themselves as GIF87a, supported by XEmacs and XV, but still something is wrong.
Any way to fix this? Point the glyph code to some other translator?
_______________________________________________
No banners. No pop-ups. No kidding.
Make My Way your home on the Web - http://www.myway.com
_______________________________________________
XEmacs-Beta mailing list
XEmacs-Beta(a)xemacs.org
http://calypso.tux.org/cgi-bin/mailman/listinfo/xemacs-beta
Sample image attached base64 encoded via mmencode
_______________________________________________
No banners. No pop-ups. No kidding.
Make My Way your home on the Web - http://www.myway.com
_______________________________________________
XEmacs-Beta mailing list
XEmacs-Beta(a)xemacs.org
http://calypso.tux.org/cgi-bin/mailman/listinfo/xemacs-beta
Ar an cúigiú lá is fiche de mí Deireadh Fómhair, scríobh Vin Shelton:
> In a recent 21.5 CVS XEmacs selecting Help/Other/Current Installation
> Info from the menubar yields the following error: "No such coding
> system". I've attached my Installation file [even though it's
> available in the backtrace :-) ].
>
> Here's the lisp backtrace:
>
> Debugger entered--Lisp error: (invalid-argument "No such coding system" automatic-conversion)
> [...]
Okay, using automatic-conversion as the coding system there was wrong in the
original code; Installation-string should not be stored as binary. Here’s a
patch that works out its encoding, decodes it using that encoding at dump
time, and eliminates your error.
Can anyone tell me why version.el was dumped uncompiled? I would search the
mail archives but, you know ...
My patch of 18087.28114.645429.344798(a)parhasard.net was also based on the
logic that byte-compiling it won’t make a difference; I didn’t get to
committing it. This patch requires that it be compiled in passing, since
init-locale-at-early-startup (which works out the native coding system) is
called at byte-compile time during the build, but not at dump time.
lisp/ChangeLog addition:
2007-10-26 Aidan Kehoe <kehoea(a)parhasard.net>
* mule/general-late.el:
Now that all the dumped coding systems are available, decode
Installation-string using the value for
Installation-file-coding-system at dump time.
2007-10-26 Aidan Kehoe <kehoea(a)parhasard.net>
* dumped-lisp.el (preloaded-file-list):
Allow version.el to be compiled.
* help.el (describe-installation):
Use and-boundp instead of (and (boundp ...); don't decode
Installation-string. Call #'error with a DATUM arg.
* loadup.el:
* loadup.el (Installation-string): Removed.
Moved to version.el.
* loadup.el (really-early-error-handler):
Move the initialization of Installation-string to version.el too.
* update-elc-2.el (update-elc-ignored-files):
* update-elc-2.el (batch-update-elc-2):
Remove version.el from the ignored files; if Mule is available,
always recompile it, since Installation-file-coding-system depends
on relatively complex Mule code.
* update-elc.el (unbytecompiled-lisp-files):
Remove version.el.
* version.el:
* version.el (Installation-file-coding-system): New.
Variable reflecting the native coding system at build time, to
better work out Installation-string.
* version.el (Installation-string): New.
Moved from loadup.el; documented in more detail.
XEmacs Trunk source patch:
Diff command: cvs -q diff -u
Files affected: lisp/mule/general-late.el
===================================================================
RCS lisp/version.el
===================================================================
RCS lisp/update-elc.el
===================================================================
RCS lisp/update-elc-2.el
===================================================================
RCS lisp/unicode.el
===================================================================
RCS lisp/loadup.el
===================================================================
RCS lisp/help.el
===================================================================
RCS lisp/dumped-lisp.el
===================================================================
RCS
Index: lisp/dumped-lisp.el
===================================================================
RCS file: /pack/xemacscvs/XEmacs/xemacs/lisp/dumped-lisp.el,v
retrieving revision 1.63
diff -u -r1.63 dumped-lisp.el
--- lisp/dumped-lisp.el 2007/07/22 22:03:31 1.63
+++ lisp/dumped-lisp.el 2007/10/26 11:08:00
@@ -33,7 +33,7 @@
"post-gc"
"replace" ; match-string used in version.el.
- "version.el" ; Ignore compiled-by-mistake version.elc
+ "version"
"cl"
"cl-extra"
Index: lisp/help.el
===================================================================
RCS file: /pack/xemacscvs/XEmacs/xemacs/lisp/help.el,v
retrieving revision 1.49
diff -u -r1.49 help.el
--- lisp/help.el 2007/08/07 23:08:51 1.49
+++ lisp/help.el 2007/10/26 11:08:00
@@ -829,16 +829,13 @@
(defun describe-installation ()
"Display a buffer showing information about this XEmacs was compiled."
(interactive)
- (if (and (boundp 'Installation-string)
- (stringp Installation-string))
+ (if (and-boundp 'Installation-string
+ (stringp Installation-string))
(with-displaying-help-buffer
(lambda ()
- (princ
- (if (fboundp 'decode-coding-string)
- (decode-coding-string Installation-string 'automatic-conversion)
- Installation-string)))
+ (princ Installation-string))
"Installation")
- (error "No Installation information available.")))
+ (error 'unimplemented "No Installation information available.")))
(defun view-emacs-news ()
"Display info on recent changes to XEmacs."
Index: lisp/loadup.el
===================================================================
RCS file: /pack/xemacscvs/XEmacs/xemacs/lisp/loadup.el,v
retrieving revision 1.33
diff -u -r1.33 loadup.el
--- lisp/loadup.el 2006/12/29 18:09:43 1.33
+++ lisp/loadup.el 2007/10/26 11:08:00
@@ -69,9 +69,6 @@
(defvar preloaded-file-list nil
"List of files preloaded into the XEmacs binary image.")
-(defvar Installation-string nil
- "Description of XEmacs installation.")
-
;(start-profiling)
(let ((gc-cons-threshold
@@ -88,22 +85,6 @@
;; This is awfully damn early to be getting an error, right?
(call-with-condition-handler 'really-early-error-handler
#'(lambda ()
-
- ;; Initialize Installation-string. We do it before loading
- ;; anything so that dumped code can make use of its value.
- (setq Installation-string
- (save-current-buffer
- (set-buffer (get-buffer-create (generate-new-buffer-name
- " *temp*")))
- ;; insert-file-contents-internal bogusly calls
- ;; format-decode without checking if it's defined.
- (fset 'format-decode #'(lambda (f l &optional v) l))
- (insert-file-contents-internal
- (expand-file-name "Installation" build-directory))
- (fmakunbound 'format-decode)
- (prog1 (buffer-substring)
- (kill-buffer (current-buffer)))))
-
(setq load-path (list source-lisp))
(setq module-load-path (list
(expand-file-name "modules" build-directory)))
Index: lisp/update-elc-2.el
===================================================================
RCS file: /pack/xemacscvs/XEmacs/xemacs/lisp/update-elc-2.el,v
retrieving revision 1.12
diff -u -r1.12 update-elc-2.el
--- lisp/update-elc-2.el 2005/02/03 07:11:20 1.12
+++ lisp/update-elc-2.el 2007/10/26 11:08:00
@@ -65,8 +65,7 @@
"^make-docfile\\.el$"
"^site-start\\.el$"
"^site-load\\.el$"
- "^site-init\\.el$"
- "^version\\.el$"))
+ "^site-init\\.el$"))
(defvar dirfiles-table (make-hash-table :test 'equal))
@@ -190,8 +189,12 @@
(byte-recompile-file (expand-file-name "custom-load.el" dir) 0)
(when (featurep 'mule)
(Custom-make-dependencies (expand-file-name "mule" dir))
- (byte-recompile-file (expand-file-name "mule/custom-load.el" dir) 0))
- )
+ (byte-recompile-file (expand-file-name "mule/custom-load.el" dir) 0)
+ ;; See the eval-when-compile in the definition of
+ ;; Installation-file-coding-system; if the file name sniffing or the
+ ;; available coding systems have changed, version.elc should be
+ ;; rebuilt.
+ (byte-recompile-file (expand-file-name "version.el" dir) 0)))
(setq command-line-args-left nil))
;;; update-elc-2.el ends here
Index: lisp/update-elc.el
===================================================================
RCS file: /pack/xemacscvs/XEmacs/xemacs/lisp/update-elc.el,v
retrieving revision 1.36
diff -u -r1.36 update-elc.el
--- lisp/update-elc.el 2006/07/16 12:23:58 1.36
+++ lisp/update-elc.el 2007/10/26 11:08:00
@@ -117,8 +117,7 @@
'("paths.el"
"dumped-lisp.el"
"dumped-pkg-lisp.el"
- "raw-process.el"
- "version.el")
+ "raw-process.el")
"Lisp files that should not be byte compiled.
Files in `additional-dump-dependencies' do not need to be listed here.")
Index: lisp/version.el
===================================================================
RCS file: /pack/xemacscvs/XEmacs/xemacs/lisp/version.el,v
retrieving revision 1.50
diff -u -r1.50 version.el
--- lisp/version.el 2002/08/28 05:36:32 1.50
+++ lisp/version.el 2007/10/26 11:08:00
@@ -129,16 +129,48 @@
;;; We hope that this alias is easier for people to find.
(define-function 'version 'emacs-version)
-;; Put the emacs version number into the `pure[]' array in a form that
-;; `what(1)' can extract from the executable or a core file. We don't
-;; actually need this to be pointed to from lisp; pure objects can't
-;; be GCed.
-(concat "\n@" "(#)" (emacs-version)
- "\n@" "(#)" "Configuration: "
- system-configuration "\n")
+(defvar Installation-file-coding-system
+ (eval-when-compile `,(coding-system-name (find-coding-system 'native)))
+ "The coding system used to create the `Installation' file.
-;;Local variables:
-;;version-control: never
-;;End:
+The `Installation' file is created by configure, and the
+`Installation-string' variable reflects its contents.
-;;; version.el ends here
+This is initialized to reflect the native coding system at the time
+version.el was byte-compiled; ideally it would reflect the native coding
+system of the environment when XEmacs was dumped, but the locale
+initialization code isn't called at dump time, and the appropriate value
+at byte-compile time should be close enough. Note that this means that the
+value of `Installation-string' during dump time thus reflects loading the
+file using the `binary' coding system. ")
+
+(defvar Installation-string
+ ;; Initialize Installation-string. We do it before loading
+ ;; anything so that dumped code can make use of its value.
+ (save-current-buffer
+ (set-buffer (get-buffer-create (generate-new-buffer-name
+ " *temp*")))
+ ;; insert-file-contents-internal bogusly calls
+ ;; format-decode without checking if it's defined.
+ (fset 'format-decode #'(lambda (f l &optional v) l))
+ (insert-file-contents-internal
+ (expand-file-name "Installation" build-directory)
+ ;; Relies on our working out the system coding system
+ ;; correctly at startup.
+ nil nil nil nil
+ ;; Installation-file-coding-system is actually respected in
+ ;; mule/general-late.el, after all the dumped coding systems have been
+ ;; loaded.
+ 'binary)
+ (fmakunbound 'format-decode)
+ (prog1 (buffer-substring)
+ (kill-buffer (current-buffer))))
+ "Description of XEmacs installation.
+
+This reflects the values that the configure script worked out at build time,
+including things like the C code features included at compile time and the
+installation prefix. Normally used when submitting a bug report;
+occasionally used, in a way the XEmacs developers don't endorse, to work out
+version information. ")
+
+;;; version.el ends here
\ No newline at end of file
Index: lisp/mule/general-late.el
===================================================================
RCS file: /pack/xemacscvs/XEmacs/xemacs/lisp/mule/general-late.el,v
retrieving revision 1.4
diff -u -r1.4 general-late.el
--- lisp/mule/general-late.el 2007/08/26 20:00:41 1.4
+++ lisp/mule/general-late.el 2007/10/26 11:08:00
@@ -54,7 +54,16 @@
(remassoc "German" language-info-alist))
language-info-alist
(cons (assoc "English" language-info-alist)
- (remassoc "English" language-info-alist)))
+ (remassoc "English" language-info-alist))
+
+ ;; Make Installation-string actually reflect the environment at
+ ;; byte-compile time. (We can't necessarily decode it when version.el
+ ;; is loaded, since not all the coding systems are available then.)
+ Installation-string (if-boundp 'Installation-file-coding-system
+ (decode-coding-string
+ Installation-string
+ Installation-file-coding-system)
+ Installation-string))
;; At this point in the dump, all the charsets have been loaded. Now, load
;; their Unicode mappings.
--
On the quay of the little Black Sea port, where the rescued pair came once
more into contact with civilization, Dobrinton was bitten by a dog which was
assumed to be mad, though it may only have been indiscriminating. (Saki)
_______________________________________________
XEmacs-Beta mailing list
XEmacs-Beta(a)xemacs.org
http://calypso.tux.org/cgi-bin/mailman/listinfo/xemacs-beta
Ar an t-ochtú lá is fiche de mí Deireadh Fómhair, scríobh It's me FKtPp \;\):
> Aidan Kehoe <kehoea(a)parhasard.net> writes:
>
> > What.s the status of the move to the new SCM? Last I heard, Michael talked
> > to alioth.debian.org about Mercurial hosting, who turned us down because we
> > don.t have someone maintaining the project in the framework of the Debian
> > project. What.s happened since then?
>
> Did you know that sourceforge.net can hold Mercurial hosting? For what
> I know mutt is using a tricky to do use Mercurial as their SCM on
> sourceforge.net. And mutt guys already write a wiki page explian how
> to do that at http://www.selenic.com/mercurial/wiki/index.cgi/MercurialOnSourceforge
The thing with Sourceforge.net is that almost no-one has anything good to
say about them these days, mostly because of apparent understaffing and lack
of response. See this:
http://www.tbray.org/ongoing/When/200x/2007/10/17/Noticing-Sourceforge
Whereas the Debian people are amateurs, in the positive sense of the word.
(Perhaps not *just* the positive sense of the word, but certainly at least
it.)
--
On the quay of the little Black Sea port, where the rescued pair came once
more into contact with civilization, Dobrinton was bitten by a dog which was
assumed to be mad, though it may only have been indiscriminating. (Saki)
_______________________________________________
XEmacs-Beta mailing list
XEmacs-Beta(a)xemacs.org
http://calypso.tux.org/cgi-bin/mailman/listinfo/xemacs-beta
Ar an triochadú lá de mí Deireadh Fómhair, scríobh Vin Shelton:
> Aidan -
>
> Are you planning to apply this patch? I can confirm that it does
> clear up the "No such coding system" error on displaying Current
> Installation Info.
As I mentioned in another thread, I don’t have home internet access right at
home; I was planning on waiting until I got that back, and then to commit
something; perhaps this, perhaps something less invasive with a more
invasive patch to follow. But it’s taking longer than I expected, so I’ll
commit this from work tomorrow. Thanks for the reminder!
> On 10/26/07, Aidan Kehoe <kehoea(a)parhasard.net> wrote:
> >
> > Ar an cúigiú lá is fiche de mí Deireadh Fómhair, scríobh Vin Shelton:
> >
> > > In a recent 21.5 CVS XEmacs selecting Help/Other/Current Installation
> > > Info from the menubar yields the following error: "No such coding
> > > system". I've attached my Installation file [even though it's
> > > available in the backtrace :-) ].
> > >
> > > Here's the lisp backtrace:
> > >
> > > Debugger entered--Lisp error: (invalid-argument "No such coding system" automatic-conversion)
> > > [...]
> >
> > Okay, using automatic-conversion as the coding system there was wrong in the
> > original code; Installation-string should not be stored as binary. Here's a
> > patch that works out its encoding, decodes it using that encoding at dump
> > time, and eliminates your error.
> >
> > Can anyone tell me why version.el was dumped uncompiled? I would search the
> > mail archives but, you know ...
> >
> > My patch of 18087.28114.645429.344798(a)parhasard.net was also based on the
> > logic that byte-compiling it won't make a difference; I didn't get to
> > committing it. This patch requires that it be compiled in passing, since
> > init-locale-at-early-startup (which works out the native coding system) is
> > called at byte-compile time during the build, but not at dump time.
> >
> > lisp/ChangeLog addition:
> >
> > 2007-10-26 Aidan Kehoe <kehoea(a)parhasard.net>
> >
> > * mule/general-late.el:
> > Now that all the dumped coding systems are available, decode
> > Installation-string using the value for
> > Installation-file-coding-system at dump time.
> >
> > 2007-10-26 Aidan Kehoe <kehoea(a)parhasard.net>
> >
> > * dumped-lisp.el (preloaded-file-list):
> > Allow version.el to be compiled.
> > * help.el (describe-installation):
> > Use and-boundp instead of (and (boundp ...); don't decode
> > Installation-string. Call #'error with a DATUM arg.
> > * loadup.el:
> > * loadup.el (Installation-string): Removed.
> > Moved to version.el.
> > * loadup.el (really-early-error-handler):
> > Move the initialization of Installation-string to version.el too.
> > * update-elc-2.el (update-elc-ignored-files):
> > * update-elc-2.el (batch-update-elc-2):
> > Remove version.el from the ignored files; if Mule is available,
> > always recompile it, since Installation-file-coding-system depends
> > on relatively complex Mule code.
> > * update-elc.el (unbytecompiled-lisp-files):
> > Remove version.el.
> > * version.el:
> > * version.el (Installation-file-coding-system): New.
> > Variable reflecting the native coding system at build time, to
> > better work out Installation-string.
> > * version.el (Installation-string): New.
> > Moved from loadup.el; documented in more detail.
> >
> >
> > XEmacs Trunk source patch:
> > Diff command: cvs -q diff -u
> > Files affected: lisp/mule/general-late.el
> > ===================================================================
> > RCS lisp/version.el
> > ===================================================================
> > RCS lisp/update-elc.el
> > ===================================================================
> > RCS lisp/update-elc-2.el
> > ===================================================================
> > RCS lisp/unicode.el
> > ===================================================================
> > RCS lisp/loadup.el
> > ===================================================================
> > RCS lisp/help.el
> > ===================================================================
> > RCS lisp/dumped-lisp.el
> > ===================================================================
> > RCS
> >
> > Index: lisp/dumped-lisp.el
> > ===================================================================
> > RCS file: /pack/xemacscvs/XEmacs/xemacs/lisp/dumped-lisp.el,v
> > retrieving revision 1.63
> > diff -u -r1.63 dumped-lisp.el
> > --- lisp/dumped-lisp.el 2007/07/22 22:03:31 1.63
> > +++ lisp/dumped-lisp.el 2007/10/26 11:08:00
> > @@ -33,7 +33,7 @@
> > "post-gc"
> > "replace" ; match-string used in version.el.
> >
> > - "version.el" ; Ignore compiled-by-mistake version.elc
> > + "version"
> >
> > "cl"
> > "cl-extra"
> > Index: lisp/help.el
> > ===================================================================
> > RCS file: /pack/xemacscvs/XEmacs/xemacs/lisp/help.el,v
> > retrieving revision 1.49
> > diff -u -r1.49 help.el
> > --- lisp/help.el 2007/08/07 23:08:51 1.49
> > +++ lisp/help.el 2007/10/26 11:08:00
> > @@ -829,16 +829,13 @@
> > (defun describe-installation ()
> > "Display a buffer showing information about this XEmacs was compiled."
> > (interactive)
> > - (if (and (boundp 'Installation-string)
> > - (stringp Installation-string))
> > + (if (and-boundp 'Installation-string
> > + (stringp Installation-string))
> > (with-displaying-help-buffer
> > (lambda ()
> > - (princ
> > - (if (fboundp 'decode-coding-string)
> > - (decode-coding-string Installation-string 'automatic-conversion)
> > - Installation-string)))
> > + (princ Installation-string))
> > "Installation")
> > - (error "No Installation information available.")))
> > + (error 'unimplemented "No Installation information available.")))
> >
> > (defun view-emacs-news ()
> > "Display info on recent changes to XEmacs."
> > Index: lisp/loadup.el
> > ===================================================================
> > RCS file: /pack/xemacscvs/XEmacs/xemacs/lisp/loadup.el,v
> > retrieving revision 1.33
> > diff -u -r1.33 loadup.el
> > --- lisp/loadup.el 2006/12/29 18:09:43 1.33
> > +++ lisp/loadup.el 2007/10/26 11:08:00
> > @@ -69,9 +69,6 @@
> > (defvar preloaded-file-list nil
> > "List of files preloaded into the XEmacs binary image.")
> >
> > -(defvar Installation-string nil
> > - "Description of XEmacs installation.")
> > -
> > ;(start-profiling)
> >
> > (let ((gc-cons-threshold
> > @@ -88,22 +85,6 @@
> > ;; This is awfully damn early to be getting an error, right?
> > (call-with-condition-handler 'really-early-error-handler
> > #'(lambda ()
> > -
> > - ;; Initialize Installation-string. We do it before loading
> > - ;; anything so that dumped code can make use of its value.
> > - (setq Installation-string
> > - (save-current-buffer
> > - (set-buffer (get-buffer-create (generate-new-buffer-name
> > - " *temp*")))
> > - ;; insert-file-contents-internal bogusly calls
> > - ;; format-decode without checking if it's defined.
> > - (fset 'format-decode #'(lambda (f l &optional v) l))
> > - (insert-file-contents-internal
> > - (expand-file-name "Installation" build-directory))
> > - (fmakunbound 'format-decode)
> > - (prog1 (buffer-substring)
> > - (kill-buffer (current-buffer)))))
> > -
> > (setq load-path (list source-lisp))
> > (setq module-load-path (list
> > (expand-file-name "modules" build-directory)))
> > Index: lisp/update-elc-2.el
> > ===================================================================
> > RCS file: /pack/xemacscvs/XEmacs/xemacs/lisp/update-elc-2.el,v
> > retrieving revision 1.12
> > diff -u -r1.12 update-elc-2.el
> > --- lisp/update-elc-2.el 2005/02/03 07:11:20 1.12
> > +++ lisp/update-elc-2.el 2007/10/26 11:08:00
> > @@ -65,8 +65,7 @@
> > "^make-docfile\\.el$"
> > "^site-start\\.el$"
> > "^site-load\\.el$"
> > - "^site-init\\.el$"
> > - "^version\\.el$"))
> > + "^site-init\\.el$"))
> >
> > (defvar dirfiles-table (make-hash-table :test 'equal))
> >
> > @@ -190,8 +189,12 @@
> > (byte-recompile-file (expand-file-name "custom-load.el" dir) 0)
> > (when (featurep 'mule)
> > (Custom-make-dependencies (expand-file-name "mule" dir))
> > - (byte-recompile-file (expand-file-name "mule/custom-load.el" dir) 0))
> > - )
> > + (byte-recompile-file (expand-file-name "mule/custom-load.el" dir) 0)
> > + ;; See the eval-when-compile in the definition of
> > + ;; Installation-file-coding-system; if the file name sniffing or the
> > + ;; available coding systems have changed, version.elc should be
> > + ;; rebuilt.
> > + (byte-recompile-file (expand-file-name "version.el" dir) 0)))
> > (setq command-line-args-left nil))
> >
> > ;;; update-elc-2.el ends here
> > Index: lisp/update-elc.el
> > ===================================================================
> > RCS file: /pack/xemacscvs/XEmacs/xemacs/lisp/update-elc.el,v
> > retrieving revision 1.36
> > diff -u -r1.36 update-elc.el
> > --- lisp/update-elc.el 2006/07/16 12:23:58 1.36
> > +++ lisp/update-elc.el 2007/10/26 11:08:00
> > @@ -117,8 +117,7 @@
> > '("paths.el"
> > "dumped-lisp.el"
> > "dumped-pkg-lisp.el"
> > - "raw-process.el"
> > - "version.el")
> > + "raw-process.el")
> > "Lisp files that should not be byte compiled.
> > Files in `additional-dump-dependencies' do not need to be listed here.")
> >
> > Index: lisp/version.el
> > ===================================================================
> > RCS file: /pack/xemacscvs/XEmacs/xemacs/lisp/version.el,v
> > retrieving revision 1.50
> > diff -u -r1.50 version.el
> > --- lisp/version.el 2002/08/28 05:36:32 1.50
> > +++ lisp/version.el 2007/10/26 11:08:00
> > @@ -129,16 +129,48 @@
> > ;;; We hope that this alias is easier for people to find.
> > (define-function 'version 'emacs-version)
> >
> > -;; Put the emacs version number into the `pure[]' array in a form that
> > -;; `what(1)' can extract from the executable or a core file. We don't
> > -;; actually need this to be pointed to from lisp; pure objects can't
> > -;; be GCed.
> > -(concat "\n@" "(#)" (emacs-version)
> > - "\n@" "(#)" "Configuration: "
> > - system-configuration "\n")
> > +(defvar Installation-file-coding-system
> > + (eval-when-compile `,(coding-system-name (find-coding-system 'native)))
> > + "The coding system used to create the `Installation' file.
> >
> > -;;Local variables:
> > -;;version-control: never
> > -;;End:
> > +The `Installation' file is created by configure, and the
> > +`Installation-string' variable reflects its contents.
> >
> > -;;; version.el ends here
> > +This is initialized to reflect the native coding system at the time
> > +version.el was byte-compiled; ideally it would reflect the native coding
> > +system of the environment when XEmacs was dumped, but the locale
> > +initialization code isn't called at dump time, and the appropriate value
> > +at byte-compile time should be close enough. Note that this means that the
> > +value of `Installation-string' during dump time thus reflects loading the
> > +file using the `binary' coding system. ")
> > +
> > +(defvar Installation-string
> > + ;; Initialize Installation-string. We do it before loading
> > + ;; anything so that dumped code can make use of its value.
> > + (save-current-buffer
> > + (set-buffer (get-buffer-create (generate-new-buffer-name
> > + " *temp*")))
> > + ;; insert-file-contents-internal bogusly calls
> > + ;; format-decode without checking if it's defined.
> > + (fset 'format-decode #'(lambda (f l &optional v) l))
> > + (insert-file-contents-internal
> > + (expand-file-name "Installation" build-directory)
> > + ;; Relies on our working out the system coding system
> > + ;; correctly at startup.
> > + nil nil nil nil
> > + ;; Installation-file-coding-system is actually respected in
> > + ;; mule/general-late.el, after all the dumped coding systems have been
> > + ;; loaded.
> > + 'binary)
> > + (fmakunbound 'format-decode)
> > + (prog1 (buffer-substring)
> > + (kill-buffer (current-buffer))))
> > + "Description of XEmacs installation.
> > +
> > +This reflects the values that the configure script worked out at build time,
> > +including things like the C code features included at compile time and the
> > +installation prefix. Normally used when submitting a bug report;
> > +occasionally used, in a way the XEmacs developers don't endorse, to work out
> > +version information. ")
> > +
> > +;;; version.el ends here
> > \ No newline at end of file
> > Index: lisp/mule/general-late.el
> > ===================================================================
> > RCS file: /pack/xemacscvs/XEmacs/xemacs/lisp/mule/general-late.el,v
> > retrieving revision 1.4
> > diff -u -r1.4 general-late.el
> > --- lisp/mule/general-late.el 2007/08/26 20:00:41 1.4
> > +++ lisp/mule/general-late.el 2007/10/26 11:08:00
> > @@ -54,7 +54,16 @@
> > (remassoc "German" language-info-alist))
> > language-info-alist
> > (cons (assoc "English" language-info-alist)
> > - (remassoc "English" language-info-alist)))
> > + (remassoc "English" language-info-alist))
> > +
> > + ;; Make Installation-string actually reflect the environment at
> > + ;; byte-compile time. (We can't necessarily decode it when version.el
> > + ;; is loaded, since not all the coding systems are available then.)
> > + Installation-string (if-boundp 'Installation-file-coding-system
> > + (decode-coding-string
> > + Installation-string
> > + Installation-file-coding-system)
> > + Installation-string))
> >
> > ;; At this point in the dump, all the charsets have been loaded. Now, load
> > ;; their Unicode mappings.
> >
> > --
> > On the quay of the little Black Sea port, where the rescued pair came once
> > more into contact with civilization, Dobrinton was bitten by a dog which was
> > assumed to be mad, though it may only have been indiscriminating. (Saki)
> >
> >
>
>
> --
> The Journey by Mary Oliver
> http://www.poemhunter.com/p/m/poem.asp?poet=6771&poem=30506
--
On the quay of the little Black Sea port, where the rescued pair came once
more into contact with civilization, Dobrinton was bitten by a dog which was
assumed to be mad, though it may only have been indiscriminating. (Saki)
_______________________________________________
XEmacs-Beta mailing list
XEmacs-Beta(a)xemacs.org
http://calypso.tux.org/cgi-bin/mailman/listinfo/xemacs-beta