Monday, November 08, 2010 at 12:04 AM.
system.verbs.builtins.mainResponder.data.partsPacker
<<10/22/98; 8:23:16 AM by DW
<<copies all the needed parts that live in Frontier.root
window.about ();
local (adrpartslist = @mainresponder.data.partslist);
local (adrparts = @mainresponder.data.parts);
new (tabletype, adrparts);
target.set (adrpartslist);
op.firstsummit ();
local (ct = 1, adr, adrsubtable);
loop {
adr = address (op.getlinetext ());
msg (adr);
adrsubtable = @adrparts^.["Part" + string.padwithzeros (ct++, 4)];
new (tabletype, adrsubtable);
adrsubtable^.adr = adr;
adrsubtable^.data = adr^;
if not op.go (down, 1) {
break}};
filemenu.savemyroot (this)
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.