projects
/
clearscm.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Merge branch 'master' of https://github.com/adefaria/clearscm
[clearscm.git]
/
maps
/
bin
/
registerform.cgi
diff --git
a/maps/bin/registerform.cgi
b/maps/bin/registerform.cgi
index
03f2c5a
..
48abe04
100755
(executable)
--- a/
maps/bin/registerform.cgi
+++ b/
maps/bin/registerform.cgi
@@
-16,11
+16,12
@@
use strict;
use warnings;
use FindBin;
use warnings;
use FindBin;
-$0 = $FindBin::Script;
+
local
$0 = $FindBin::Script;
use CGI qw/:standard *table start_div end_div/;
use lib "$FindBin::Bin/../lib";
use CGI qw/:standard *table start_div end_div/;
use lib "$FindBin::Bin/../lib";
+use lib "$FindBin::Bin/../../lib";
use MAPS;
use MAPSWeb;
use MAPS;
use MAPSWeb;
@@
-43,8
+44,7
@@
sub MyHeading {
]);
print
h2 ({-class => "header", -align => "center"},
]);
print
h2 ({-class => "header", -align => "center"},
- font ({-class => "standout"}, "MAPS"),
- "Mail Authorization and Permission System");
+ "Mail Authorization and Permission System");
if ($errormsg) {
DisplayError $errormsg;
if ($errormsg) {
DisplayError $errormsg;
@@
-114,6
+114,8
@@
sub Body {
];
print end_table;
print end_div;
];
print end_table;
print end_div;
+
+ return;
} # Body
if (!$userid) {
} # Body
if (!$userid) {