[Slashdotjp-dev 709] [216] Typo fix

Back to archive index

svnno****@sourc***** svnno****@sourc*****
2007年 10月 24日 (水) 18:25:55 JST


Revision: 216
          http://svn.sourceforge.jp/cgi-bin/viewcvs.cgi?root=slashdotjp&view=rev&rev=216
Author:   tach
Date:     2007-10-24 18:25:55 +0900 (Wed, 24 Oct 2007)

Log Message:
-----------
Typo fix

Modified Paths:
--------------
    slashjp/trunk/Slash/LDAPDB/lib/Slash/LDAPDB.pm
    slashjp/trunk/debian/changelog


-------------- next part --------------
Modified: slashjp/trunk/Slash/LDAPDB/lib/Slash/LDAPDB.pm
===================================================================
--- slashjp/trunk/Slash/LDAPDB/lib/Slash/LDAPDB.pm	2007-10-24 08:27:43 UTC (rev 215)
+++ slashjp/trunk/Slash/LDAPDB/lib/Slash/LDAPDB.pm	2007-10-24 09:25:55 UTC (rev 216)
@@ -65,7 +65,7 @@
 
 sub bind {
     my $self = shift;
-    $self->_check_diabled and return undef;
+    $self->_check_disabled and return undef;
     return 1 if defined $self->{_bind_p};
     $self->{_bind_p} = 1;
     my @args = ();
@@ -86,7 +86,7 @@
     my $matchname = shift;
     my $pass = shift;
     __debug(8, "LDAP::authUser: start auth for $matchname");
-    $self->_check_diabled and return undef;
+    $self->_check_disabled and return undef;
     my $userinfo = $self->getUser($matchname);
 
     if ($userinfo->{passwd} eq md5_hex($pass)) {
@@ -103,7 +103,7 @@
     my $val  = shift;
     __debug(8, "LDAP::createUser called for user '$user'");
     __debug(9, "LDAP::createUser called with ". Data::Dumper->Dump([$val], [qw($val)]));
-    $self->_check_diabled and return undef;
+    $self->_check_disabled and return undef;
     $val->{matchname} = $user;
 
     unless ($self->getUser($val->{matchname})) {
@@ -141,7 +141,7 @@
     my $self = shift;
     my $uid  = shift;
     __debug(8, "LDAP::deleteUser called for uid '$uid'");
-    $self->_check_diabled and return undef;
+    $self->_check_disabled and return undef;
     my $userent = $self->getUserByUid($uid);
     $userent && $self->deleteUser($userent->{matchname});
 }
@@ -150,7 +150,7 @@
     my $self = shift;
     my $user = shift;
     __debug(8, "LDAP::deleteUser called for user '$user'");
-    $self->_check_diabled and return undef;
+    $self->_check_disabled and return undef;
     my $mesg = $self->_timeout(sub { $self->{_ldap}->delete("cn=${user},".$self->{base_dn}) });
     $mesg->code && __debug(3, "LDAP Error when deleteUser: ". $mesg->error);
     !$mesg->code;
@@ -162,7 +162,7 @@
     my $val  = shift;
     __debug(8, "LDAP::setUser called for user '$user'");
     __debug(9, "LDAP::setUser called with ". Data::Dumper->Dump([$val], [qw($val)]));
-    $self->_check_diabled and return undef;
+    $self->_check_disabled and return undef;
     my $changes = $self->_s2lop($val);
     return -1 unless @$changes;
 
@@ -181,7 +181,7 @@
     my $val  = shift;
     __debug(8, "LDAP::setUserByUid called for uid '$uid'");
     __debug(9, "LDAP::setUserByUid called with ". Data::Dumper->Dump([$val], [qw($val)]));
-    $self->_check_diabled and return undef;
+    $self->_check_disabled and return undef;
     my $changes = $self->_s2lop($val);
     return -1 unless @$changes;
 
@@ -193,7 +193,7 @@
 sub getUser() {
     my $self = shift;
     my $user = shift;
-    $self->_check_diabled and return undef;
+    $self->_check_disabled and return undef;
     my $entry = $self->_get_userent("(cn=$user)");
     unless ($entry) {
 	__debug(5, "LDAP::getUser: Can't find user cn=$user");
@@ -205,7 +205,7 @@
 sub getUserByUid() {
     my $self = shift;
     my $uid  = shift;
-    $self->_check_diabled and return undef;
+    $self->_check_disabled and return undef;
     my $entry = $self->_get_userent("($self->{attrib_prefix}UidNumber=$uid)");
     unless ($entry) {
 	__debug(5, "LDAP::getUser: Can't find user uid=$uid");
@@ -311,7 +311,7 @@
     Slash::Utility::Environment::getCurrentStatic();
 }
 
-sub _check_diabled {
+sub _check_disabled {
     my $self = shift;
     $self->{_disabled} and
 	__debug(1, "Slash::LDAP has been disabled: ($self->{_disabled})");

Modified: slashjp/trunk/debian/changelog
===================================================================
--- slashjp/trunk/debian/changelog	2007-10-24 08:27:43 UTC (rev 215)
+++ slashjp/trunk/debian/changelog	2007-10-24 09:25:55 UTC (rev 216)
@@ -8,8 +8,9 @@
     - for Ajax plugin
   * Fix: password notification email send fail: plugins/Messages/Messages.pm
   * Fix: remove filter failed: plugins/Admin/admin.pl
+  * Typo fix at Slash/LDAPDB/lib/Slash/LDAPDB.pm
 
- -- Taku YASUI <tach****@osdn*****>  Wed, 24 Oct 2007 17:23:13 +0900
+ -- Taku YASUI <tach****@osdn*****>  Wed, 24 Oct 2007 18:25:21 +0900
 
 slash (2.5.0.119-17) unstable; urgency=low
 


Slashdotjp-dev メーリングリストの案内
Back to archive index