[Koha-patches] [PATCH] Bug 2400 [18/18]: fixing pod syntax in C4/SIP/Sip/MsgType.pm

[Andrew Moore]

---
 C4/SIP/Sip/MsgType.pm |   12 +++++++++++-
 1 files changed, 11 insertions(+), 1 deletions(-)

diff --git a/C4/SIP/Sip/MsgType.pm b/C4/SIP/Sip/MsgType.pm
index 6ff6b7b..bf390c7 100644
--- a/C4/SIP/Sip/MsgType.pm
+++ b/C4/SIP/Sip/MsgType.pm
@@ -839,7 +839,15 @@ sub handle_login {
 		$status = 0;
     }
 	else { $status = login_core($server,$uid,$pwd); }
-=doc 
+
+=pod
+
+Note: This block was commented out with improperly formatted POD. It
+was not interpreted by perl, but not properly handled by POD
+formatters. I fixed the POD syntax error so this code is now obviously
+a comment and not code. The code has been extracted to the login_core
+sub and is called above. -- amoore Aug 12, 2008
+
     if (!exists($server->{config}->{accounts}->{$uid})) {
 		syslog("LOG_WARNING", "MsgType::handle_login: Unknown login '$uid'");
 		$status = 0;
@@ -882,7 +890,9 @@ sub handle_login {
 			}
 		}
 	}
+
 =cut	
+
 	$self->write_msg(LOGIN_RESP . $status);
     return $status ? LOGIN : '';
 }
-- 
1.5.6