From 9da632147e14bb9b24a52db5a2d9345695437b21 Mon Sep 17 00:00:00 2001 From: JT Smith Date: Mon, 12 May 2003 02:57:18 +0000 Subject: [PATCH] genesis --- lib/WebGUI/Operation/WebGUI.pm | 39 ++++++++++++++++++++++++++++++++++ 1 file changed, 39 insertions(+) create mode 100644 lib/WebGUI/Operation/WebGUI.pm diff --git a/lib/WebGUI/Operation/WebGUI.pm b/lib/WebGUI/Operation/WebGUI.pm new file mode 100644 index 000000000..3e3bce848 --- /dev/null +++ b/lib/WebGUI/Operation/WebGUI.pm @@ -0,0 +1,39 @@ +package WebGUI::Operation::WebGUI; + +#------------------------------------------------------------------- +# WebGUI is Copyright 2001-2003 Plain Black LLC. +#------------------------------------------------------------------- +# Please read the legal notices (docs/legal.txt) and the license +# (docs/license.txt) that came with this distribution before using +# this software. +#------------------------------------------------------------------- +# http://www.plainblack.com info@plainblack.com +#------------------------------------------------------------------- + +use Exporter; +use strict; +use WebGUI::Session; + +our @ISA = qw(Exporter); +our @EXPORT = qw(&www_genesis); + +#------------------------------------------------------------------- +sub www_genesis { + $session{page}{styleId} = -100000; + my $output = 'About WebGUI + + +



+
+
+ And the Internet was without form, and void; and darkness was upon the face of the web. And Plain Black formed WebGUI of the dust of tags and script, and breathed into the web the breath of life; and content became a living soul. +



+
Ruling WebGUI, 2:7
+
+



+ '; + return $output; +} + + +1;