From 43156fe52802a6d1a40a105d78516f6f2936bec7 Mon Sep 17 00:00:00 2001
From: Wayne Davison <wayned@users.sourceforge.net>
Date: Tue, 6 Apr 2004 17:48:16 +0000
Subject: Test the new F glob qualifier.

---
 Test/D02glob.ztst | 23 +++++++++++++++++------
 1 file changed, 17 insertions(+), 6 deletions(-)

(limited to 'Test/D02glob.ztst')

diff --git a/Test/D02glob.ztst b/Test/D02glob.ztst
index 7f4b9c9ed..6761b3753 100644
--- a/Test/D02glob.ztst
+++ b/Test/D02glob.ztst
@@ -2,8 +2,8 @@
 
 %prep
   mkdir glob.tmp
-  mkdir glob.tmp/dir1
-  mkdir glob.tmp/dir2
+  mkdir glob.tmp/dir{1,2,3,4}
+  mkdir glob.tmp/dir3/subdir
   : >glob.tmp/{,{dir1,dir2}/}{a,b,c}
 
   globtest () { $ZTST_testdir/../Src/zsh -f $ZTST_srcdir/../Misc/$1 }
@@ -265,11 +265,11 @@
   ( regress_absolute_path_and_core_dump )
 0:exclusions regression test
 >
->glob.tmp/a glob.tmp/b glob.tmp/c glob.tmp/dir1 glob.tmp/dir1/a glob.tmp/dir1/b glob.tmp/dir1/c glob.tmp/dir2 glob.tmp/dir2/a glob.tmp/dir2/b glob.tmp/dir2/c
+>glob.tmp/a glob.tmp/b glob.tmp/c glob.tmp/dir1 glob.tmp/dir1/a glob.tmp/dir1/b glob.tmp/dir1/c glob.tmp/dir2 glob.tmp/dir2/a glob.tmp/dir2/b glob.tmp/dir2/c glob.tmp/dir3 glob.tmp/dir3/subdir glob.tmp/dir4
 
  print glob.tmp/*(/)
 0:Just directories
->glob.tmp/dir1 glob.tmp/dir2
+>glob.tmp/dir1 glob.tmp/dir2 glob.tmp/dir3 glob.tmp/dir4
 
  print glob.tmp/*(.)
 0:Just files
@@ -281,7 +281,7 @@
 
  print glob.tmp/**/(:h) 
 0:Head modifier
->. glob.tmp glob.tmp
+>. glob.tmp glob.tmp glob.tmp glob.tmp glob.tmp/dir3
 
  print glob.tmp(:r)
 0:Remove extension modifier
@@ -289,5 +289,16 @@
 
  print glob.tmp/*(:s/./_/)
 0:Substitute modifier
->glob_tmp/a glob_tmp/b glob_tmp/c glob_tmp/dir1 glob_tmp/dir2
+>glob_tmp/a glob_tmp/b glob_tmp/c glob_tmp/dir1 glob_tmp/dir2 glob_tmp/dir3 glob_tmp/dir4
 
+ print glob.tmp/*(F)
+0:Just full dirs
+>glob.tmp/dir1 glob.tmp/dir2 glob.tmp/dir3
+
+ print glob.tmp/*(^F)
+0:Omit full dirs
+>glob.tmp/a glob.tmp/b glob.tmp/c glob.tmp/dir4
+
+ print glob.tmp/*(/^F)
+0:Just empty dirs
+>glob.tmp/dir4
-- 
cgit 1.4.1