[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] emacs-24 r117091: * files.el (cd-absolute): Test if direct
From: |
Glenn Morris |
Subject: |
[Emacs-diffs] emacs-24 r117091: * files.el (cd-absolute): Test if directory is accessible |
Date: |
Fri, 09 May 2014 06:53:41 +0000 |
User-agent: |
Bazaar (2.6b2) |
------------------------------------------------------------
revno: 117091
revision-id: address@hidden
parent: address@hidden
fixes bug: http://debbugs.gnu.org/17330
committer: Glenn Morris <address@hidden>
branch nick: emacs-24
timestamp: Thu 2014-05-08 23:53:30 -0700
message:
* files.el (cd-absolute): Test if directory is accessible
rather than executable.
This can't be any worse, and may be better in some situations.
It may or may not fix bug#17330.
modified:
lisp/ChangeLog changelog-20091113204419-o5vbwnq5f7feedwu-1432
lisp/files.el files.el-20091113204419-o5vbwnq5f7feedwu-265
=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog 2014-05-09 06:42:39 +0000
+++ b/lisp/ChangeLog 2014-05-09 06:53:30 +0000
@@ -1,5 +1,8 @@
2014-05-09 Glenn Morris <address@hidden>
+ * files.el (cd-absolute): Test if directory is accessible
+ rather than executable. (Bug#17330)
+
* progmodes/compile.el (recompile):
Handle C-u M-x recompile from a non-compilation buffer. (Bug#17444)
=== modified file 'lisp/files.el'
--- a/lisp/files.el 2014-04-04 02:09:35 +0000
+++ b/lisp/files.el 2014-05-09 06:53:30 +0000
@@ -693,7 +693,7 @@
(if (file-exists-p dir)
(error "%s is not a directory" dir)
(error "%s: no such directory" dir))
- (unless (file-executable-p dir)
+ (unless (file-accessible-directory-p dir)
(error "Cannot cd to %s: Permission denied" dir))
(setq default-directory dir)
(setq list-buffers-directory dir)))
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] emacs-24 r117091: * files.el (cd-absolute): Test if directory is accessible,
Glenn Morris <=