In article <[EMAIL PROTECTED]>,
[EMAIL PROTECTED] (David Ackerman) wrote:
> I am trying to use FSpIterateDirectory (SPEC, MAXLEVELS,
> ITERATEFILTER, YOURDATAPTR) from Mac::MoreFiles, which only returns the
> first file without WaitNextEvent().
I don't understand what WaitNextEvent() has to do with it. But I just woke
up, so I won't spent too much brainpower on it. :-)
[EMAIL PROTECTED] MoreFiles]$ less eg/Iterate.plx
Perl -Sx "{0}" {"Parameters"}; Exit {Status}
#!perl
#
# Iterate.t - Demonstrate FSpIterateDirectory
#
use Mac::MoreFiles;
FSpIterateDirectory(":", 2, sub { print @_, "\n"; return 0; }, "");
[EMAIL PROTECTED] MoreFiles]$ perl -x eg/Iterate.plx
/usr/local/src/modules/mac-carbon/MoreFiles/.cvsignore
/usr/local/src/modules/mac-carbon/MoreFiles/CVS
/usr/local/src/modules/mac-carbon/MoreFiles/CVS/Entries
/usr/local/src/modules/mac-carbon/MoreFiles/CVS/Repository
/usr/local/src/modules/mac-carbon/MoreFiles/CVS/Root
/usr/local/src/modules/mac-carbon/MoreFiles/eg
/usr/local/src/modules/mac-carbon/MoreFiles/eg/Application.plx
/usr/local/src/modules/mac-carbon/MoreFiles/eg/CVS
/usr/local/src/modules/mac-carbon/MoreFiles/eg/Iterate.plx
/usr/local/src/modules/mac-carbon/MoreFiles/Makefile.PL
/usr/local/src/modules/mac-carbon/MoreFiles/MF.xs
/usr/local/src/modules/mac-carbon/MoreFiles/MoreFiles.pm
/usr/local/src/modules/mac-carbon/MoreFiles/MoreFilesSrc
/usr/local/src/modules/mac-carbon/MoreFiles/MoreFilesSrc/CVS
/usr/local/src/modules/mac-carbon/MoreFiles/MoreFilesSrc/DirectoryCopy.c
/usr/local/src/modules/mac-carbon/MoreFiles/MoreFilesSrc/DirectoryCopy.h
/usr/local/src/modules/mac-carbon/MoreFiles/MoreFilesSrc/FileCopy.c
/usr/local/src/modules/mac-carbon/MoreFiles/MoreFilesSrc/FileCopy.h
/usr/local/src/modules/mac-carbon/MoreFiles/MoreFilesSrc/FSpCompat.c
/usr/local/src/modules/mac-carbon/MoreFiles/MoreFilesSrc/FSpCompat.h
/usr/local/src/modules/mac-carbon/MoreFiles/MoreFilesSrc/FullPath.c
/usr/local/src/modules/mac-carbon/MoreFiles/MoreFilesSrc/FullPath.h
/usr/local/src/modules/mac-carbon/MoreFiles/MoreFilesSrc/IterateDirectory.c
/usr/local/src/modules/mac-carbon/MoreFiles/MoreFilesSrc/IterateDirectory.h
/usr/local/src/modules/mac-carbon/MoreFiles/MoreFilesSrc/MoreDesktopMgr.c
/usr/local/src/modules/mac-carbon/MoreFiles/MoreFilesSrc/MoreDesktopMgr.h
/usr/local/src/modules/mac-carbon/MoreFiles/MoreFilesSrc/MoreFiles.c
/usr/local/src/modules/mac-carbon/MoreFiles/MoreFilesSrc/MoreFiles.h
/usr/local/src/modules/mac-carbon/MoreFiles/MoreFilesSrc/MoreFilesExtras.c
/usr/local/src/modules/mac-carbon/MoreFiles/MoreFilesSrc/MoreFilesExtras.h
/usr/local/src/modules/mac-carbon/MoreFiles/MoreFilesSrc/Optimization.h
/usr/local/src/modules/mac-carbon/MoreFiles/MoreFilesSrc/OptimizationEnd.h
/usr/local/src/modules/mac-carbon/MoreFiles/MoreFilesSrc/Search.c
/usr/local/src/modules/mac-carbon/MoreFiles/MoreFilesSrc/Search.h
/usr/local/src/modules/mac-carbon/MoreFiles/t
/usr/local/src/modules/mac-carbon/MoreFiles/t/CVS
/usr/local/src/modules/mac-carbon/MoreFiles/t/MoreFiles.t
Looks like it works as expected to me, without WaitNextEvent().
--
Chris Nandor [EMAIL PROTECTED] http://pudge.net/
Open Source Development Network [EMAIL PROTECTED] http://osdn.com/
