Package: cupt
Version: 1.2.1
Severity: wishlist
Tags: patch
I really would like cupt to be able to retrieve its file list from a file
(or some combination of files and args on cmdline, but I just need one
file for my personnal projects). The syntax could be '@/some/file' instead
of a package description (in which case, the content of the file is
read line by line and each line becomes a package description).
Sample patch included.
-- System Information:
Debian Release: squeeze/sid
APT prefers unstable
APT policy: (500, 'unstable'), (500, 'stable'), (1, 'experimental')
Architecture: amd64 (x86_64)
Kernel: Linux 2.6.30-2-amd64 (SMP w/2 CPU cores)
Locale: LANG=fr_FR.UTF-8, LC_CTYPE=fr_FR.UTF-8 (charmap=UTF-8)
Shell: /bin/sh linked to /bin/bash
Versions of packages cupt depends on:
ii libcupt-perl 1.2.1 alternative front-end for dpkg --
ii perl 5.10.1-6 Larry Wall's Practical Extraction
ii sensible-utils 0.0.1 Utilities for sensible alternative
cupt recommends no packages.
Versions of packages cupt suggests:
pn libterm-readline-gnu-perl <none> (no description available)
-- no debconf information
--- cupt-1.2.1/cupt.orig 2009-11-04 06:37:15.000000000 +0100
+++ cupt-1.2.1/cupt 2009-11-04 06:48:37.000000000 +0100
@@ -477,7 +477,17 @@
return \...@relations;
};
- my @package_expressions = @ARGV;
+ my @package_expressions = ();
+ my @package_expressions_untreated = @ARGV;
+ foreach (@package_expressions) {
+ push @package_expressions,($_) and next unless /^@/;
+ my @list=();
+ s/^@//g;
+ open SOURCE,$_ or next; # Surely some warning should be given
+ chomp(@list=<SOURCE>);
+ close SOURCE;
+ push @package_expressions,@list;
+ }
scalar @package_expressions or
mydie('no package expressions specified');
