[Bio] / Sprout / AttrDBRefresh.pl Repository:
ViewVC logotype

Diff of /Sprout/AttrDBRefresh.pl

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

revision 1.12, Mon Mar 12 18:49:03 2007 UTC revision 1.13, Mon Mar 12 19:17:43 2007 UTC
# Line 102  Line 102 
102  file with the extension <.fixed>. This new file can then be reloaded using the  file with the extension <.fixed>. This new file can then be reloaded using the
103  C<load> option.  C<load> option.
104    
105    =item showKeyDef
106    
107    If specified, the name of an attribute key. The key's descriptive data will be displayed.
108    
109  =back  =back
110    
111  =cut  =cut
# Line 133  Line 137 
137                                                summary => ["", "name of a file into which a summary report will be written"],                                                summary => ["", "name of a file into which a summary report will be written"],
138                                                trimSpaces => ["", "if specified, the name of a backup file, which will be processed to remove excess spaces"],                                                trimSpaces => ["", "if specified, the name of a backup file, which will be processed to remove excess spaces"],
139                                                appendLoad => ["", "if specified, no data will be erased before loading from the load file"],                                                appendLoad => ["", "if specified, no data will be erased before loading from the load file"],
140                                                  showKeyDef => ["", "if specified, the name of a key whose descriptive data is to be displayed"],
141                                             },                                             },
142                                             "",                                             "",
143                                             @ARGV);                                             @ARGV);
# Line 250  Line 255 
255              Trace("Load statistics:\n" . $stats->Show()) if T(2);              Trace("Load statistics:\n" . $stats->Show()) if T(2);
256          }          }
257      }      }
258        if ($options->{showKeyDef}) {
259            # We want to display the identified key's description. Get the key name.
260            my $name = $options->{showKeyDef};
261            # Look for keys with the same name.
262            my %keys = $ca->GetAttributeData('find', $options->{showKeyDef});
263            # See if we found the key.
264            if (! $keys{$name}) {
265                print "Key $name not found.\n";
266            } else {
267                print "Description for $name.\n\n";
268                print $keys{$name}->[1];
269                print "\n\n";
270            }
271        }
272      if ($options->{load}) {      if ($options->{load}) {
273          # We want to load the attribute data from the specified file, but          # We want to load the attribute data from the specified file, but
274          # first we need to verify that the file exists.          # first we need to verify that the file exists.

Legend:
Removed from v.1.12  
changed lines
  Added in v.1.13

MCS Webmaster
ViewVC Help
Powered by ViewVC 1.0.3