X-Git-Url: http://koha-dev.rot13.org:8081/gitweb/?a=blobdiff_plain;f=installer%2FInstallAuth.pm;h=5b99c1f13bc3f8c743224b6cdf035f38e7587ad5;hb=dc1e0783f53577e882f828929e7751d6ad5022af;hp=10cbea3f3cbaa058381f629d6129f52f17d98241;hpb=f029e9aba7d6c03b3c8e19697af31071b595dcc9;p=koha_fer

diff --git a/installer/InstallAuth.pm b/installer/InstallAuth.pm
index 10cbea3f3c..5b99c1f13b 100644
--- a/installer/InstallAuth.pm
+++ b/installer/InstallAuth.pm
@@ -274,11 +274,12 @@ sub checkauth {
             C4::Context->_unset_userenv($sessionID);
             $sessionID = undef;
             $userid    = undef;
-            open L, ">>/tmp/sessionlog";
-            my $time = localtime( time() );
-            printf L "%20s from %16s logged out at %30s (manually).\n", $userid,
-              $ip, $time;
-            close L;
+	   # Commented out due to its lack of usefulness
+           # open L, ">>/tmp/sessionlog";
+           # my $time = localtime( time() );
+           # printf L "%20s from %16s logged out at %30s (manually).\n", $userid,
+           #   $ip, $time;
+           # close L;
         }
     }
     unless ($userid) {
@@ -292,11 +293,11 @@ sub checkauth {
         my ( $return, $cardnumber ) = checkpw( $userid, $password );
         if ($return) {
             $loggedin = 1;
-            open L, ">>/tmp/sessionlog";
-            my $time = localtime( time() );
-            printf L "%20s from %16s logged in  at %30s.\n", $userid,
-              $ENV{'REMOTE_ADDR'}, $time;
-            close L;
+            # open L, ">>/tmp/sessionlog";
+            # my $time = localtime( time() );
+            # printf L "%20s from %16s logged in  at %30s.\n", $userid,
+            #  $ENV{'REMOTE_ADDR'}, $time;
+            # close L;
             $cookie = $query->cookie( CGISESSID => $sessionID );
             if ( $return == 2 ) {