# HG changeset patch
# User John Wiegley <johnw@newartisans.com>
# Date 1155223856 0
# Node ID adbd3421e276da1cd2726ae8f7dc9edcd0172ed8
# Parent  1249c0899103f3cc2d86ab6295400ec72bc4b88e
(eshell-glob-chars-list) (eshell-glob-translate-alist): Add support
for [^g] in character globs.

diff -r 1249c0899103 -r adbd3421e276 lisp/eshell/em-glob.el
--- a/lisp/eshell/em-glob.el	Thu Aug 10 15:30:17 2006 +0000
+++ b/lisp/eshell/em-glob.el	Thu Aug 10 15:30:56 2006 +0000
@@ -97,7 +97,7 @@
   :type 'boolean
   :group 'eshell-glob)
 
-(defcustom eshell-glob-chars-list '(?\] ?\[ ?* ?? ?~ ?\( ?\) ?| ?#)
+(defcustom eshell-glob-chars-list '(?\] ?\[ ?* ?? ?~ ?\( ?\) ?| ?# ?^)
   "*List of additional characters used in extended globbing."
   :type '(repeat character)
   :group 'eshell-glob)
@@ -105,6 +105,7 @@
 (defcustom eshell-glob-translate-alist
   '((?\] . "]")
     (?\[ . "[")
+    (?^  . "^")
     (??  . ".")
     (?*  . ".*")
     (?~  . "~")