procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

(rfn-eshadow-regexp): Deal correctly with escaped dollar-signs.

Browse source
This commit is contained in:
Miles Bader 2001-10-09 02:53:51 +00:00
parent a277229e6b
commit f4be0a12f6
2 changed files with 10 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

8
lisp/ChangeLog
View file

@ -1,5 +1,13 @@
2001-10-09 Miles Bader <miles@gnu.org>
* rfn-eshadow.el (rfn-eshadow-regexp): Deal correctly with escaped
dollar-signs.
* comint.el (comint-insert-previous-argument): New function.
(comint-mode-map): Bind `C-c .' to `comint-input-previous-argument'.
(comint-insert-previous-argument-last-start-pos)
(comint-insert-previous-argument-last-index): New variables.
* apropos.el (apropos-next-label-button): Use the presence of a
`apropos-label' property to detect label buttons.

4
lisp/rfn-eshadow.el
View file

@ -129,10 +129,10 @@ system, `read-file-name-electric-shadow-properties' is used instead."
;; This horrible regexp considers the following patterns as
;; starting an absolute pathname, when following a `/' or an `\':
;; L: / // ~ $ \\ \\\\
"\\(.*[^/]+/+?\\|/*?\\|\\)\\([$~]\\|[][\\^a-z]:\\|//?\\([^][\\^a-z/$~]\\|[^/$~][^:]\\|[^/$~]?\\'\\)\\)")
"\\(.*[^/]+/+?\\|/*?\\|\\)\\(~\\|$[^$]\\|$\\'\\|[][\\^a-z]:\\|//?\\([^][\\^a-z/$~]\\|[^/$~][^:]\\|[^/$~]?\\'\\)\\)")
(t
;; default is for unix-style filenames
"\\(.*/\\)[/$~]"))
"\\(.*/\\)\\([/~]\\|$[^$]\\|$\\'\\)"))
"Regular expression used to match shadowed filenames.
There should be at least one regexp group; the end of the first one
is used as the end of the shadowed portion of the filename.")