/[cvs]/jonen/perl/scripts/sysTools/debian/apt-get_remote.pl
ViewVC logotype

Diff of /jonen/perl/scripts/sysTools/debian/apt-get_remote.pl

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

revision 1.1 by jonen, Mon Feb 3 10:04:56 2003 UTC revision 1.3 by jonen, Mon Feb 3 10:42:10 2003 UTC
# Line 3  Line 3 
3  #  $Id$  #  $Id$
4  ######################################  ######################################
5  #  $Log$  #  $Log$
6    #  Revision 1.3  2003/02/03 10:42:10  jonen
7    #  + another bugfix (sorry, but my orginal script was destroyed by a mistake of myself, arrggg.. ;)
8    #
9  #  Revision 1.1  2003/02/03 10:04:56  jonen  #  Revision 1.1  2003/02/03 10:04:56  jonen
10  #  + first init  #  + first init
11  #  #
# Line 82  foreach(@raw_data) { Line 85  foreach(@raw_data) {
85      push @new_lines, "New Packages available for upgrade:";      push @new_lines, "New Packages available for upgrade:";
86    }    }
87    elsif( $_ =~ /^Inst/ ) {    elsif( $_ =~ /^Inst/ ) {
88      push @new_lines, "          o  " . $_;      s/^Inst/ "          o  "/;
89        push @new_lines,$_;
90    }    }
91    elsif( $_ !~ /^Conf/ ) {    elsif( $_ !~ /^Conf/ ) {
92      push @new_lines, "          o  " . $_;      push @new_lines, $_;
93    }    }
94    if($cnt == $count_lines) {    if($cnt == $count_lines) {
95      push @new_lines, "\n\n";      push @new_lines, "\n\n";

Legend:
Removed from v.1.1  
changed lines
  Added in v.1.3

MailToCvsAdmin">MailToCvsAdmin
ViewVC Help
Powered by ViewVC 1.1.26 RSS 2.0 feed