[Orca-checkins] r314 - trunk/orca/lib/Orca

Blair Zajac blair at orcaware.com
Sun May 16 07:53:54 PDT 2004


Author: blair
Date: Sun May 16 07:51:48 2004
New Revision: 314

Modified:
   trunk/orca/lib/Orca/RRDFile.pm
Log:
* lib/Orca/RRDFile.pm:
  Whitespace fixes and fit lines to 80 characters.


Modified: trunk/orca/lib/Orca/RRDFile.pm
==============================================================================
--- trunk/orca/lib/Orca/RRDFile.pm	(original)
+++ trunk/orca/lib/Orca/RRDFile.pm	Sun May 16 07:51:48 2004
@@ -110,10 +110,12 @@
             $self->[I_RRD_UPDATE_TIME] = $update_time;
             $self->[I_RRD_VERSION]     = $version;
           } else {
-            warn "$0: old version $version RRD '$rrd_filename' found: will create new version $ORCA_RRD_VERSION file.\n";
+            warn "$0: old version $version RRD '$rrd_filename' found: will ",
+                  "create new version $ORCA_RRD_VERSION file.\n";
           }
         } else {
-          warn "$0: unknown version RRD '$rrd_filename' found: will create new version $ORCA_RRD_VERSION file.\n";
+          warn "$0: unknown version RRD '$rrd_filename' found: will create ",
+               "new version $ORCA_RRD_VERSION file.\n";
         }
       }
     }
@@ -150,7 +152,7 @@
 
 # Queue a list of (time, value) data pairs.  Return the number of data
 # pairs sucessfully queued.
-# Call:   $self->(unix_epoch_time1, value1, unix_epoch_time2, value2, ...);
+# Call: $self->(unix_epoch_time1, value1, unix_epoch_time2, value2, ...);
 sub queue_data {
   my $self = shift;
 



More information about the Orca-checkins mailing list