OSSP CVS Repository

ossp - Check-in [3644]
Not logged in
[Honeypot]  [Browse]  [Home]  [Login]  [Reports
[Search]  [Ticket]  [Timeline
  [Patchset]  [Tagging/Branching

Check-in Number: 3644
Date: 2003-Oct-21 20:13:16 (local)
2003-Oct-21 18:13:16 (UTC)
User:rse
Branch:
Comment: 1. Get rid of "use IO;" deprecation warnings under Perl 5.8.1 2. Do not provide "snmpdx::swOp*" OIDs only if "rpm" is really found.

Submitted by: Peter Eckel <Peter.Eckel@Eckel-EDV.de>

Tickets:
Inspections:
Files:
ossp-pkg/snmpdx/ChangeLog      1.13 -> 1.14     8 inserted, 0 deleted
ossp-pkg/snmpdx/THANKS      1.7 -> 1.8     1 inserted, 0 deleted
ossp-pkg/snmpdx/snmpdx.d/swOp.pm      1.6 -> 1.7     1 inserted, 0 deleted
ossp-pkg/snmpdx/snmpdx.pl      1.9 -> 1.10     2 inserted, 1 deleted

ossp-pkg/snmpdx/ChangeLog 1.13 -> 1.14

--- ChangeLog    2003/09/20 11:10:40     1.13
+++ ChangeLog    2003/10/21 18:13:16     1.14
@@ -9,6 +9,14 @@
   ChangeLog
   =========
 
+  Changes between 0.2.7 and 0.2.8 (20-Sep-2003 to 21-Oct-2003):
+
+   *) Get rid of "use IO;" deprecation warnings under Perl 5.8.1
+      [Peter Eckel <Peter.Eckel@Eckel-EDV.de>]
+
+   *) Do not provide "snmpdx::swOp*" OIDs only if "rpm" is really found.
+      [Peter Eckel <Peter.Eckel@Eckel-EDV.de>]
+
   Changes between 0.2.6 and 0.2.7 (10-Sep-2003 to 20-Sep-2003):
 
    *) Reimplemented the implementation of sysVMRam* for FreeBSD


ossp-pkg/snmpdx/THANKS 1.7 -> 1.8

--- THANKS       2003/09/10 13:30:47     1.7
+++ THANKS       2003/10/21 18:13:16     1.8
@@ -12,6 +12,7 @@
   Credit has to be given to the following people who contributed ideas,
   stuff, bugfixes, hints etc. (in alphabetical order):
 
+  o Peter Eckel              <Peter.Eckel@Eckel-EDV.de>
   o Christoph Schug          <chris@schug.net>
 
   ...and all other OSSP snmpdx users who gave me feedback but I've forgot.


ossp-pkg/snmpdx/snmpdx.d/swOp.pm 1.6 -> 1.7

--- swOp.pm      2003/09/10 15:01:46     1.6
+++ swOp.pm      2003/10/21 18:13:17     1.7
@@ -39,6 +39,7 @@
     #   query details via rpm(1)
     my $out = $self->{-ctx}->{-sys}->run(
         "rpm -qa --qf '[%{NAME} %{VERSION} %{RELEASE} %{BUILDTIME} %{INSTALLTIME}\\n]'", "10m");
+    return if ($out->{-stdout} eq '');
 
     #   parse details into internal structure
     my $pkg = [];


ossp-pkg/snmpdx/snmpdx.pl 1.9 -> 1.10

--- snmpdx.pl    2003/09/19 10:32:44     1.9
+++ snmpdx.pl    2003/10/21 18:13:16     1.10
@@ -32,7 +32,8 @@
 use warnings;
 use FindBin;
 use Getopt::Long;
-use IO;
+use IO::Handle;
+use IO::File;
 
 #   program information
 my $prg = {

CVSTrac 2.0.1