X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~yarrgweb/git?p=ypp-sc-tools.db-test.git;a=blobdiff_plain;f=yarrg%2Fwhere-vessels;h=9ccb8d1726338a9617b637b71069e4c24aefec0c;hp=272a11432b37f6c6d7169f773b89a621790e7326;hb=dbadc4dc6e4d973c04ac4655bb45d1cf1338b27d;hpb=1a23128c88e708c60a40a7248539bb7f29a16190 diff --git a/yarrg/where-vessels b/yarrg/where-vessels index 272a114..9ccb8d1 100755 --- a/yarrg/where-vessels +++ b/yarrg/where-vessels @@ -583,6 +583,7 @@ proc vessel {vin} { switch -exact $subclass { null { lappend codel {} } icy { lappend codel F } + celtic { lappend codel E } default { lappend codel ($subclass) } }