X-Git-Url: https://defaria.com/gitweb/?a=blobdiff_plain;f=maps%2Fbin%2Fregister.cgi;h=8dae177247a1671a5bed191fcdfcf0728102aa51;hb=d3c598399f93a1ca4ffc9f4aedd7907f4157ca43;hp=b97efae0d28d44ae41f66ddf935c022b2e61144a;hpb=16babf81ce331af378de565ba73e927ff5491f65;p=clearscm.git diff --git a/maps/bin/register.cgi b/maps/bin/register.cgi index b97efae..8dae177 100755 --- a/maps/bin/register.cgi +++ b/maps/bin/register.cgi @@ -16,9 +16,10 @@ use strict; use warnings; use FindBin; -$0 = $FindBin::Script; +local $0 = $FindBin::Script; use lib "$FindBin::Bin/../lib"; +use lib "$FindBin::Bin/../../lib"; use MAPS; use MAPSLog; @@ -36,7 +37,10 @@ sub MyFooting() { -value => "Close Window", -onClick => "window.close ()") ); + print end_html; + + return; } # MyFooting sub MyError($) { @@ -60,9 +64,10 @@ sub MyHeading() { print h2 ({-class => "header", -align => "center"}, - font ({-class => "standout"}, - "MAPS"), "Registration Results" - ); + 'Registration Results' + ); + + return; } # MyHeading # Main