Monday, November 08, 2010 at 12:01 AM.
system.verbs.apps.cardEditor.utilities.loadFolder
local (folder = "Macintosh HD:New Releases:MacBird 1.0:system.misc.cards:", f);
local (adrtable = @system.misc.cards);
new (tabletype, adrtable);
fileloop (f in folder) {
adrtable^.[file.filefrompath (f)] = cardEditor.readPackedCard (f)};
bundle { <<init window, make it look nice, open it
target.set (adrtable);
editmenu.setfont ("geneva");
editmenu.setfontsize (9);
target.clear ();
edit (adrtable);
window.zoom (adrtable)}
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.