Re: Bearer of good news [NOT]
Re: Bearer of good news [NOT]
- Subject: Re: Bearer of good news [NOT]
- From: Deivy Petrescu <email@hidden>
- Date: Sun, 7 Apr 2002 17:09:26 -0400
On 4/7/02 12:58 PM, "Deivy Petrescu" <email@hidden> wrote:
This is to let everybody know that "entire contents" is fixed in OS X.
Just checked it and it works!
Regards
Ummm, no it isn't. Try it on a folder with several hundred items and levels
of complexity. Better yet, try it on your hard disk. Possibly it's improved,
but i don't think it's fixed. However, I think it just poops out rather than
gives a false answer, which would be most definitely a huge improvement. I
haven't tested it exhaustively - I'm going more by previous reports here. So
more testing may be needed.
Speaking of which, you reported not a single detail to say why you think it
works: how large a folder, number of items, levels deep, etc.
--
Paul Berkowitz
You are right about reporting, I forgot it.
Actually, there was a script the Daniel Rodrigue developed to show
(at least to me) that entire contents was broken.
It was enough to put eight items in a folder move one inside the
other and the script would spit out wrong numbers,
I tried with 12, it worked, then 20, 50 and 120. The last two broke,
but i believe it did because the path to the inner folder started to
get too big. But the count was right. The count was not right on
classic using just 8 items.
i used the following script, which is a tweak of a tweak. Ther terms
are in French because they were originally so, and I kept the "feel"
8).
This is the script I used for X: ( change 15 by whatever number you want)
tell application "Finder"
set LesNo to 15
set LeFolderPrincipal to "How many folders?"
try
set LeFolder to make new folder with properties
{name:LeFolderPrincipal}
set current view of container window of LeFolder to column view
open LeFolder
repeat with x from 1 to LesNo
make new folder at LeFolder ,
with properties {name:(x as text),
current view:column view, expanded:true}
end repeat
set LaListe to (entire contents of LeFolder)
copy (count items of LaListe) as text to numlist
say "In the begining there were " & numlist & " items
in this folder"
copy 1 to LeLoop
repeat
if LesNo = 1 then exit repeat
set LeNom to (LesNo as string)
set LeNom1 to ((LesNo - 1) as string)
move folder LeNom of LeFolder to folder
(LeNom1) of LeFolder
set LaListe to (entire contents of LeFolder)
copy (count items of LaListe) as text to numlist
say "loop " & LeLoop & " " & numlist & " items"
set LeLoop to LeLoop + 1
set LesNo to LesNo - 1
end repeat
set LeRetour to {}
set LaListe to (entire contents of LeFolder)
copy (count items of LaListe) as text to numlist
say "The end " & numlist & " items "
repeat with x in LaListe
set end of LeRetour to (x as text)
--say last word of (x as text)
end repeat
on error errmsg
activate
display dialog errmsg as text
move LeFolder to the trash
end try
{LeRetour, LaListe}
end tell
--
Deivy Petrescu
http://www.dicas.com
_______________________________________________
applescript-users mailing list | email@hidden
Help/Unsubscribe/Archives:
http://www.lists.apple.com/mailman/listinfo/applescript-users
Do not post admin requests to the list. They will be ignored.