Monday, November 08, 2010 at 12:05 AM.
system.verbs.builtins.radio.menuCommands.editHomePage
<<Changes <<10/7/01; 5:42:07 PM by JES <<Edit index.*, instead of always editing index.opml. This fixes a bug where the home page would appear to be empty, when both index.opml and index.txt are at the top-level of the www folder. <<bundle //older code <<local (adr = @system.temp.playlist.serverHomePage) << <<if defined (adr^) //it may already be open -- bring the window to front, if so <<if window.isOpen (adr) <<window.bringToFront (adr) <<return (true) << <<local (s = "") <<local (wwwFolder = user.radio.prefs.wwwfolder) <<local (f = wwwFolder + "index.html") <<if file.exists (f) //read the current text <<s = string (file.readWholeFile (f)) << <<wp.newTextObject (s, adr) <<edit (adr, "Home Page") <<bundle //old code <<playlist.openSpecialWwwFile ("index.opml") local (f = user.radio.prefs.wwwFolder + "index.opml"); local (fileToEdit); if radio.file.locateFileIgnoringExtension (f, @fileToEdit) { if defined (user.radio.prefs.editors.[radio.webserver.getfilemimetype (filetoedit)]) { local (editor = user.radio.prefs.editors.[radio.webserver.getfilemimetype (filetoedit)]); launch.appWithDocument (editor, filetoedit)} else { if string.lower (filetoedit) endsWith (".opml") { Frontier.clickers.typeOPML (filetoedit)} //make sure we open in this instance of Radio (MacOS) else { launch.anything (filetoedit)}}}
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.