[Checkins] SVN: Sandbox/ulif/megrok.login/src/megrok/login/component.py Add setup directive.

[Uli Fouquet]

Log message for revision 93803:
  Add setup directive.

Changed:
  U   Sandbox/ulif/megrok.login/src/megrok/login/component.py

-=-
Modified: Sandbox/ulif/megrok.login/src/megrok/login/component.py
===================================================================
--- Sandbox/ulif/megrok.login/src/megrok/login/component.py	2008-12-09 10:12:28 UTC (rev 93802)
+++ Sandbox/ulif/megrok.login/src/megrok/login/component.py	2008-12-09 10:49:51 UTC (rev 93803)
@@ -26,3 +26,9 @@
 class autoregister(martian.MultipleTimesDirective):
     scope = martian.CLASS
 
+class setup(martian.Directive):
+    scope = martian.CLASS
+    store = martian.ONCE
+    default = None
+
+    # XXX: Check, that the given callable exists