I just compiled 21.5.7. When I load it up, the default font is not a courier new, but
rather Lucidia. Furthermore, after I use the font menu to chnge to courier new, I get a
loading error:
(1) (initialization/error) An error has occurred while loading
d:\home\matthew\.xemacs\init.el:
Assertion failed: (equal enabled-behavior-list val)
Backtrace follows:
signal(cl-assertion-failed ((equal enabled-behavior-list val)))
(or (equal enabled-behavior-list val) (signal (quote cl-assertion-
failed) (list (quote (equal enabled-behavior-list val)))))
(progn (or (equal enabled-behavior-list val) (signal (quote cl-
assertion-failed) (list (quote (equal enabled-behavior-list val)))))
nil)
(assert (equal enabled-behavior-list val))
# bind (enable-list disable-list old-val)
(let* ((old-val enabled-behavior-list) (disable-list (set-difference
old-val val)) (enable-list (set-difference val old-val))) (dolist (b
disable-list) (disable-behavior b t)) (dolist (b enable-list)
(enable-behavior b t)) (assert (equal enabled-behavior-list val)))
(if within-behavior-enabling-disabling (set sym val) (let* ((old-val
enabled-behavior-list) (disable-list (set-difference old-val val))
(enable-list (set-difference val old-val))) (dolist (b disable-list)
(disable-behavior b t)) (dolist (b enable-list) (enable-behavior b
t)) (assert (equal enabled-behavior-list val))))
# bind (val sym)
(lambda (sym val) (if within-behavior-enabling-disabling (set sym
val) (let* ((old-val enabled-behavior-list) (disable-list (set-
difference old-val val)) (enable-list (set-difference val old-val)))
(dolist (b disable-list) (disable-behavior b t)) (dolist (b enable-
list) (enable-behavior b t)) (assert (equal enabled-behavior-list
val)))))(enabled-behavior-list (scroll-in-place resize-minibuffer
recent-files mwheel mouse-avoidance jka-compr efs))
# bind (set comment requests now value symbol entry immediate args
theme)
custom-theme-set-variables(user (buffers-menu-submenus-for-groups-p
t) (buffers-tab-max-size nil) (column-number-mode t) (complex-
buffers-menu-p t) (cperl-font-lock t) (cperl-syntaxify-by-font-lock
t) (cperl-use-syntax-table-text-property t) (cperl-use-syntax-table-
text-property-for-tags t) (delete-key-deletes-forward nil) (ediff-
use-toolbar-p t) (ediff-window-setup-function (quote ediff-setup-
windows-multiframe)) (efs-ftp-program-name
"C:/WINDOWS/system32/ftp.exe") (enabled-behavior-list (quote (scroll-
in-place resize-minibuffer recent-files mwheel mouse-avoidance jka-
compr efs))))
apply(custom-theme-set-variables user ((buffers-menu-submenus-for-
groups-p t) (buffers-tab-max-size nil) (column-number-mode t)
(complex-buffers-menu-p t) (cperl-font-lock t) (cperl-syntaxify-by-
font-lock t) (cperl-use-syntax-table-text-property t) (cperl-use-
syntax-table-text-property-for-tags t) (delete-key-deletes-forward
nil) (ediff-use-toolbar-p t) (ediff-window-setup-function (quote
ediff-setup-windows-multiframe)) (efs-ftp-program-name
"C:/WINDOWS/system32/ftp.exe") (enabled-behavior-list (quote (scroll-
in-place resize-minibuffer recent-files mwheel mouse-avoidance jka-
compr efs)))))
# bind (args)
custom-set-variables((buffers-menu-submenus-for-groups-p t) (buffers-
tab-max-size nil) (column-number-mode t) (complex-buffers-menu-p t)
(cperl-font-lock t) (cperl-syntaxify-by-font-lock t) (cperl-use-
syntax-table-text-property t) (cperl-use-syntax-table-text-property-
for-tags t) (delete-key-deletes-forward nil) (ediff-use-toolbar-p t)
(ediff-window-setup-function (quote ediff-setup-windows-multiframe))
(efs-ftp-program-name "C:/WINDOWS/system32/ftp.exe") (enabled-
behavior-list (quote (scroll-in-place resize-minibuffer recent-files
mwheel mouse-avoidance jka-compr efs))))
# bind (current-load-list)
# (unwind-protect ...)
# bind (load-file-name)
# (unwind-protect ...)
# (unwind-protect ...)
# (unwind-protect ...)
# (unwind-protect ...)
# (unwind-protect ...)
# (unwind-protect ...)
load-internal("d:\\home\\matthew\\.xemacs\\custom.el" t t t raw-
text)
# bind (path handler filename nosuffix nomessage noerror file)
load("d:\\home\\matthew\\.xemacs\\custom.el" t t t)
load-user-init-file()
#<compiled-function nil "...(10)" [init-file-had-error load-user-
init-file-p load-user-init-file nil] 2>()
# (unwind-protect ...)
call-with-condition-handler(#<compiled-function
(__load_init_file_arg__) "...(26)" [init-file-had-error user-init-
file __load_init_file_arg__ errstr error-message-string message
"Error in init file: %s" lwarn initialization error "An error has
occurred while loading %s:\n\n%s\n\nBacktrace follows:\n\n%s\n\nTo
ensure normal operation, you should investigate the cause of the
error\nin your initialization file and remove it. Use the `-debug-
init' option\nto XEmacs to enter the debugger when the error occurs
and investigate the\nexact problem." backtrace-in-condition-handler-
eliminating-handler t] 8> #<compiled-function nil "...(10)" [init-
file-had-error load-user-init-file-p load-user-init-file nil] 2>)
# (condition-case ... . ((error)))
# bind (debug-on-error debug-on-error-from-init-file debug-on-error-
should-be-set debug-on-error-initial)
load-init-file()
# bind (command-line-args-left)
command-line()
# (condition-case ... . ((t (byte-code " Â?" [error-data data nil]
1))))
# bind (error-data)
normal-top-level()
# (condition-case ... . error)
# (catch top-level ...)
To ensure normal operation, you should investigate the cause of the
error
in your initialization file and remove it. Use the `-debug-init'
option
to XEmacs to enter the debugger when the error occurs and
investigate the
exact problem.
Given that I have not changed my init files, what could have changed and does anyone have
suggestions on how to properly fix it? This didn't happen when compiled on Solaris.
--
Matthew