Rev Image libraries

[David Bovill]

Not quite sure this gets them all - seem to be some things missing  
here compared to the rev image library drop down?

On 10 Nov 2005, at 22:03, David Bovill wrote:

> Anyone got a handy little function for getting the file or stack  
> names of all the rev image libraries: grocking this now - if that's  
> the right terminology?

function rev_MyImageLibraries
     put the mainstacks into allLoaded
     filter allLoaded with "revLib*"
     line_Delete "revLibrary", allLoaded
     line_Delete "revLibStandardButtons", allLoaded
     return allLoaded
end rev_MyImageLibraries

on line_Delete someLines, @fromContainer, partLine, skipLines
   set the wholeMatches to (partLine is empty)
   repeat with ii = 1 to the number of lines of someLines
     put line ii of someLines into someLine
     get lineOffset(someLine, fromContainer, skipLines)
     if it is not 0 then
       put it + skipLines into lineNum
       delete line lineNum of fromContainer
     end if
   end repeat
end line_Delete