[Bug: 21.5-b18] another mysterious crash
Eric Berg
eberg at bergbrains.com
Thu Feb 22 13:42:38 EST 2007
Dear Bug Team!
Not sure why it's been happening lately, but it seems that when I yank
or paste my xemacs just crashes.
Here's the stack trace:
# (unwind-protect ...)
# (unwind-protect ...)
# (unwind-protect ...)
# (unwind-protect ...)
# (unwind-protect ...)
# (unwind-protect ...)
# (unwind-protect ...)
put-text-property(5109 5110 syntax-table (15))
# bind (at how noface string e bb)
cperl-commentify(5109 5431 t)
# (unwind-protect ...)
# (unwind-protect ...)
# bind (search stop-point cperl-nonoverridable-face font-lock-comment-face font-lock-function-name-face font-lock-constant-face font-lock-string-face err-l st-l state state-point use-syntax-state after-cha
nge-functions modified buffer-undo-list inhibit-read-only case-fold-search
i2 was-comment REx-comment-end REx-comment-start is-x-REx is-REx tb tail c
i argument e1 b1 qtag tag bb e b here-face head-face face
tmpend go cperl-pod-here-fontify ignore-max end non-inter max min)
cperl-find-pods-heres(5064 5070 t nil t)
# bind (dbg iend istate start end)
cperl-fontify-syntaxically(5070)
# bind (case-fold-search keywords keyword matcher highlights end start)
font-lock-fontify-syntactic-keywords-region(5064 5070)
# (unwind-protect ...)
# bind (modified buffer-undo-list inhibit-read-only old-syntax-table
buffer-file-name buffer-file-truename loudly end beg)
font-lock-default-fontify-region(5064 5070 nil)
# bind (loudly end beg)
font-lock-fontify-region(5064 5070)
# bind (val end beg)
#<compiled-function (beg end val) "...(5)" [end beg font-lock-fontify-region] 3>(5064 5070 t)
map-range-table(#<compiled-function (beg end val) "...(5)" [end beg
font-lock-fontify-region] 3> #s(range-table data ((5064 5070) t)))
# (unwind-protect ...)
# (unwind-protect ...)
# (unwind-protect ...)
# bind (dummy buffer)
#<compiled-function (buffer dummy) "...(47)" [font-lock-pending-buffer-table font-lock-range-table buffer remhash buffer-live-p clear-range-table map-extents #<compiled-function (ex dummy-maparg) "...(32)"
[font-lock-range-table ex end beg extent-start-position
extent-end-position 0 1 put-range-table t] 5> nil font-lock-pending t
put-text-property map-range-table #<compiled-function (beg end val)
"...(5)" [en
d beg font-lock-fontify-region] 3>] 9>(#<buffer "DNSAdminApp.pm"> t)
# (unwind-protect ...)
maphash(#<compiled-function (buffer dummy) "...(47)" [font-lock-pending-buffer-table font-lock-range-table buffer remhash buffer-live-p clear-range-table map-extents #<compiled-function (ex dummy-maparg) "
..(32)" [font-lock-range-table ex end beg extent-start-position
extent-end-position 0 1 put-range-table t] 5> nil font-lock-pending t
put-text-property map-range-table #<compiled-function (beg end val) "...
(5)" [end beg font-lock-fontify-region] 3>] 9> #<hash-table size 0/29
weakness key 0x2e6f>)
# (unwind-protect ...)
# bind (match-data)
font-lock-fontify-pending-extents()
#<compiled-function nil "...(10)" [font-lock-pending-buffer-table
hash-table-count 0 font-lock-fontify-pending-extents] 2>()
# (unwind-protect ...)
call-with-condition-handler(#<compiled-function (__call_trapping_errors_arg__) "...(17)" [__call_trapping_errors_arg__ errstr error-message-string lwarn general warning "Error in %s: %s\n\nBacktrace follow
s:\n\n%s" "unknown" backtrace-in-condition-handler-eliminating-handler] 8>
#<compiled-function nil "...(10)" [font-lock-pending-buffer-table
hash-table-count 0 font-lock-fontify-pending-extents] 2>)
# (condition-case ... . ((error)))
font-lock-pre-idle-hook()
# (unwind-protect ...)
# (catch #<INTERNAL OBJECT (XEmacs bug?) (opaque, size=0) 0x83feb24> ...)
# (unwind-protect ...)
# (unwind-protect ...)
# bind (inhibit-quit)
# (unwind-protect ...)
# (unwind-protect ...)
# bind (inhibit-quit)
# (condition-case ... . error)
# (catch top-level ...)
================================================================
System Info to help track down your bug:
---------------------------------------
uname -a: Linux mozart 2.6.9 #1 SMP Wed Dec 1 14:42:08 UTC 2004 i686 i686
i386 GNU/Linux
/configure 'i386-suse-linux' '--with-gcc' '--dynamic' '--debug=no'
'--error-checking=none' '--cflags=-O2 -march=i586 -mcpu=i686
-fmessage-length=0 -Wall -g -Wall -Wno-switch -pipe -O2 -march=i586
-mcpu=i686 -fmessage-length=0 -Wall -g -fno-strict-aliasing' '--ldflags='
'--prefix=/usr' '--exec-prefix=/usr' '--bindir=/usr/X11R6/bin'
'--datadir=/usr/share' '--archlibdir=/usr/lib/xemacs/21.5.18/i386-suse-linux' '--docdir=/usr/lib/xemacs/21.5.18/i386-suse-linux' '--lispdir=/usr/share/xemacs/21.5.18/lisp' '--etcdir=/usr/share/xemacs/21.5.18/etc' '--statedir=/var/lib/xemacs' '--moduledir=/usr/lib/xemacs/21.5.18/i386-suse-linux/modules' '--infodir=/usr/share/xemacs/info' '--mandir=/usr/share/man/man1' '--with-database=gnudbm,berkdb' '--with-ncurses' '--with-tty=yes' '--with-site-lisp' '--with-sound=native' '--with-gpm' '--pdump' '--with-xpm' '--with-gif' '--with-tiff' '--with-jpeg' '--with-png' '--with-x' '--with-athena=3d' '--with-menubars=lucid' '--with-scrollbars=lucid' '--with-
dialogs=athena' '--with-widgets=athena' '--x-includes=/usr/X11R6/include'
'--x-libraries=/usr/X11R6/lib' '--with-mule' '--with-xim=xlib' '--with-xfs'
'--with-clash-detection' '--with-ldap' '--with-pop'
XEmacs 21.5-b18 "chestnut" (+CVS-20041021) configured for `i386-suse-linux'.
Compilation Environment and Installation Defaults:
Source code location: /usr/src/packages/BUILD/xemacs-21.5.18
Installation prefix: /usr
Operating system description file: `s/linux.h'
Machine description file: `m/intel386.h'
Compiler version: gcc (GCC) 3.3.5 20050117 (prerelease)
(SUSE Linux)
- GCC specs file: /usr/lib/gcc-lib/i586-suse-linux/3.3.5/specs
- Compiler command: gcc -Wall -Wno-switch -Winline
-Wmissing-prototypes -Wsign-compare -Wundef -Wstrict-prototypes -Wpacked
-Wunused-parameter -O2 -march=i586 -mcpu=i686 -fmessage-length=0 -Wall -g
-Wall -Wno-switch -pipe -O2 -march=i586 -mcpu=i686 -fmessage-length=0 -Wall
-g -fno-strict-aliasing
libc version:
Relocating allocator for buffers: no
GNU version of malloc: yes
- Using Doug Lea's new malloc from the GNU C Library.
Window System:
Compiling in support for the X window system:
- X Windows headers location: /usr/X11R6/include
- X Windows libraries location: /usr/X11R6/lib
- Handling WM_COMMAND properly.
Compiling in support for the Athena widget set:
- Athena headers location: X11/Xaw3d
- Athena library to link: Xaw3d
Using Lucid menubars.
Using Lucid scrollbars.
Using Athena dialog boxes.
Using Athena native widgets.
TTY:
Compiling in support for ncurses.
Compiling in support for GPM (General Purpose Mouse).
Images:
Compiling in support for GIF images (builtin).
Compiling in support for XPM images.
Compiling in support for PNG images.
Compiling in support for JPEG images.
Compiling in support for TIFF images.
Compiling in support for X-Face message headers.
Sound:
Compiling in support for sound (native).
Databases:
Compiling in support for Berkeley database.
Compiling in support for GNU DBM.
Compiling in support for LDAP.
Internationalization:
Compiling in support for Mule (multi-lingual Emacs).
Compiling in support for XIM (X11R5+ I18N input method).
- Using raw Xlib to provide XIM support.
- Using XFontSet to provide bilingual menubar.
Compiling in support for Canna on Mule.
Compiling in support for the WNN input method on Mule.
Mail:
Compiling in support for POP mail retrieval.
Compiling in support for "dot-locking" mail spool file locking method.
Other Features:
Inhibiting IPv6 canonicalization at startup.
Compiling in support for dynamic shared object modules.
Using the new portable dumper.
Load-Path Lisp Shadows:
----------------------
(/home/eberg/.lisp/apache-mode
/usr/share/xemacs/xemacs-packages/lisp/text-modes/apache-mode
/usr/share/xemacs/mule-packages/lisp/mule-base/ethio-util
/usr/share/xemacs/21.5.18/lisp/mule/ethio-util
/usr/share/xemacs/mule-packages/lisp/mule-base/china-util
/usr/share/xemacs/21.5.18/lisp/mule/china-util
/usr/share/xemacs/mule-packages/lisp/mule-base/cyril-util
/usr/share/xemacs/21.5.18/lisp/mule/cyril-util
/usr/share/xemacs/mule-packages/lisp/mule-base/korea-util
/usr/share/xemacs/21.5.18/lisp/mule/korea-util
/usr/share/xemacs/mule-packages/lisp/mule-base/viet-util
/usr/share/xemacs/21.5.18/lisp/mule/viet-util
/usr/share/xemacs/mule-packages/lisp/mule-base/japan-util
/usr/share/xemacs/21.5.18/lisp/mule/japan-util
/usr/share/xemacs/mule-packages/lisp/mule-ucs/unicode
/usr/share/xemacs/21.5.18/lisp/unicode
/usr/share/xemacs/xemacs-packages/lisp/build/build-report
/usr/share/xemacs/21.5.18/lisp/build-report
/usr/share/xemacs/site-packages/lisp/term/gnome
/usr/share/xemacs/21.5.18/lisp/gnome)
Installed XEmacs Packages:
-------------------------
(zenirc ver: 1.15 upstream: 2.112)
(xwem ver: 1.19 upstream: lg at xwem.org--2004/xwem--main--2.0--version-0)
(xslt-process ver: 1.11 upstream: 1.2.1)
(xslide ver: 1.09 upstream: 0.2.2)
(xlib ver: 1.13 upstream: lg at xwem.org--2004/xlib--main--2.0--version-0)
(xemacs-devel ver: 1.7 upstream: No-Upstream-Ver)
(xemacs-base ver: 1.94 upstream: No-Upstream-Ver)
(x-symbol ver: 1.1 upstream: 4.5.1)
(w3 ver: 1.3 upstream: 4.0pre47)
(vm ver: 7.18 upstream: 7.17)
(viper ver: 1.37 upstream: 3.09)
(view-process ver: 1.13 upstream: 2.4)
(vhdl ver: 1.19 upstream: 3.32.20)
(vc-cc ver: 1.22 upstream: No-Upstream-Ver)
(vc ver: 1.4 upstream: No-Upstream-Ver)
(tramp ver: 1.22 upstream: 2.0.47)
(tpu ver: 1.14 upstream: 4.2X)
(tooltalk ver: 1.15 upstream: No-Upstream-Ver)
(tm ver: 1.37 upstream: No-Upstream-Ver)
(time ver: 1.14 upstream: 1.17)
(textools ver: 1.15 upstream: No-Upstream-Ver)
(text-modes ver: 1.82 upstream: No-Upstream-Ver)
(texinfo ver: 1.28 upstream: No-Upstream-Ver)
(supercite ver: 1.2 upstream: 3.55x3)
(strokes ver: 1.1 upstream: No-Upstream-Ver)
(speedbar ver: 1.27 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.11 upstream: 3.9.5)
(slider ver: 1.15 upstream: 0.3x1)
(sieve ver: 1.17 upstream: No-Upstream-Ver)
(sh-script ver: 1.18 upstream: 2.0e)
(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.15 upstream: 1.14.4)
(ruby-modes ver: 1.02 upstream: 1.6.8)
(rmail ver: 1.14 upstream: No-Upstream-Ver)
(riece ver: 1.17 upstream: 1.0.6)
(reftex ver: 1.34 upstream: 4.21)
(python-modes ver: 1.06 upstream: No-Upstream-Ver)
(psgml-dtds ver: 1.03 upstream: No-Upstream-Ver)
(psgml ver: 1.43 upstream: 1.3.1)
(ps-print ver: 1.11 upstream: 6.5.6)
(prog-modes ver: 2.01 upstream: No-Upstream-Ver)
(pgg ver: 1.05 upstream: 0.1)
(perl-modes ver: 1.06 upstream: No-Upstream-Ver)
(pcomplete ver: 1.03 upstream: 1.1.6)
(pcl-cvs ver: 1.66 upstream: R-2_9_9)
(pc ver: 1.26 upstream: No-Upstream-Ver)
(os-utils ver: 1.35 upstream: No-Upstream-Ver)
(ocaml ver: 0.05 upstream: 3.06)
(net-utils ver: 1.44 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.28 upstream: 7.4.2)
(mew ver: 1.18 upstream: 1.94.2)
(mailcrypt ver: 2.14 upstream: 3.5.8)
(mail-lib ver: 1.7 upstream: No-Upstream-Ver)
(liece ver: 1.13 upstream: 1.4.9)
(jde ver: 1.46 upstream: 2.3.2)
(ispell ver: 1.29 upstream: 3.6)
(ilisp ver: 1.33 upstream: 5.12.0)
(igrep ver: 1.13 upstream: 2.111)
(idlwave ver: 1.31 upstream: 5.1)
(ibuffer ver: 1.09 upstream: No-Upstream-Ver)
(hm--html-menus ver: 1.23 upstream: 5.9)
(haskell-mode ver: 1.07 upstream: 1.45)
(gnus ver: 1.82 upstream: 5.10.6)
(gnats ver: 1.16 upstream: 3.101)
(general-docs ver: 1.03 upstream: No-Upstream-Ver)
(games ver: 1.15 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.15 upstream: No-Upstream-Ver)
(ess ver: 1.12 upstream: 5.2.3)
(eshell ver: 1.08 upstream: 2.4.1)
(escreen ver: 1.01 upstream: 1.16)
(erc ver: 0.12 upstream: Version 4.0 Revision: 1.675)
(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.19 upstream: No-Upstream-Ver)
(ediff ver: 1.5 upstream: 2.75)
(edebug ver: 1.21 upstream: No-Upstream-Ver)
(ecrypto ver: 0.19 upstream: 2.0)
(ecb ver: 1.22 upstream: 2.31)
(docbookide ver: 0.07000000000000001 upstream: 0.1)
(dired ver: 1.16 upstream: 7.12)
(dictionary ver: 1.15 upstream: 1.8)
(debug ver: 1.17 upstream: No-Upstream-Ver)
(crisp ver: 1.14 upstream: 1.34)
(cookie ver: 1.15 upstream: No-Upstream-Ver)
(clearcase ver: 1.09 upstream: /main/laptop/156)
(cc-mode ver: 1.43 upstream: 5.30.9)
(calendar ver: 1.23 upstream: No-Upstream-Ver)
(calc ver: 1.26 upstream: 2.02fX3)
(c-support ver: 1.2 upstream: No-Upstream-Ver)
(build ver: 1.14 upstream: 2.02)
(bbdb ver: 1.25 upstream: 2.34)
(auctex ver: 1.42 upstream: 11.53)
(apel ver: 1.27 upstream: 10.2)
(ada ver: 1.14 upstream: 2.27)
(Sun ver: 1.16 upstream: No-Upstream-Ver)
(mule-ucs ver: 1.06 upstream: 0.84)
(mule-base ver: 1.46 upstream: No-Upstream-Ver)
(locale ver: 1.22 upstream: No-Upstream-Ver)
(leim ver: 1.22 upstream: No-Upstream-Ver)
(latin-unity ver: 1.1 upstream: 1.10)
(egg-its ver: 1.27 upstream: No-Upstream-Ver)
(edict ver: 1.16 upstream: 0.9.9)
Installed Modules:
-----------------
Features:
--------
(mail-abbrevs xemacsbug shadow sendmail rfc822 view-less view paren
blink-paren pending-del func-menu recent-files jka-compr gnuserv vc
ring vc-hooks un-define latin-euro-input quail overlay
latin-unity-tables latin-unity-latin10 latin-unity-latin9
latin-unity-latin8 latin-unity-latin7 latin-unity-vars latin-unity
ispell x-compose zenirc-autoloads xwem-autoloads edmacro
xslt-process-autoloads xslide-autoloads xlib-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
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 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 hm--html-menus-autoloads
haskell-mode-autoloads gnus-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 ediff-hook 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 Sun-autoloads
mule-ucs-autoloads mule-base-autoloads locale-autoloads leim-autoloads
latin-unity-autoloads egg-its-autoloads edict-autoloads
modules-autoloads mule-autoloads auto-autoloads disp-table loadhist
rsz-minibuf auto-show fontl-hooks x-iso8859-1 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 iso8859-1 page buff-menu lib-complete cus-file
derived newcomment env text-props frame obsolete cus-start custom
widget cl-extra cl cl-19 packages backquote CANNA wnn unicode
lucid-scrollbars cut-buffer lucid-menubars athena-dialogs x
c-balloon-help tty-frames tty toolbar native-sound scrollbar
unix-processes multicast network-streams subprocesses modules
menu-accelerator-support menubar berkeley-db dbm md5 xemacs xim mule
gutter tiff png gif jpeg xface xpm xbm lisp-float-type file-coding
linux dialog devices window-system base64)
Recent keystrokes:
-----------------
button1 button1up M-x d e s c r i b e SPC i n s TAB
RET M-x r e p o r t SPC e m TAB RET
Recent messages (most recent first):
-----------------------------------
Loading xemacsbug...done
Loading xemacsbug...
Loading view-less...done
Loading view-less...
Warning: XEmacs: Meta_L (0x73) generates Mod1, which is generated by Alt.
Warning: XEmacs: Meta_R (0x74) generates Mod1, which is generated by Alt.
Warning:
Two distinct modifier keys (such as Meta and Hyper) cannot generate
the same modifier bit, because Emacs won't be able to tell which
modifier was actually held down when some other key is pressed. It
won't be able to tell Meta-x and Hyper-x apart, for example. Change
one of these keys to use some other modifier bit. If you intend for
these keys to have the same behavior, then change them to have the
same keysym as well as the same modifier bit.
Warning:
The meanings of the modifier bits Mod1 through Mod5 are determined
by the keysyms used to control those bits. Mod1 does NOT always
mean Meta, although some non-ICCCM-compliant programs assume that.
Paren mode is blink-paren
Loading paren...done
Loading paren...
Loading pending-del...done
Loading pending-del...
Loading /home/eberg/.recent-files.el...done
Loading /home/eberg/.recent-files.el...
Loading jka-compr...done
Loading jka-compr...
Loading edmacro...done
Loading edmacro...
And here's my init.el
; Eric's init.el xemacs init file.
;; $Id: init.el,v 1.3 2007/02/16 20:28:36 eberg Exp eberg $
(add-to-list 'load-path (expand-file-name "~/.lisp" load-path))
; Add Stuff first.
;; The Version contropl stuiff....load it!
(require 'vc)
;;; Global modes
(setq global-font-lock-mode t)
;; GNUServ
(require 'gnuserv)
(autoload 'gnuserv-start "gnuserv" "Better Emacs server support")
(gnuserv-start)
(column-number-mode t)
(line-number-mode t)
;; turn on handling of compressed files
(toggle-auto-compression 1)
;; Recent Files
(require 'recent-files)
(recent-files-initialize)
;; Function menu
(require 'func-menu)
(define-key global-map 'f8 'function-menu)
;;; Set up Key Bindings
(global-set-key "\C-x\C-j" 'goto-line)
(global-set-key "\M-\C-r" 'replace-regexp)
(global-set-key "\M-L" 'what-line)
(global-set-key "\M-\C-D" 'ediff-revision)
(global-set-key "\M-P" 'ps-print-buffer-with-faces)
(global-set-key "\C-co" 'occur)
(global-set-key [(f4)] 'speedbar-get-focus)
;(global-set-key "\M-\C-l" 'complete)
;; Scroll by one line with shift.
(defun up-one () (interactive) (scroll-up 1))
(defun down-one () (interactive) (scroll-down 1))
(global-set-key [(shift down)] 'down-one)
(global-set-key [(shift up)] 'up-one )
(global-set-key "\C-z" nil)
;;; Set up Specific Modes
;; CPerl Mode Stuff
(setq cperl-indent-level 4
cperl-continued-statement-offset 4
cperl-continued-brace-offset 0
cperl-brace-offset -4
cperl-brace-imaginary-offset 0
cperl-label-offset -4
cperl-tab-always-indent t)
(setq cperl-hairy t)
(setq auto-mode-alist
(append '(("\\.\\([pP][Llm]\\|al\\|pod\\)$" . perl-mode))
auto-mode-alist ))
(setq interpreter-mode-alist (append interpreter-mode-alist
'(("miniperl" . perl-mode))))
More information about the XEmacs-Beta
mailing list
