Mostly style cleanups and commentary.

[rocl] / elite-prices

diff --git a/elite-prices b/elite-prices
index 1af510a..2e555f2 100755 (executable)
--- a/elite-prices
+++ b/elite-prices
@@ -61,7 +61,7 @@ proc get-prices {ss arr} {
   foreach {t p} $products {
     set a($t) [loavghi $l($t)]
   }
-}  
+}
 
 set g $galaxy1
 set sortcol 0