[Gd-chatter] r10813 - in trunk/libraries: koala/sources/koala-app registry/generic

[cgay at gwydiondylan.org]

Author: cgay
Date: Tue Jul  4 07:16:15 2006
New Revision: 10813

Added:
   trunk/libraries/registry/generic/koala-app   (contents, props changed)
Modified:
   trunk/libraries/koala/sources/koala-app/koala-app.dylan   (contents, props changed)
Log:
job: minor
* Add koala-app registry entry.
* Make koala-app accept config file name as its only argument.

Modified: trunk/libraries/koala/sources/koala-app/koala-app.dylan
==============================================================================
--- trunk/libraries/koala/sources/koala-app/koala-app.dylan	(original)
+++ trunk/libraries/koala/sources/koala-app/koala-app.dylan	Tue Jul  4 07:16:15 2006
@@ -2,8 +2,13 @@
 Synopsis: Koala HTTP Server Application
 Author:   Carl Gay
 
-define method main () => ()
-  start-server();
+define function main
+    () => ()
+  let config-file =
+    if(application-arguments().size > 0)
+      application-arguments()[0]
+    end;
+  start-server(config-file: config-file);
 end;
 
 begin

Added: trunk/libraries/registry/generic/koala-app
==============================================================================
--- (empty file)
+++ trunk/libraries/registry/generic/koala-app	Tue Jul  4 07:16:15 2006
@@ -0,0 +1 @@
+abstract://dylan/koala/sources/koala-app/koala-app.lid