Conflicts:

[kenranchat/yadchat.git] / kenranlib.pl

diff --git a/kenranlib.pl b/kenranlib.pl
index 85dce50..be88352 100644 (file)
--- a/kenranlib.pl
+++ b/kenranlib.pl
@@ -26,7 +26,7 @@ sub dice {
     local($num, $type) = @_;
     srand;
     #"$num\8cÂ\82Ì$type\96Ê\91Ì";
-    local($ret) = $num."d".$type.": "; 
+    local($ret) = $num."d".$type.": ";
     for ($i=0; $i<$num; $i++) {
         $d = int(rand($type)) + 1;
         $sum += $d;
@@ -202,7 +202,7 @@ sub writeDat {
     if ($CONF{'clearlog'} && $IN{'comment'} eq $CONF{'clearcom'}) {
         @lines = &clear($client, @lines);
     }
-    
+
     # \8dÅ\91å\8bL\8e\96\90\94\82Ü\82Å\8dí\82é
     while ($CONF{'max'} <= @lines) {
         pop(@lines);
@@ -328,7 +328,7 @@ sub printFrame {
     # \83N\83b\83L\81[\82É\83\8a\83\8d\81[\83h\8e\9e\8aÔ\81^\8ds\90\94\8ew\92è\82ª\82È\82¢\8fê\8d\87\82Í\8f\89\8aú\92l\82ð\91ã\93ü
     if ($CK{'retime'} eq "") { $CK{'retime'} = $CONF{'retime'}; }
     if ($CK{'line'} eq "") { $CK{'line'} = $CONF{'line'}; }
-    
+
     $formsrc = "$CONF{'chatcgi'}?room=$IN{'room'}&mode=form&retime=$CK{'retime'}&line=$CK{'line'}";
     $logsrc = "$CONF{'chatcgi'}?room=$IN{'room'}&mode=view&retime=$CK{'retime'}&line=$CK{'line'}";
 
@@ -746,7 +746,7 @@ sub genMember {
         }
         # \82»\82ê\88È\8aO\82Í\96â\93\9a\96³\97p\82Å\8dX\90V\97p\94z\97ñ @new \82É\92Ç\89Á
         else { push(@new, $_); }
-        
+
         # \8eQ\89Á\8eÒ\95\\8e¦\97p\95¶\8e\9a\97ñ\82ð\8dì\90¬ (\8bô\90\94\8aï\90\94\82Å\83}\81[\83N\95Ï\8dX)
         if (!$even) {
             $member .= "$name0\81\9a"; $even=1;
@@ -755,7 +755,7 @@ sub genMember {
             $member .= "$name0\81\99"; $even=0;
         }
     }
-    
+
     # \8dX\90V\8f\88\97\9d\88È\8aO\82Å\83\8d\83O\83A\83E\83g\82à\82µ\82Ä\82¢\82È\82¢\82È\82ç\82Î\90V\8bK\8eQ\89Á\8eÒ\82ð\92Ç\89Á
     if (!$update && !$bye) {
         if ($IN{'name'} ne $client) {
@@ -829,7 +829,7 @@ sub viewDat {
 
     local($datfile) = $CONF{'datdir'}."/".$IN{'room'}.".dat";
     print &formatDat($datfile, $IN{'line'}, 'normal', $IN{'reverse'});
-    
+
     print $query->hr . "\n";
 
     # \92\98\8dì\8c \82ð\95\\8e¦\81i\8dí\8f\9c\8bÖ\8e~\81j