[Emacs-diffs] /srv/bzr/emacs/trunk r110988: Add some missing find options to find-cmd.el.

[Chong Yidong]

------------------------------------------------------------
revno: 110988
fixes bug: http://debbugs.gnu.org/12856
committer: Chong Yidong <address@hidden>
branch nick: trunk
timestamp: Fri 2012-11-23 16:33:20 +0800
message:
  Add some missing find options to find-cmd.el.
  
  * find-cmd.el (find-constituents): Add executable, ipath,
  readable, samefile, writable, daystart, regextype.
modified:
  lisp/ChangeLog
  lisp/find-cmd.el

=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog    2012-11-23 07:31:58 +0000
+++ b/lisp/ChangeLog    2012-11-23 08:33:20 +0000
@@ -1,3 +1,8 @@
+2012-11-23  Chong Yidong  <address@hidden>
+
+       * find-cmd.el (find-constituents): Add executable, ipath,
+       readable, samefile, writable, daystart, regextype (Bug#12856).
+
 2012-11-23  Stefan Monnier  <address@hidden>
 
        * emacs-lisp/ert.el, emacs-lisp/ert-x.el: Use cl-lib and 
lexical-binding.

=== modified file 'lisp/find-cmd.el'
--- a/lisp/find-cmd.el  2012-01-19 07:21:25 +0000
+++ b/lisp/find-cmd.el  2012-11-23 08:33:20 +0000
@@ -63,6 +63,7 @@
     (cnewer     . (1))
     (ctime      . (1))
     (empty      . (0))
+    (executable . (0))
     (false      . (0))
     (fstype     . (1))
     (gid        . (1))
@@ -70,37 +71,43 @@
     (ilname     . (1))
     (iname      . (1))
     (inum       . (1))
+    (ipath      . (1))
+    (iregex     . (1))
     (iwholename . (1))
-    (iregex     . (1))
     (links      . (1))
     (lname      . (1))
     (mmin       . (1))
     (mtime      . (1))
     (name       . (1))
     (newer      . (1))
+    (nogroup    . (0))
     (nouser     . (0))
-    (nogroup    . (0))
     (path       . (1))
     (perm       . (0))
+    (readable   . (0))
     (regex      . (1))
-    (wholename  . (1))
+    (samefile   . (1))
     (size       . (1))
     (true       . (0))
     (type       . (1))
     (uid        . (1))
     (used       . (1))
     (user       . (1))
+    (wholename  . (1))
+    (writable   . (0))
     (xtype      . (nil))
 
     ;; normal options (always true)
+    (daystart              . (0))
     (depth                 . (0))
     (maxdepth              . (1))
     (mindepth              . (1))
     (mount                 . (0))
     (noleaf                . (0))
-    (xdev                  . (0))
     (ignore_readdir_race   . (0))
     (noignore_readdir_race . (0))
+    (regextype             . (1))
+    (xdev                  . (0))
 
     ;; actions
     (delete  . (0))