[Date Prev][Date Next] [Thread Prev][Thread Next] [Date Index] [Thread Index]

Re: [MoM] Pristine Tar Updated and Uploaded



Le Sun, Jul 13, 2014 at 07:51:24PM -0700, Ian Wallace a écrit :
> Charles and Andreas - Changes looked ok with me.  As a newbie I'm not
> partial to either way just one that works.  I tried the debcheckout on the
> currently openemr repo and unfortunately it fails ... I guess maybe in the
> beginning we never set it up correctly?
> 
> Here's the output from debcheckout:
> 
> debcheckout --user iankarlwallace-guest git://
> git.debian.org/debian-med/openemr.git --git-track '*'
> declared git repository at git+ssh://
> iankarlwallace-guest@git.debian.org/git/debian-med/openemr.git
> git clone git+ssh://
> iankarlwallace-guest@git.debian.org/git/debian-med/openemr.git openemr ...
> Cloning into 'openemr'...
> remote: Counting objects: 6075, done.
> remote: Compressing objects: 100% (4520/4520), done.
> remote: Total 6075 (delta 1273), reused 5760 (delta 1111)
> Receiving objects: 100% (6075/6075), 73.34 MiB | 2.61 MiB/s, done.
> Resolving deltas: 100% (1273/1273), done.
> Checking connectivity... done.
> Branch pristine-tar set up to track remote branch pristine-tar from origin.
> Branch upstream set up to track remote branch upstream from origin.
> Use of uninitialized value $srcpkg in substitution (s///) at
> /usr/bin/debcheckout line 832.
> 
> I am not perl expert and haven't taken a look at the script to debug but
> might be something about the way we setup the repo originally?

Hi Ian,

Using devscripts 2.14.5, I could not reproduce the bug:

$ debcheckout --user plessy git://git.debian.org/debian-med/openemr.git --git-track '*'
declared git repository at git+ssh://plessy@git.debian.org/git/debian-med/openemr.git
git clone git+ssh://plessy@git.debian.org/git/debian-med/openemr.git openemr ...
Cloning into 'openemr'...
remote: Counting objects: 6075, done.
remote: Compressing objects: 100% (4520/4520), done.
remote: Total 6075 (delta 1274), reused 5760 (delta 1111)
Receiving objects: 100% (6075/6075), 73.34 MiB | 3.51 MiB/s, done.
Resolving deltas: 100% (1274/1274), done.
Checking connectivity... done.
Branch pristine-tar set up to track remote branch pristine-tar from origin.
Branch upstream set up to track remote branch upstream from origin.

Here are extracts of the source code of debcheckout:

 822 sub unpack_source($$$$$) {
 823     my ($pkg, $version, $destdir, $origtgz_name, $unpack_source) = @_;
 824 
 825     return 1 if ($unpack_source eq 'never');
 826     return 1 if (defined $origtgz_name and $origtgz_name eq ''); # only really relevant with URL on command line
 827 
 828     $destdir ||= $pkg;
 829     # Apt will auto-resolve binary package names to source package names.  We
 830     # need to know the source package name to correctly identify the source
 831     # package artifacts (dsc, orig.tar.*, etc)
 832     (my $srcpkg = $origtgz_name) =~ s/_.*//;


 326 # Find the repository URL (and type) for a given package name, parsing Vcs-*
 327 # fields.  Returns (version, type, url, origtgz_name) tuple.
 328 sub find_repo($$) {
 329     my ($pkg, $desired_ver) = @_;
 330     my @repo = ("", 0, "", "");
 331     my $found = 0;
 332     my ($nonepoch_version, $version) = ("", "");
 333     my $origtgz_name = "";
 334     my $type = "";
 335     my $url = "";
 336     my @repos = ();
 337 
 338     open(APT, "apt-cache showsrc $pkg |");
 339     while (my $line = <APT>) {
 340         $found = 1;
 341         chomp($line);
 342         if ($line =~ /^(x-)?vcs-(\w+):\s*(.*)$/i) {
 343             next if lc($2) eq "browser";
 344             ($type, $url) = (lc($2), $3);
 345         } elsif ($line =~ /^Version:\s*(.*)$/i) {
 346             $version = $1;
 347             ($nonepoch_version = $version) =~ s/^\d+://;
 348         } elsif ($line =~ /^ [a-f0-9]{32} \d+ (\S+)(?:_\Q$nonepoch_version\E|\.orig)\.tar\.$compression_re$/) {
 349             $origtgz_name = $1;
 350         } elsif ($line =~ /^$/) {
 351             push (@repos, [$version, $type, $url, $origtgz_name])
 352                 if ($version and $type and $url and
 353                     ($desired_ver eq "" or $desired_ver eq $version));
 354             $version = "";
 355             $type = "";
 356             $url = "";
 357             $origtgz_name = "";
 358         }
 359     }

Could it be that you have some extra apt sources that would somehow interfere with debcheckout ?

Here is what I have on my computer.

$ apt-cache showsrc openmr
W: Unable to locate package openmr
N: No packages found

Have a nice day,

Charles

-- 
Charles Plessy
Debian Med packaging team,
http://www.debian.org/devel/debian-med
Tsurumi, Kanagawa, Japan


Reply to: