/[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.4 by jonen, Mon Feb 17 01:08:06 2003 UTC
# Line 3  Line 3 
3  #  $Id$  #  $Id$
4  ######################################  ######################################
5  #  $Log$  #  $Log$
6    #  Revision 1.4  2003/02/17 01:08:06  jonen
7    #  + minor changes
8    #
9    #  Revision 1.3  2003/02/03 10:42:10  jonen
10    #  + another bugfix (sorry, but my orginal script was destroyed by a mistake of myself, arrggg.. ;)
11    #
12  #  Revision 1.1  2003/02/03 10:04:56  jonen  #  Revision 1.1  2003/02/03 10:04:56  jonen
13  #  + first init  #  + first init
14  #  #
# Line 82  foreach(@raw_data) { Line 88  foreach(@raw_data) {
88      push @new_lines, "New Packages available for upgrade:";      push @new_lines, "New Packages available for upgrade:";
89    }    }
90    elsif( $_ =~ /^Inst/ ) {    elsif( $_ =~ /^Inst/ ) {
91      push @new_lines, "          o  " . $_;      s/^Inst/           o  /;
92        push @new_lines,$_;
93    }    }
94    elsif( $_ !~ /^Conf/ ) {    elsif( $_ !~ /^Conf/ ) {
95      push @new_lines, "          o  " . $_;      push @new_lines, $_;
96    }    }
97    if($cnt == $count_lines) {    if($cnt == $count_lines) {
98      push @new_lines, "\n\n";      push @new_lines, "\n\n";
Legend:
Removed from v.1.1  
changed lines
  Added in v.1.4
MailToCvsAdmin">MailToCvsAdmin
 ViewVC Help
Powered by ViewVC 1.1.26 RSS 2.0 feed