removing unnecessary eval in [a-z][a-z].pl scripts

git-svn-id: https://ledger-smb.svn.sourceforge.net/svnroot/ledger-smb/trunk@3 4979c152-3d1c-0410-bac9-87ea11338e46

19 files changed, 19 insertions, 19 deletions

diff --git a/am.pl b/am.pl
index 742968ca..7319efed 100755
--- a/am.pl
+++ b/am.pl
@@ -1,2 +1,2 @@
 #!/usr/bin/perl
-eval { require "menu.pl"; };
+require "menu.pl";
diff --git a/ap.pl b/ap.pl
index 742968ca..7319efed 100755
--- a/ap.pl
+++ b/ap.pl
@@ -1,2 +1,2 @@
 #!/usr/bin/perl
-eval { require "menu.pl"; };
+require "menu.pl";
diff --git a/ar.pl b/ar.pl
index 742968ca..7319efed 100755
--- a/ar.pl
+++ b/ar.pl
@@ -1,2 +1,2 @@
 #!/usr/bin/perl
-eval { require "menu.pl"; };
+require "menu.pl";
diff --git a/bp.pl b/bp.pl
index 742968ca..7319efed 100755
--- a/bp.pl
+++ b/bp.pl
@@ -1,2 +1,2 @@
 #!/usr/bin/perl
-eval { require "menu.pl"; };
+require "menu.pl";
diff --git a/ca.pl b/ca.pl
index 742968ca..7319efed 100755
--- a/ca.pl
+++ b/ca.pl
@@ -1,2 +1,2 @@
 #!/usr/bin/perl
-eval { require "menu.pl"; };
+require "menu.pl";
diff --git a/cp.pl b/cp.pl
index 742968ca..7319efed 100755
--- a/cp.pl
+++ b/cp.pl
@@ -1,2 +1,2 @@
 #!/usr/bin/perl
-eval { require "menu.pl"; };
+require "menu.pl";
diff --git a/ct.pl b/ct.pl
index 742968ca..7319efed 100755
--- a/ct.pl
+++ b/ct.pl
@@ -1,2 +1,2 @@
 #!/usr/bin/perl
-eval { require "menu.pl"; };
+require "menu.pl";
diff --git a/gl.pl b/gl.pl
index 742968ca..7319efed 100755
--- a/gl.pl
+++ b/gl.pl
@@ -1,2 +1,2 @@
 #!/usr/bin/perl
-eval { require "menu.pl"; };
+require "menu.pl";
diff --git a/hr.pl b/hr.pl
index 742968ca..7319efed 100755
--- a/hr.pl
+++ b/hr.pl
@@ -1,2 +1,2 @@
 #!/usr/bin/perl
-eval { require "menu.pl"; };
+require "menu.pl";
diff --git a/ic.pl b/ic.pl
index 742968ca..7319efed 100755
--- a/ic.pl
+++ b/ic.pl
@@ -1,2 +1,2 @@
 #!/usr/bin/perl
-eval { require "menu.pl"; };
+require "menu.pl";
diff --git a/ir.pl b/ir.pl
index 742968ca..7319efed 100755
--- a/ir.pl
+++ b/ir.pl
@@ -1,2 +1,2 @@
 #!/usr/bin/perl
-eval { require "menu.pl"; };
+require "menu.pl";
diff --git a/is.pl b/is.pl
index 742968ca..7319efed 100755
--- a/is.pl
+++ b/is.pl
@@ -1,2 +1,2 @@
 #!/usr/bin/perl
-eval { require "menu.pl"; };
+require "menu.pl";
diff --git a/jc.pl b/jc.pl
index 742968ca..7319efed 100755
--- a/jc.pl
+++ b/jc.pl
@@ -1,2 +1,2 @@
 #!/usr/bin/perl
-eval { require "menu.pl"; };
+require "menu.pl";
diff --git a/menu.pl b/menu.pl
index 7561741a..4469138f 100755
--- a/menu.pl
+++ b/menu.pl
@@ -72,7 +72,7 @@ if ($@) {
 	$form->{callback} = "";
 	$msg1 = $locale->text('You are logged out!');
 	$msg2 = $locale->text('Login');
-	$form->redirect("$msg1 <p><a href=login.pl target=_top>$msg2</a>");
+	$form->redirect("$msg1 <p><a href=\"login.pl\" target=\"_top\">$msg2</a></p>");
 }
 
 # locale messages
diff --git a/oe.pl b/oe.pl
index 742968ca..7319efed 100755
--- a/oe.pl
+++ b/oe.pl
@@ -1,2 +1,2 @@
 #!/usr/bin/perl
-eval { require "menu.pl"; };
+require "menu.pl";
diff --git a/pe.pl b/pe.pl
index 742968ca..7319efed 100755
--- a/pe.pl
+++ b/pe.pl
@@ -1,2 +1,2 @@
 #!/usr/bin/perl
-eval { require "menu.pl"; };
+require "menu.pl";
diff --git a/ps.pl b/ps.pl
index 742968ca..7319efed 100755
--- a/ps.pl
+++ b/ps.pl
@@ -1,2 +1,2 @@
 #!/usr/bin/perl
-eval { require "menu.pl"; };
+require "menu.pl";
diff --git a/rc.pl b/rc.pl
index 742968ca..7319efed 100755
--- a/rc.pl
+++ b/rc.pl
@@ -1,2 +1,2 @@
 #!/usr/bin/perl
-eval { require "menu.pl"; };
+require "menu.pl";
diff --git a/rp.pl b/rp.pl
index 742968ca..7319efed 100755
--- a/rp.pl
+++ b/rp.pl
@@ -1,2 +1,2 @@
 #!/usr/bin/perl
-eval { require "menu.pl"; };
+require "menu.pl";