Overview
| Comment: | Sorts component list into alphabetical order to improve default lbl.txt generation. |
|---|---|
| Downloads: | Tarball | ZIP archive |
| Timelines: | family | ancestors | descendants | both | origin/master | trunk |
| Files: | files | file ages | folders |
| SHA3-256: |
f3ad0d929554eb890f4e3314eb6edcce |
| User & Date: | geraint@users.sourceforge.net on 2004-08-19 19:33:43.000 |
| Other Links: | branch diff | manifest | tags |
Context
|
2004-08-25
| ||
| 20:16:41 | Added --dia_output_file to usage. check-in: f75ef2b760 user: geraint@users.sourceforge.net tags: origin/master, trunk | |
|
2004-08-19
| ||
| 19:33:43 | Sorts component list into alphabetical order to improve default lbl.txt generation. check-in: f3ad0d9295 user: geraint@users.sourceforge.net tags: origin/master, trunk | |
| 19:17:41 |
Removed functions associated with writing _abg.m directly. dia2abg.pl now produces _ibg.m instead. check-in: d5745021a6 user: geraint@users.sourceforge.net tags: origin/master, trunk | |
Changes
Modified mttroot/mtt/bin/trans/dia2abg.pl
from [f8b9be78d9]
to [727b619778].
| ︙ | ︙ | |||
164 165 166 167 168 169 170 |
my ($type, $name);
print_debug("CREATING unique_raw_list...\n");
open (RAW,">$component_list_file") ||
die "Cannot open $component_list_file for writing.\n";
my (%reverse_component_id_tag) = reverse (%component_id_tag);
| | | 164 165 166 167 168 169 170 171 172 173 174 175 176 177 178 |
my ($type, $name);
print_debug("CREATING unique_raw_list...\n");
open (RAW,">$component_list_file") ||
die "Cannot open $component_list_file for writing.\n";
my (%reverse_component_id_tag) = reverse (%component_id_tag);
foreach my $val (sort values(%component_id_tag)) {
my ($id, $type);
$id = $reverse_component_id_tag{$val};
$type = $component_id_type{$id};
$_ = $val;
id_cleaner();
$val = $_;
print RAW $val . "\n";
|
| ︙ | ︙ |