[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] /srv/bzr/emacs/trunk r112775: * minibuffer.el (read-file-n
From: |
Glenn Morris |
Subject: |
[Emacs-diffs] /srv/bzr/emacs/trunk r112775: * minibuffer.el (read-file-name-completion-ignore-case): |
Date: |
Wed, 29 May 2013 20:18:06 -0700 |
User-agent: |
Bazaar (2.6b2) |
------------------------------------------------------------
revno: 112775
committer: Glenn Morris <address@hidden>
branch nick: trunk
timestamp: Wed 2013-05-29 20:18:06 -0700
message:
* minibuffer.el (read-file-name-completion-ignore-case):
Move before completion--in-region, for eager macro expansion.
Somehow, this avoids an eager macro expansion failure present during
bootstrap since ~ 2013-04-17.
modified:
lisp/ChangeLog
lisp/minibuffer.el
=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog 2013-05-29 23:43:39 +0000
+++ b/lisp/ChangeLog 2013-05-30 03:18:06 +0000
@@ -1,3 +1,8 @@
+2013-05-30 Glenn Morris <address@hidden>
+
+ * minibuffer.el (read-file-name-completion-ignore-case):
+ Move before completion--in-region, for eager macro expansion.
+
2013-05-29 Juri Linkov <address@hidden>
* replace.el (occur-engine): Rename `globalcount' to `global-lines'
@@ -1756,7 +1761,7 @@
2013-04-21 Xue Fuqiao <address@hidden>
- * comint.el: (comint-dynamic-complete-functions, comint-mode-map):
+ * comint.el (comint-dynamic-complete-functions, comint-mode-map):
`comint-dynamic-complete' is obsolete since 24.1, replaced by
`completion-at-point'. (Bug#13774)
=== modified file 'lisp/minibuffer.el'
--- a/lisp/minibuffer.el 2013-05-15 23:55:41 +0000
+++ b/lisp/minibuffer.el 2013-05-30 03:18:06 +0000
@@ -1796,6 +1796,14 @@
(cl-assert (<= start (point)) (<= (point) end))
(funcall completion-in-region-function start end collection predicate))
+(defcustom read-file-name-completion-ignore-case
+ (if (memq system-type '(ms-dos windows-nt darwin cygwin))
+ t nil)
+ "Non-nil means when reading a file name completion ignores case."
+ :group 'minibuffer
+ :type 'boolean
+ :version "22.1")
+
(defun completion--in-region (start end collection &optional predicate)
(with-wrapper-hook
;; FIXME: Maybe we should use this hook to provide a "display
@@ -2268,14 +2276,6 @@
"The function called by `read-file-name' to do its work.
It should accept the same arguments as `read-file-name'.")
-(defcustom read-file-name-completion-ignore-case
- (if (memq system-type '(ms-dos windows-nt darwin cygwin))
- t nil)
- "Non-nil means when reading a file name completion ignores case."
- :group 'minibuffer
- :type 'boolean
- :version "22.1")
-
(defcustom insert-default-directory t
"Non-nil means when reading a filename start with default dir in minibuffer.
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] /srv/bzr/emacs/trunk r112775: * minibuffer.el (read-file-name-completion-ignore-case):,
Glenn Morris <=