Note: This is a work in progress and will be formatting errors. Read more about the project on the home page.

stacks

the stacks

Value returned: a return-separated list of the full path names for all the open stacks, in front-to-back order

Demo Script

on whatStacks
   put longNamesToShort(the stacks) into theStacks
   answer "The stacks currently open are:" & return & return & theStacks
 end whatStacks
 

 function longNamesToShort longStackList
   put empty into shortStackList
   set the itemDelimiter to ":"
   repeat with lineNum = 1 to the number of lines in longStackList
     put last item of line lineNum of longStackList into ¬
     line lineNum of shortStackList
   end repeat
   set itemDelimiter to comma
   return shortStackList
 end longNamesToShort

stacks

Demo Script

Related Topics