(ffap-prompter): Don't use the region.
This commit is contained in:
parent
1d1d90d624
commit
1961ef0413
2 changed files with 9 additions and 1 deletions
|
|
@ -1,3 +1,7 @@
|
|||
2008-06-05 Stefan Monnier <monnier@iro.umontreal.ca>
|
||||
|
||||
* ffap.el (ffap-prompter): Don't use the region.
|
||||
|
||||
2008-06-05 Sam Steingold <sds@gnu.org>
|
||||
|
||||
* vc-cvs.el (vc-cvs-registered): Consider a directory with a CVS
|
||||
|
|
|
|||
|
|
@ -1398,7 +1398,11 @@ Uses the face `ffap' if it is defined, or else `highlight'."
|
|||
(ffap-read-file-or-url
|
||||
(if ffap-url-regexp "Find file or URL: " "Find file: ")
|
||||
(prog1
|
||||
(setq guess (or guess (ffap-guesser))) ; using ffap-alist here
|
||||
(let ((mark-active nil))
|
||||
;; Don't use the region here, since it can be something
|
||||
;; completely unwieldy. If the user wants that, she could
|
||||
;; use M-w before and then C-y. --Stef
|
||||
(setq guess (or guess (ffap-guesser)))) ; using ffap-alist here
|
||||
(and guess (ffap-highlight))
|
||||
)))
|
||||
(ffap-highlight t)))
|
||||
|
|
|
|||
Loading…
Add table
Reference in a new issue