11:47 a.m.
After the recent changes to move toward fontconfig, XEmacs 21.5.26
exits at load if I have an init file with font setup code in it. I am
not sure which code causes the crash. I would be happy to do some
debugging--trying different configs. I currently have a version running
--without-xft, but I miss the clean fonts of --with-xft.
I have some set-specifiers at the top of my init, (require 'iso-syntax)
(require 'iso-acc), and some functions that create integrated faces
(i.e. that use set-face-font and custom-set-faces to cobble together
fonts with "pleasing" substitutions). I also set one font that has all
the parts itself as the default:
(defun font-vera ()
(interactive)
(set-face-font 'default "Bitstream Vera Sans Mono-12")
(set-face-font 'modeline "Bitstream Vera Sans Mono-10")
(set-face-font 'buffers-tab "Bitstream Vera Sans Mono-9")
(custom-set-faces
'(default ((t (:size "12pt" :family "Vera Sans Mono"
:background
"white"))) t)
'(italic ((t (:size "12pt" :family "Vera Sans Mono Oblique"
:oblique
t:background "white"))) t)
'(bold-italic ((t (:size "12pt" :family "Vera Sans Mono Bold
Oblique"
:bold t :oblique t :background "white"))) t)
'(bold ((t (:size "12pt" :family "Vera Sans Mono Bold" :bold t
:background "white"))) t)
'(primary-selection ((t (:background "yellow1"))) t)
'(text-cursor ((t (:foreground "black" :background "turquoise"
:inverse-video nil))) t)
'(zmacs-region ((t (:background "yellow"))) t)
'(buffers-tab ((t (:foreground "blue" :background
"gainsboro"))) t)
'(default-gutter ((t (:background "gainsboro" :foreground
"gainsboro"))) t)
'(top-gutter ((t (:background "gainsboro" :foreground
"gainsboro")))
t)
'(modeline ((t (:background "lightskyblue"))) t)
'(html-helper-italic-face ((t (:oblique t))))
'(html-helper-bold-face ((t (:bold t))))
'(html-helper-underline-face ((t (:underline t))))
'(html-helper-strikethrough-face ((t (:strikethru t))))
'(html-helper-link-face ((t (:foreground "blue"))))
'(html-helper-significant-tag-face ((t (:foreground "salmon"))))
'(flyspell-incorrect-face ((t (:foreground "OrangeRed" :underline
t))))
'(flyspell-duplicate-face ((t (:foreground "Gold3" :underline t)))))
(set-face-font 'html-helper-italic-face "Bitstream Vera Sans Mono
Oblique-12:oblique")
(set-face-font 'html-helper-bold-face "Bitstream Vera Sans Mono
Bold-12:bold")
(set-face-font 'html-helper-underline-face "Bitstream Vera Sans
Mono-12")
(set-face-font 'html-helper-strikethrough-face "Bitstream Vera Sans
Mono-12")
(set-face-font 'html-helper-link-face "Bitstream Vera Sans Mono-12")
(set-face-font 'html-helper-significant-tag-face "Bitstream Vera Sans
Mono Bold-12:bold")
(set-face-font 'flyspell-incorrect-face "Bitstream Vera Sans Mono-12")
(set-face-font 'flyspell-duplicate-face "Bitstream Vera Sans Mono-12")
(set-frame-size (selected-frame) 132 56)
(recenter)
)
[...]
(font-vera)
Here is the config used to make the XEmacs that exits on init:
./configure --enable-mule --enable-widgets=athena --with-athena=3d \
--enable-dialogs=athena --enable-scrollbars=lucid \
--disable-error-checking --disable-debug --with-union-type \
--with-package-path=${XEmacsPPath} --with-dynamic \
--prefix=${ParentPath} --with-prefix --with-png --with-jpeg --with-tiff \
--with-xmu --with-xim=no --enable-sound=esd --disable-xfs \
--enable-dump-in-exec --enable-modules --enable-external-widget \
--with-dynamic --disable-kkcc --disable-mc-alloc \
--enable-optimization --with-cflags-optimization='-Os -pipe -mcpu=970 -mtune=970
-mpim-altivec' \
--with-site-runtime-libraries="/opt/local/lib:/usr/X11R6/lib" \
--with-site-libraries="/opt/local/lib:/usr/X11R6/lib"
--with-xft=emacs,tabs,gauges,nomenubars
Here is the console output from when XEmacs aborts (XEmacs does not
crash; it just exits):
*** Error in XEmacs initialization
(unimplemented "font-mgr library is experimental and incomplete")
*** Backtrace
really-early-error-handler((unimplemented "font-mgr library is
experimental and incomplete"))
signal(unimplemented ("font-mgr library is experimental and
incomplete"))
# bind (args datum)
cerror(unimplemented "font-mgr library is experimental and
incomplete")
apply(cerror unimplemented "font-mgr library is experimental and
incomplete")
# bind (args datum)
error(unimplemented "font-mgr library is experimental and incomplete")
# bind (type id property pattern)
fc-pattern-get(#<INTERNAL OBJECT (XEmacs bug?) (fc-pattern) 0x29015a0>
"size" 0)
# bind (pattern id pattern device font)
x-make-font-bold-xft("monospace-12" #<x-device on ":0.0"
0x24618>)
# bind (device font)
x-make-font-bold("monospace-12" #<x-device on ":0.0"
0x24618>)
# bind (mapper G42994 G42993 devtype tag-set x G42992 ffpdev
devtype-spec prop inst-list locale)
frob-face-inst-list(global (((default tty) . "normal") ((default x) .
"monospace-12") ((default x) . "Sazanami Mincho-12")) font
window-system)
# bind (thunk inst-list locale sp)
frob-locale(#<font-specifier global=(((default tty) . "normal")
((default x) . "monospace-12") ((default x) . "Sazanami Mincho-12"))
fallback=#<font-specifier global=<unspecified> fallback=(((tty) .
"normal") ((x) . "monospace-12") ((x) . "Sazanami
Mincho-12")) 0x1e8c>
0x13575> global (((default tty) . "normal") ((default x) .
"monospace-12") ((default x) . "Sazanami Mincho-12")) (font .
window-system))
# bind (ms-this-spec ms-specs ms-result ms-exact-p ms-tag-set
ms-maparg ms-locale ms-func ms-specifier)
map-specifier(#<font-specifier global=(((default tty) . "normal")
((default x) . "monospace-12") ((default x) . "Sazanami Mincho-12"))
fallback=#<font-specifier global=<unspecified> fallback=(((tty) .
"normal") ((x) . "monospace-12") ((x) . "Sazanami
Mincho-12")) 0x1e8c>
0x13575> frob-locale global (font . window-system) nil nil)
# bind (locale)
map-over-locales(global)
# bind (do-something orig-instance check-differences domain
do-later-stages ffpdev)
# (unwind-protect ...)
# bind (--letf-save--42989 --letf-bound--42990)
# (unwind-protect ...)
# bind (--letf-save--42985 --letf-bound--42986)
# (unwind-protect ...)
# bind (--letf-save--42981 --letf-bound--42982)
# (unwind-protect ...)
# bind (--letf-save--42977 --letf-bound--42978)
# (unwind-protect ...)
# bind (--letf-save--42973 --letf-bound--42974 standard-face-mapping
frob-mapping tty-props win-prop frobbed-face unfrobbed-face exact-p
tag-set locale face)
Face-frob-property(bold global nil nil default bold font (highlight)
(tty (lambda (x) t) x x-make-font-bold gtk gtk-make-font-bold mswindows
mswindows-make-font-bold msprinter mswindows-make-font-bold) (([default]
. [bold]) ([bold] . t) ([italic] . [bold-italic]) ([bold-italic] . t)))
# bind (exact-p tags locale face)
make-face-bold(bold global)
# bind (Face-frob-property-device-considered-current device)
init-global-faces(#<x-device on ":0.0" 0x24618>)
# (unwind-protect ...)
# (unwind-protect ...)
# bind (inhibit-quit)
# (unwind-protect ...)
# (unwind-protect ...)
make-device(x nil)
# bind (display)
make-x-device(nil)
init-x-win()
# bind (debugger debug-on-error 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 ...)
*** Killing XEmacs
--
Dr. Robert Delius Royar Associate Professor of English
Morehead State University Morehead, Kentucky
Making meaning one message at a time.
California is a dream in the mind of a New Yorker.
-Nicholson Baker
6:30 up 20 days, 2:02, 1 user, load averages: 0.19 0.54 0.50