chiark
/
gitweb
/
~yarrgweb
/
ypp-sc-tools.db-live.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Remove some debugging
[ypp-sc-tools.db-live.git]
/
yarrg
/
update-master-info
diff --git
a/yarrg/update-master-info
b/yarrg/update-master-info
index ba778d4049212eafe4195527a0acbe40b5e0717e..893b3677974aa924143a20360dd085341de3175c 100755
(executable)
--- a/
yarrg/update-master-info
+++ b/
yarrg/update-master-info
@@
-60,6
+60,7
@@
sub full ($) {
quick($ocean);
print "## updating topology of $ocean\n";
system('./yppedia-chart-parser',$ocean); die "$ocean $?" if $?;
quick($ocean);
print "## updating topology of $ocean\n";
system('./yppedia-chart-parser',$ocean); die "$ocean $?" if $?;
+ print "\n";
}
sub quick ($) {
}
sub quick ($) {
@@
-88,7
+89,8
@@
sub process_some_info ($$$) {
if ($v<2) {
next if $h =~ m/^nocommods/;
}
if ($v<2) {
next if $h =~ m/^nocommods/;
}
- next if $sfn =~ m/source-info/ && $h =~ m/^ocean/;
+ next if $sfn =~ m/source-info/ && $h =~ m/^ocean\b/;
+ next if $h =~ m/^client\b/;
print $df $_, "\n" or die $!;
}
print $df $_, "\n" or die $!;
}