[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
~dir
From: |
Devon Sean McCullough |
Subject: |
~dir |
Date: |
Sun, 3 Feb 2002 19:54:47 -0500 (EST) |
In GNU Emacs 19.34.2 (sparc-sun-solaris2.5.1, X toolkit) of Tue Jan 14 1997 on
tarkin
Also in Emacs 21.1
Two demos clarify bug:
[Note ~foo~/~foo~
and ~dir~/~dir~ below]
$ emacs -q
C-x d / t m p RET
+ ~ f o o ~ RET
RET
+ b a r RET
make-directory: Creating directory: no such file or directory,
/tmp/~foo~/~foo~/bar
$ cat bugdemo.el
(let ((debug-on-error t))
(shell-command "echo shell expands to: ~dir~ ~file~")
(make-directory "./~dir~")
(cd "./~dir~")
(find-file "./~file~"))
$ emacs -q -l bugdemo.el
Signaling: (error "Variable binding depth exceeds max-specpdl-size")
file-truename("~/~dir~/~dir~" (43) (nil))
file-truename("~/~dir~/~dir~" (43) (nil))
file-truename("~/~dir~/~dir~" (43) (nil))
file-truename("~/~dir~/~dir~" (43) (nil))
file-truename("~/~dir~/~dir~" (43) (nil))
file-truename("~/~dir~/~dir~" (43) (nil))
file-truename("~/~dir~/~dir~" (43) (nil))
file-truename("~/~dir~/~dir~" (43) (nil))
file-truename("~/~dir~/~dir~" (43) (nil))
file-truename("~/~dir~/~dir~" (43) (nil))
file-truename("~/~dir~/~dir~" (43) (nil))
file-truename("~/~dir~/~dir~" (43) (nil))
file-truename("~/~dir~/~dir~" (43) (nil))
file-truename("~/~dir~/~dir~" (43) (nil))
file-truename("~/~dir~/~dir~" (43) (nil))
file-truename("~/~dir~/~dir~" (43) (nil))
file-truename("~/~dir~/~dir~" (43) (nil))
file-truename("~/~dir~/~dir~" (43) (nil))
file-truename("~/~dir~/~dir~" (43) (nil))
file-truename("~/~dir~/~dir~" (43) (nil))
file-truename("~/~dir~/~dir~" (43) (nil))
file-truename("~/~dir~/~dir~" (43) (nil))
file-truename("~/~dir~/~dir~" (43) (nil))
file-truename("~/~dir~/~dir~" (43) (nil))
file-truename("~/~dir~/~dir~" (43) (nil))
file-truename("~/~dir~/~dir~" (43) (nil))
file-truename("~/~dir~/~dir~" (43) (nil))
file-truename("~/~dir~/~dir~" (43) (nil))
file-truename("~/~dir~/~dir~" (43) (nil))
file-truename("~/~dir~/~dir~" (43) (nil))
file-truename("~/~dir~/~dir~" (43) (nil))
file-truename("~/~dir~/~dir~" (43) (nil))
file-truename("~/~dir~/~dir~" (43) (nil))
file-truename("~/~dir~/~dir~" (43) (nil))
file-truename("~/~dir~/~dir~" (43) (nil))
file-truename("~/~dir~/~dir~" (43) (nil))
file-truename("~/~dir~/~dir~" (43) (nil))
file-truename("~/~dir~/~dir~" (43) (nil))
file-truename("~/~dir~/~dir~" (43) (nil))
file-truename("~/~dir~/~dir~" (43) (nil))
file-truename("~/~dir~/~dir~" (43) (nil))
file-truename("~/~dir~/~dir~" (43) (nil))
file-truename("~/~dir~/~dir~" (43) (nil))
file-truename("~/~dir~/~dir~" (43) (nil))
file-truename("~/~dir~/~dir~" (43) (nil))
file-truename("~/~dir~/~dir~" (43) (nil))
file-truename("~/~dir~/~dir~" (43) (nil))
file-truename("~/~dir~/~dir~" (43) (nil))
file-truename("~/~dir~/~dir~" (43) (nil))
file-truename("~/~dir~/~dir~" (43) (nil))
file-truename("~/~dir~/~dir~" (43) (nil))
file-truename("~/~dir~/~dir~" (43) (nil))
file-truename("~/~dir~/~dir~" (43) (nil))
file-truename("~/~dir~/~dir~" (43) (nil))
file-truename("~/~dir~/~dir~" (43) (nil))
file-truename("~/~dir~/~dir~" (43) (nil))
file-truename("~/~dir~/~dir~/~file~")
find-file-noselect("./~file~")
find-file("./~file~")
(let ((debug-on-error t)) (shell-command "echo shell expands to: ~dir~
~file~") (delete-directory "./~dir~") (make-directory "./~dir~") (cd "./~dir~")
(find-file "./~file~"))
load("/home/ai/devon/bugdemo.el" nil t)
command-line-1(("-l" "bugdemo.el"))
command-line()
normal-top-level()
Recent input:
M-x r e p o r TAB RET ~ d i r RET
Recent messages:
shell expands to: ~dir~ ~file~
Loading debug...
Loading debug...done
Entering debugger...
[2 times]
Making completion list...
Loading emacsbug...
Loading emacsbug...done
Loading mailalias...
Loading mailalias...done
- ~dir, Devon Sean McCullough, 2002/02/03
- ~dir,
Devon Sean McCullough <=