Whoops.

[rocl] / elite-cmdr

diff --git a/elite-cmdr b/elite-cmdr
index 4c101df158c4bf68f36dc350aa40e4c71f71324b..cc8bb50c4fedae8c84a2674e290d100f574b0c34 100755 (executable)
--- a/elite-cmdr
+++ b/elite-cmdr
@@ -238,6 +238,7 @@ for {set i 0} {$i < [llength $argv]} {incr i} {
       }
       puts [format "%-20s %s" $a [eval \
          get/[lindex $attr($a) 0] [lrange $attr($a) 1 end] [list $a]]]
+      set acted 1
     }
     default {
       if {[catch { elite-unpackcmdr cmdr [read-file $a] } err]} {