OpenPKG CVS Repository
http://cvs.openpkg.org/
____________________________________________________________________________
Server: cvs.openpkg.org Name: Thomas Lotterer
Root: /e/openpkg/cvs Email: [EMAIL PROTECTED]
Module: openpkg-tools Date: 13-Apr-2004 17:07:53
Branch: HEAD Handle: 2004041316075200
Modified files:
openpkg-tools/cmd lint-fsl.pl lint-rc.pl lint-rpm.pl lint-spec.pl
Log:
make sure perl scripts call correct rpm and rpm2cpio
Summary:
Revision Changes Path
1.2 +5 -2 openpkg-tools/cmd/lint-fsl.pl
1.2 +5 -2 openpkg-tools/cmd/lint-rc.pl
1.2 +5 -2 openpkg-tools/cmd/lint-rpm.pl
1.2 +4 -1 openpkg-tools/cmd/lint-spec.pl
____________________________________________________________________________
patch -p0 <<'@@ .'
Index: openpkg-tools/cmd/lint-fsl.pl
============================================================================
$ cvs diff -u -r1.1 -r1.2 lint-fsl.pl
--- openpkg-tools/cmd/lint-fsl.pl 5 Apr 2004 18:07:06 -0000 1.1
+++ openpkg-tools/cmd/lint-fsl.pl 13 Apr 2004 15:07:52 -0000 1.2
@@ -27,10 +27,13 @@
##
require 5;
+use OpenPKG::Ctx;
use Getopt::Long;
use IO;
use strict;
+my $ctx = new OpenPKG::Ctx;
+
# program information
my $progname = "fsllint";
my $progvers = "0.0.1";
@@ -41,8 +44,8 @@
my $help = 0;
my $check = 'all';
my $tmpdir = ($ENV{TMPDIR} || $ENV{TEMPDIR} || "/tmp") . "/$progname";
-my $rpm = 'rpm';
-my $rpm2cpio = 'rpm2cpio';
+my $rpm = $ctx->cmdprog . " rpm";
+my $rpm2cpio = $ctx->cmdprog . " rpm2cpio";
# exception handling support
$SIG{__DIE__} = sub {
@@ .
patch -p0 <<'@@ .'
Index: openpkg-tools/cmd/lint-rc.pl
============================================================================
$ cvs diff -u -r1.1 -r1.2 lint-rc.pl
--- openpkg-tools/cmd/lint-rc.pl 5 Apr 2004 18:07:06 -0000 1.1
+++ openpkg-tools/cmd/lint-rc.pl 13 Apr 2004 15:07:52 -0000 1.2
@@ -27,10 +27,13 @@
##
require 5;
+use OpenPKG::Ctx;
use Getopt::Long;
use IO;
use strict;
+my $ctx = new OpenPKG::Ctx;
+
# program information
my $progname = "rclint";
my $progvers = "0.0.2";
@@ -41,8 +44,8 @@
my $help = 0;
my $check = 'all';
my $tmpdir = ($ENV{TMPDIR} || $ENV{TEMPDIR} || "/tmp") . "/$progname";
-my $rpm = 'rpm';
-my $rpm2cpio = 'rpm2cpio';
+my $rpm = $ctx->cmdprog . " rpm";
+my $rpm2cpio = $ctx->cmdprog . " rpm2cpio";
# exception handling support
$SIG{__DIE__} = sub {
@@ .
patch -p0 <<'@@ .'
Index: openpkg-tools/cmd/lint-rpm.pl
============================================================================
$ cvs diff -u -r1.1 -r1.2 lint-rpm.pl
--- openpkg-tools/cmd/lint-rpm.pl 5 Apr 2004 18:07:06 -0000 1.1
+++ openpkg-tools/cmd/lint-rpm.pl 13 Apr 2004 15:07:52 -0000 1.2
@@ -27,10 +27,13 @@
##
require 5;
+use OpenPKG::Ctx;
use Getopt::Long;
use IO;
use strict;
+my $ctx = new OpenPKG::Ctx;
+
# program information
my $progname = "rpmlint";
my $progvers = "0.0.1";
@@ -41,8 +44,8 @@
my $help = 0;
my $check = 'all';
my $tmpdir = ($ENV{TMPDIR} || $ENV{TEMPDIR} || "/tmp") . "/$progname";
-my $rpm = 'rpm';
-my $rpm2cpio = 'rpm2cpio';
+my $rpm = $ctx->cmdprog . " rpm";
+my $rpm2cpio = $ctx->cmdprog . " rpm2cpio";
# exception handling support
$SIG{__DIE__} = sub {
@@ .
patch -p0 <<'@@ .'
Index: openpkg-tools/cmd/lint-spec.pl
============================================================================
$ cvs diff -u -r1.1 -r1.2 lint-spec.pl
--- openpkg-tools/cmd/lint-spec.pl 5 Apr 2004 18:07:06 -0000 1.1
+++ openpkg-tools/cmd/lint-spec.pl 13 Apr 2004 15:07:52 -0000 1.2
@@ -27,10 +27,13 @@
##
require 5;
+use OpenPKG::Ctx;
use Getopt::Long;
use IO;
use strict;
+my $ctx = new OpenPKG::Ctx;
+
# program information
my $progname = "speclint";
my $progvers = "0.0.1";
@@ -41,7 +44,7 @@
my $help = 0;
my $check = 'all';
my $tmpdir = ($ENV{TMPDIR} || $ENV{TEMPDIR} || "/tmp") . "/$progname";
-my $rpm = 'rpm';
+my $rpm = $ctx->cmdprog . " rpm";
# exception handling support
$SIG{__DIE__} = sub {
@@ .
______________________________________________________________________
The OpenPKG Project www.openpkg.org
CVS Repository Commit List [EMAIL PROTECTED]
