Monday, November 08, 2010 at 12:07 AM.
system.verbs.builtins.window.attributes.getAll
on getAll (adrtable, adrwindow=nil) { if adrwindow == nil { adrwindow = window.frontMost ()}; local (adrparent = parentOf (adrwindow^)); if defined (adrparent^) { local (adratts = @adrparent^.["/atts"]); if defined (adratts^) { adrtable^ = adratts^; return (true)}}; return (false)} <<bundle //test code <<getAll (@scratchpad.atts)
This listing is for code that runs in the OPML Editor environment. I created these listings because I wanted the search engines to index it, so that when I want to look up something in my codebase I don't have to use the much slower search functionality in my object database. Dave Winer.