comparison lisp/eshell/em-pred.el @ 91204:53108e6cea98

Merge from emacs--devo--0 Revision: emacs@sv.gnu.org/emacs--unicode--0--patch-294
author Miles Bader <miles@gnu.org>
date Thu, 06 Dec 2007 09:51:45 +0000
parents f55f9811f5d7 c5768352ad3f
children 606f2d163a64
comparison
equal deleted inserted replaced
91203:db40129142b2 91204:53108e6cea98
19 19
20 ;; You should have received a copy of the GNU General Public License 20 ;; You should have received a copy of the GNU General Public License
21 ;; along with GNU Emacs; see the file COPYING. If not, write to the 21 ;; along with GNU Emacs; see the file COPYING. If not, write to the
22 ;; Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor, 22 ;; Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
23 ;; Boston, MA 02110-1301, USA. 23 ;; Boston, MA 02110-1301, USA.
24
25 (provide 'em-pred)
26
27 (eval-when-compile (require 'esh-maint))
28
29 (defgroup eshell-pred nil
30 "This module allows for predicates to be applied to globbing
31 patterns (similar to zsh), in addition to string modifiers which can
32 be applied either to globbing results, variable references, or just
33 ordinary strings."
34 :tag "Value modifiers and predicates"
35 :group 'eshell-module)
36 24
37 ;;; Commentary: 25 ;;; Commentary:
38 26
39 ;; Argument predication is used to affect which members of a list are 27 ;; Argument predication is used to affect which members of a list are
40 ;; selected for use as argument. This is most useful with globbing, 28 ;; selected for use as argument. This is most useful with globbing,
58 ;; 46 ;;
59 ;; See the zsh docs for more on the syntax ([(zsh.info)Filename 47 ;; See the zsh docs for more on the syntax ([(zsh.info)Filename
60 ;; Generation]). 48 ;; Generation]).
61 49
62 ;;; Code: 50 ;;; Code:
51
52 (eval-when-compile (require 'eshell))
53
54 (defgroup eshell-pred nil
55 "This module allows for predicates to be applied to globbing
56 patterns (similar to zsh), in addition to string modifiers which can
57 be applied either to globbing results, variable references, or just
58 ordinary strings."
59 :tag "Value modifiers and predicates"
60 :group 'eshell-module)
63 61
64 ;;; User Variables: 62 ;;; User Variables:
65 63
66 (defcustom eshell-pred-load-hook '(eshell-pred-initialize) 64 (defcustom eshell-pred-load-hook '(eshell-pred-initialize)
67 "*A list of functions to run when `eshell-pred' is loaded." 65 "*A list of functions to run when `eshell-pred' is loaded."
600 (mapcar 598 (mapcar
601 (function 599 (function
602 (lambda (str) 600 (lambda (str)
603 (split-string str ,sep))) lst)))) 601 (split-string str ,sep))) lst))))
604 602
603 (provide 'em-pred)
604
605 ;;; arch-tag: 8b5ce022-17f3-4c40-93c7-5faafaa63f31 605 ;;; arch-tag: 8b5ce022-17f3-4c40-93c7-5faafaa63f31
606 ;;; em-pred.el ends here 606 ;;; em-pred.el ends here