The `replace-regexp-in-string' implementation in xtla-xemacs.el simply
calls `replace-in-string'. On my XEmacs (at least), this results in
an infinite loop - repeatedly appending "rep" to "foo":
(replace-in-string "foo" "$" "rep")
The stacktrace at the end of this mail is one example of this
happening.
- Gus
Emacs : XEmacs 21.4 (patch 15) "Security Through Obscurity" [Lucid]
(i386-debian-linux, Mule) of Mon Feb 9 2004 on roo
Package: XTLA [EMAIL PROTECTED]
current state:
==============
(setq
emacs-version "21.4 (patch 15) \"Security Through Obscurity\" XEmacs Lucid"
tla-version "[EMAIL PROTECTED]"
tla-arch-version "tla tla-1.2-4 from regexps.com\n\nCopyright 2003 Tom
Lord\n\nThis is free software; see the source for copying conditions.\nThere is
NO warranty; not even for MERCHANTABILITY or FITNESS FOR A\nPARTICULAR
PURPOSE.\n\nReport bugs to [EMAIL PROTECTED] automatically generated release id
(by arch-buildpackage)\n\ntla-1.2-4\n"
tla-archive-list-mode-hook nil
tla-automatically-revert-buffers t
tla-bookmarks-cleanup-dont-prompt nil
tla-bookmarks-file-name "~/.tla-bookmarks.el"
tla-bookmarks-mode-hook nil
tla-branch-list-mode-hook nil
tla-cat-log-mode-hook nil
tla-category-list-mode-hook nil
tla-changes-recursive t
tla-diff-executable "diff"
tla-do-not-prompt-for-save nil
tla-error-buffer " *tla-errors*"
tla-follow-symlinks 'tree
tla-follow-symlinks-mode 'follow
tla-highlight t
tla-install-command-help-system t
tla-inventory-file-mode-hook nil
tla-inventory-mode-hook nil
tla-log-buffer " *tla-log*"
tla-log-commands t
tla-log-edit-mode-hook nil
tla-log-insert-last t
tla-log-library "~/.arch-log-library/"
tla-log-library-greedy t
tla-logs-mode-hook nil
tla-make-archive-hook nil
tla-make-branch-hook nil
tla-make-category-hook nil
tla-make-log-function 'tla-default-make-log-function
tla-make-version-hook nil
tla-partner-select-function 'tla-partner-select-from-file
tla-patch-executable "patch"
tla-process-buffer " *tla-process*"
tla-read-directory-mode 'sometimes
tla-read-project-tree-mode 'sometimes
tla-revision-list-mode-hook nil
tla-revisions-shows-creator t
tla-revisions-shows-date t
tla-revisions-shows-library t
tla-revisions-shows-merged-by t
tla-revisions-shows-merges nil
tla-revisions-shows-summary t
tla-strict-commits t
tla-switch-to-buffer-first t
tla-switch-to-buffer-mode 'single-window
tla-three-way-merge t
tla-tla-executable "tla"
tla-use-arrow-keys-for-navigation nil
tla-use-forward-option t
tla-version-list-mode-hook nil
features '(silly-mail smiley messagexmas nnheader nnheaderxm gnus-util netrc
time-date parse-time annotations wl-mime mime-play filename
mime-edit eword-encode pgg-parse pgg-def signature mail-utils
elmo-mark elmo-internal elmo-nntp elmo-imap4 elmo-net elmo-dop
elmo-localdir elmo-cache elmo-map octet bbdb-wl planner-wl wl-demo
wl-address wl-thread wl-summary ps-print lpr wl-refile wl-message
elmo-mime mmelmo-buffer mmelmo-imap mmimap mime-parse mmbuffer
mmgeneric wl-highlight elmo-multi wl-folder wl wl-xmas wl-util
elmo elmo-database elmo-msgdb luna wl-draft wl-vars elmo-util utf7
elmo-date elmo-vars emu invisible inv-xemacs wl-template
wl-version elmo-version reporter bbdb-w3 cvs-status filladapt
cvs-edit tramp-vc vc cperl-mode find-func sh-script skeleton
tramp-smb tramp trampver shell-font ssh shell view-less view
hyper-apropos imenu debian-bug rfc2047 qp mm-util mail-prsvr
debian-changelog-mode pcl-cvs pcl-cvs-parse pcl-cvs-info
pcl-cvs-defs pcl-cvs-util cvs-compat dired-faces dired-xemacs
dired cookie dll elib-node erc-truncate erc-menu paren blink-paren
lazy-shot cal-china lunar solar cal-dst cal-persia cal-islam
cal-julian cal-hebrew holidays efs-cu diary-lib time appt
planner-ssh planner-rt request-tracker planner-w3m w3m browse-url
w3m-hist w3m-xmas w3m-ccl pccl pccl-20 w3m-favicon w3m-image
w3m-proc w3m-util planner-bbdb planner-id compile planner info
calendar sort emacs-wiki font disp-table ursys autoinsert mmm-mode
mmm-univ mmm-class mmm-region mmm-utils tex-site erc-nickserv
erc-bbdb bbdb-hooks bbdb-gui bbdb-com mail-abbrevs bbdb timezone
erc-autojoin erc-button wid-edit erc-ring comint ring
erc-pcomplete pcomplete erc-track erc-match erc-fill erc-stamp
erc-netsplit erc erc-compat easy-mmode thingatpt format-spec
edmacro iswitchb icomplete rsz-minibuf xtla xtla-xemacs xtla-core
xtla-defs ffap add-log diff-mode ewoc pp sendmail rfc822 font-lock
ediff-merg ediff-diff ediff-tbar ediff-wind ediff-help ediff-util
ediff-mult ediff-init ediff mwheel vc-hooks jka-compr func-menu
gnuserv mime-image mime-view mime-conf calist mime eword-decode
mel mime-def mcharset mcs-20 mcs-xm mcs-xmu poem poem-xm pces
pces-xfc pces-20 pces-xm pcustom std11 highlight-headers
x-face-xmas x-face mime-setup mail-mime-setup alist semi-setup
path-util semi-def w3m-load mmm-auto mmm-vars mmm-compat
regexp-opt erc-auto emms-auto jabber jabber-ahc-presence
jabber-ahc jabber-version jabber-muc jabber-browse jabber-search
jabber-register jabber-widget jabber-disco jabber-chat
jabber-roster jabber-presence jabber-alert jabber-iq jabber-keymap
jabber-core jabber-logon sha1-el executable hex-util jabber-xml
xml byte-optimize bytecomp byte-compile advice advice-preload
poe-xemacs broken timer overlay poe pym static apel-ver product
jabber-menu jabber-util un-define mule-uni emacs-goodies-el
emacs-goodies-custom emacs-goodies-loaddefs dpkg-dev-el
dpkg-dev-el-loaddefs ispell debian-el debian-el-loaddefs
xtla-autoloads Sun-autoloads ada-autoloads apel-autoloads
auctex-autoloads bbdb-autoloads build-autoloads
c-support-autoloads calc-autoloads calendar-autoloads
cc-mode-autoloads clearcase-autoloads cookie-autoloads
crisp-autoloads debug-autoloads dictionary-autoloads
dired-autoloads docbookide-autoloads ecb-autoloads
ecrypto-autoloads edebug-autoloads ediff-autoloads
edit-utils-autoloads edt-autoloads efs-autoloads eieio-autoloads
elib-autoloads emerge-autoloads erc-autoloads eshell-autoloads
ess-autoloads eterm-autoloads eudc-autoloads footnote-autoloads
forms-autoloads fortran-modes-autoloads frame-icon-autoloads
fsf-compat-autoloads games-autoloads general-docs-autoloads
gnats-autoloads gnus-autoloads haskell-mode-autoloads
hm--html-menus-autoloads hyperbole-autoloads ibuffer-autoloads
idlwave-autoloads igrep-autoloads ilisp-autoloads ispell-autoloads
jde-autoloads liece-autoloads mail-lib-autoloads
mailcrypt-autoloads mew-autoloads mh-e-autoloads mine-autoloads
misc-games-autoloads mmm-mode-autoloads net-utils-autoloads
ocaml-autoloads oo-browser-autoloads os-utils-autoloads
pc-autoloads pcl-cvs-autoloads pcomplete-autoloads
perl-modes-autoloads pgg-autoloads prog-modes-autoloads
ps-print-autoloads psgml-autoloads psgml-dtds-autoloads
python-modes-autoloads reftex-autoloads riece-autoloads
rmail-autoloads ruby-modes-autoloads sasl-autoloads
scheme-autoloads semantic-autoloads sgml-autoloads
sh-script-autoloads sieve-autoloads slider-autoloads
sml-mode-autoloads sounds-au-autoloads sounds-wav-autoloads
speedbar-autoloads strokes-autoloads supercite-autoloads
texinfo-autoloads text-modes-autoloads textools-autoloads
time-autoloads tm-autoloads tooltalk-autoloads tpu-autoloads
tramp-autoloads vc-autoloads vc-cc-autoloads vhdl-autoloads
view-process-autoloads viper-autoloads vm-autoloads w3-autoloads
x-symbol-autoloads xemacs-base-autoloads xemacs-devel-autoloads
xslide-autoloads xslt-process-autoloads zenirc-autoloads
edict-autoloads egg-its-autoloads latin-unity-autoloads
leim-autoloads locale-autoloads lookup-autoloads
mule-base-autoloads mule-ucs-autoloads skk-autoloads
mule-autoloads cus-face lisp-autoloads loadhist auto-show
fontl-hooks x-iso8859-1 slovenian czech romanian ccl mule-help
code-cmds gutter-items menubar-items x-menubar mode-motion mouse
itimer auto-save lisp-mode easymenu iso8859-1 page buff-menu
lib-complete cus-file derived frame text-props obsolete cus-start
custom widget cl-extra mini-cl cl cl-19 packages backquote
very-early-lisp file-coding mule 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 gutter tiff png gif jpeg xface
xpm xbm lisp-float-type linux dialog devices window-system base64)
)
# bind (standard-output stack-trace-on-signal debug-on-signal
stack-trace-on-error debug-on-error)
# (unwind-protect ...)
# (unwind-protect ...)
# bind (temp-buffer cfs literal newtext regexp str)
replace-in-string("/home/gus/src-arch/+packages/libembperl-perl/libembperl-perl-2.0b10"
"/*$" "/" nil)
# bind (literal fixedcase string rep regexp)
replace-regexp-in-string("/*$" "/"
"/home/gus/src-arch/+packages/libembperl-perl/libembperl-perl-2.0b10")
# bind (pwd no-error location)
tla-tree-root("/home/gus/src-arch/+packages/libembperl-perl/libembperl-perl-2.0b10/debian/"
t)
# bind (directory prompt)
tla--read-directory-maybe("Run inventory in (directory): ")
(list (tla--read-directory-maybe "Run inventory in (directory): ")
current-prefix-arg)
call-interactively(tla-inventory)
# (condition-case ... . error)
# (catch top-level ...)
