some bugs fixed, lockfiles (fo_admin_default.xml.*) removed from repository

diff --git a/selfforum-cgi/user/config/fo_admin_default.xml.lock b/selfforum-cgi/user/config/fo_admin_default.xml.lock
deleted file mode 100644 (file)
index e69de29..0000000

diff --git a/selfforum-cgi/user/config/fo_admin_default.xml.lock.ref b/selfforum-cgi/user/config/fo_admin_default.xml.lock.ref
deleted file mode 100644 (file)
index c227083..0000000
--- a/selfforum-cgi/user/config/fo_admin_default.xml.lock.ref
+++ /dev/null
@@ -1 +0,0 @@
-0
\ No newline at end of file

diff --git a/selfforum-cgi/user/config/fo_admin_default.xml.lock.ref.lock b/selfforum-cgi/user/config/fo_admin_default.xml.lock.ref.lock
deleted file mode 100644 (file)
index e69de29..0000000

diff --git a/selfforum-cgi/user/config/fo_admin_default.xml.master.lock b/selfforum-cgi/user/config/fo_admin_default.xml.master.lock
deleted file mode 100644 (file)
index e69de29..0000000

diff --git a/selfforum-cgi/user/fo_posting.pl b/selfforum-cgi/user/fo_posting.pl
index 86a24fa7235a3613f9c5fb25c3968a6caa2a140b..388963217963f6e1166f8579d4a5e2fd81bcddfc 100644 (file)
--- a/selfforum-cgi/user/fo_posting.pl
+++ b/selfforum-cgi/user/fo_posting.pl
@@ -114,7 +114,7 @@ sub check_reply_dupe () {
       # nur nicht geloeschte Messages beachten
       for ($i=0; $i < @{$threads -> {$ftid}}; $i++) {
         if ($threads -> {$ftid} -> [$i] -> {deleted}) {
-          $+=$threads -> {$ftid} -> [$i] -> {answers};}
+          $i+=$threads -> {$ftid} -> [$i] -> {answers};}
 
         else {
           $msg{$threads -> {$ftid} -> [$i] -> {mid}}=$i;}}
@@ -526,4 +526,4 @@ BEGIN {
 
 # ====================================================
 # end of fo_posting.pl
-# ====================================================
+# ====================================================
\ No newline at end of file

diff --git a/selfforum-cgi/user/fo_view.pl b/selfforum-cgi/user/fo_view.pl
index ad74b50afa9e64f3daf84ef496d3512075ec4ec8..f92d376de8a72653d9379bdedcfedde40210b2f9 100644 (file)
--- a/selfforum-cgi/user/fo_view.pl
+++ b/selfforum-cgi/user/fo_view.pl
@@ -10,7 +10,7 @@ BEGIN {
   ($Script) = ($0 =~ /^.*\/(.*)$/)? $1 : $0;}
 
 use lib "$Shared";
-#use CGI::Carp qw(fatalsToBrowser);
+use CGI::Carp qw(fatalsToBrowser);
 
 use Conf;
 use Conf::Admin;
@@ -61,4 +61,5 @@ else {
                        tree         => $tree
                       });}
 
+print "t1 ";
 # eos
\ No newline at end of file