gEDA-cvs: CVS update: refdes_renum

[cvspsrv@xxxxxxxx]

  User: danmc   
  Date: 07/04/13 23:16:01

  Modified:    .        refdes_renum
  Log:
  fix a long standing bug where not specifying "--pgskip" was the same
  
  as "--pgskip 100"
  
  
  
  
  Revision  Changes    Path
  1.5       +6 -34     eda/geda/gaf/utils/scripts/refdes_renum
  
  (In the diff below, changes in quantity of whitespace are not shown.)
  
  Index: refdes_renum
  ===================================================================
  RCS file: /home/cvspsrv/cvsroot/eda/geda/gaf/utils/scripts/refdes_renum,v
  retrieving revision 1.4
  retrieving revision 1.5
  diff -u -b -r1.4 -r1.5
  --- refdes_renum	24 Feb 2007 18:43:17 -0000	1.4
  +++ refdes_renum	14 Apr 2007 03:16:01 -0000	1.5
  @@ -1,6 +1,6 @@
   #!/usr/bin/perl -w
   #
  -# $Id: refdes_renum,v 1.4 2007/02/24 18:43:17 pcjc2 Exp $
  +# $Id: refdes_renum,v 1.5 2007/04/14 03:16:01 danmc Exp $
   #
   # Copyright (C) 2003 Dan McMahill
   #
  @@ -40,7 +40,7 @@
   
   &GetOptions(("help" => \&usage, 
   	     "nocopy" => \$nocopy,
  -	     "pgskip:i" => \$pgskip,
  +	     "pgskip:100" => \$pgskip,
   	     "verbose" => \$verbose,
   	     "version" => \&version,
                "clear"   => \$clear,
  @@ -49,7 +49,7 @@
   usage() if $Getopt::Long::error;
   
   # set the default increment for sheets
  -unless( $pgskip ) { $pgskip = 100; }
  +unless( $pgskip ) { $pgskip = 0; }
   
   usage() unless @ARGV;
   
  @@ -104,8 +104,9 @@
     close(NETLIST);
     close(OUTNET);
   
  -  # round each element up to the next 100 to help identify what
  -  # schematic page a component is on by the refdes.
  +  # Bump each elements starting refdes up to the next 100 (or whatever has
  +  # been specified with pgskip) to help identify what schematic page a
  +  # component is on by the refdes.
     if( $pgskip ) {
         foreach $dev (keys %devcnt) {
   	  my $new_cnt = ($i + 2)*$pgskip;
  @@ -208,35 +209,3 @@
     exit;
   }
   
  -# ----------------------------------------------
  -#
  -# Change Log
  -#
  -# $Log: refdes_renum,v $
  -# Revision 1.4  2007/02/24 18:43:17  pcjc2
  -# Merge changes to date from noscreen branch.
  -#
  -# Revision 1.2.6.1  2007/02/11 23:59:10  pcjc2
  -# Sync with trunc
  -#
  -# Revision 1.3  2007/02/10 20:46:17  sdb
  -# Added --clear option to clear refdeses.  (* jcl *)
  -#
  -# Revision 1.2  2005/12/21 00:09:56  danmc
  -# - Fix a bug where when using the --pgskip option, components which were
  -#   present on page n, but not on pages n+1 through n+j, and present again
  -#   on page n+j+1 got numbered in a strange way.  For example, J101 on page
  -#   1, no connectors on page 2, J201 on page 3 instead of J301.  Noted by
  -#   Stuart Brorson.
  -#
  -# - While here allow the user to change the default increment from 100 to whatever
  -#   they want.
  -#
  -# - Also fix a bug where exactly 101 components with the same refdes prefix
  -#   would cause a duplicate refdes on the next page.
  -#
  -# Revision 1.1  2003/02/21 03:21:12  ahvezda
  -# Added scripts/refdes_renum written by Dan McMahill
  -#
  -#
  -#
  
  
  


_______________________________________________
geda-cvs mailing list
geda-cvs@xxxxxxxxxxxxxx
http://www.seul.org/cgi-bin/mailman/listinfo/geda-cvs