/[collab-maint]/deb-maint/python-support/tags/1.0.14/debhelper/dh_pysupport
ViewVC logotype

Diff of /deb-maint/python-support/tags/1.0.14/debhelper/dh_pysupport

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 12913 by joss, Tue May 5 16:38:46 2009 UTC revision 12915 by joss, Tue May 5 16:40:01 2009 UTC
# Line 68  sub next_minor_version { Line 68  sub next_minor_version {
68      return $version;      return $version;
69  }  }
70    
71    my $default=`pyversions -dv`;
72    chomp $default;
73    
74    my $do_deps=1;
75    if (-f "debian/pycompat" && ! $dh{D_FLAG}) {
76            $do_deps=0;
77    }
78    
79  foreach my $package (@{$dh{DOPACKAGES}}) {  foreach my $package (@{$dh{DOPACKAGES}}) {
80          my $tmp = tmpdir($package);          my $tmp = tmpdir($package);
81          doit (("pysupport-movemodules",$tmp));          doit (("pysupport-movemodules",$tmp));
82    
83          my @dirs = ("usr/lib/$package", "usr/share/$package",          my @dirs = ("/usr/lib/$package", "/usr/share/$package",
84                      "usr/lib/games/$package", "usr/share/games/$package", @ARGV );                      "/usr/lib/games/$package", "/usr/share/games/$package", @ARGV );
85          @dirs = grep -d, map "$tmp/$_", @dirs;          @dirs = grep -d, map "$tmp$_", @dirs;
86    
87          # Look for private python modules          # Look for private python modules
88          my $dirlist="";          my @dirlist;
89          if (@dirs) {          if (@dirs) {
90                  foreach my $curdir (@dirs) {                  foreach my $curdir (@dirs) {
91                          my $has_module = 0;                          my $has_module = 0;
                         $curdir =~ s%^$tmp/%%;  
92                          find sub {                          find sub {
93                                  return unless -f;                                  return unless -f;
94                                  $has_module = 1 if (/\.py$/);                                  $has_module = 1 if (/\.py$/);
95                          }, "$tmp/$curdir" ;                          }, $curdir ;
96                          if ($has_module) {                          $curdir =~ s%^$tmp%%;
97                                  $dirlist="$dirlist /$curdir";                          if ( $has_module and not grep { $_ eq "$curdir" } @dirlist ) {
98                                    push @dirlist, "$curdir";
99                          }                          }
100                  }                  }
101          }          }
102    
103          if ($dirlist) {          if (@dirlist) {
104                  # We have private python modules                  # We have private python modules
105                  # Use python-support to ensure that they are always                  # Use python-support to ensure that they are always
106                  # byte-compiled for the current version                  # byte-compiled for the current version
107                  mkdir("$tmp/usr/share/python-support");                  mkdir("$tmp/usr/share/python-support");
                 $dirlist =~ s/^\s*//;  
                 $dirlist =~ s/\s*$//;  
108                  open(DIRLIST, "> $tmp/usr/share/python-support/$package.dirs") ||                  open(DIRLIST, "> $tmp/usr/share/python-support/$package.dirs") ||
109                      error("Can't create $tmp/usr/share/python-support/$package.dirs: $!");                      error("Can't create $tmp/usr/share/python-support/$package.dirs: $!");
110                  print DIRLIST join("\n", split(/\s+/, $dirlist));                  print DIRLIST map "$_\n", @dirlist;
111                  close(DIRLIST);                  close(DIRLIST);
112          }          }
113    
# Line 147  foreach my $package (@{$dh{DOPACKAGES}}) Line 153  foreach my $package (@{$dh{DOPACKAGES}})
153                                  if (-f "$ps_dir/.version") {                                  if (-f "$ps_dir/.version") {
154                                          $supported=`pysupport-parseversions --minmax $ps_dir/.version`;                                          $supported=`pysupport-parseversions --minmax $ps_dir/.version`;
155                                  }                                  }
156                                  if ($dh{D_FLAG} && defined $supported) {                                  if ($do_deps && defined $supported) {
157                                          my @ar=split "\n",$supported;                                          my @ar=split "\n",$supported;
158                                          if ($package =~ /^python-/) {                                          if ($package =~ /^python-/) {
159                                                  my @provides=split " ",$ar[0];                                                  my @provides=split " ",$ar[0];
# Line 157  foreach my $package (@{$dh{DOPACKAGES}}) Line 163  foreach my $package (@{$dh{DOPACKAGES}})
163                                                          addsubstvar($package, "python:Provides", $virtual);                                                          addsubstvar($package, "python:Provides", $virtual);
164                                                  }                                                  }
165                                          }                                          }
166                                          my @minmax=split " ",$ar[1];                                          if ( grep { $_ eq $default } @provides ) {
167                                          my $minversion=$minmax[0];                                                  my @minmax=split " ",$ar[1];
168                                          if ($minversion ne "None") {                                                  my $minversion=$minmax[0];
169                                                  addsubstvar($package, "python:Depends", "python (>= $minversion)");                                                  if ($minversion ne "None") {
170                                          }                                                          addsubstvar($package, "python:Depends", "python (>= $minversion)");
171                                          my $maxversion=$minmax[1];                                                  }
172                                          if ($maxversion ne "None") {                                                  my $maxversion=$minmax[1];
173                                                  $maxversion = next_minor_version($maxversion);                                                  if ($maxversion ne "None") {
174                                                  addsubstvar($package, "python:Depends", "python (<< $maxversion)");                                                          $maxversion = next_minor_version($maxversion);
175                                                            addsubstvar($package, "python:Depends", "python (<< $maxversion)");
176                                                    }
177                                            } else {
178                                                    addsubstvar($package,"python:Depends", join (" | ", map ("python$_", @provides)));
179                                          }                                          }
180                                  }                                  }
181                                  $ps_dir =~ s/^$tmp//;                                  $ps_dir =~ s/^$tmp//;
Legend:
Removed from v.12913  
changed lines
  Added in v.12915
  ViewVC Help
Powered by ViewVC 1.1.5