From: mdw <mdw>
Date: Sun, 2 Mar 2003 12:28:14 +0000 (+0000)
Subject: Add `-jameson' option.
X-Git-Tag: 1.0.2~3
X-Git-Url: https://git.distorted.org.uk/~mdw/rocl/commitdiff_plain/ceff67f235913a8b72cfd68e48d1dbee1a5c4575

Add `-jameson' option.
---

diff --git a/README b/README
index 14659d3..88aae48 100644
--- a/README
+++ b/README
@@ -360,7 +360,7 @@ RIGHT ON COMMAND-LINE
 
 3. The graphical editor
 
-  elite-editor [GALAXY | FILE]
+  elite-editor [GALAXY | FILE | -jameson]
 
 	Starts the RIGHT ON COMMAND-LINE Commander Editor and Map.  This
 	is a Tk program -- you'll need that installed to run it.
@@ -450,7 +450,7 @@ RIGHT ON COMMAND-LINE
 	unrewarding) or pirates (risky and tedious), and start trading
 	food and other cheap items.
 
-$Id: README,v 1.4 2003/03/01 17:47:07 mdw Exp $
+$Id: README,v 1.5 2003/03/02 12:28:14 mdw Exp $
 
 Local variables:
 mode: text
diff --git a/elite-editor b/elite-editor
index 631e30d..e92578e 100755
--- a/elite-editor
+++ b/elite-editor
@@ -1,6 +1,6 @@
 #! /usr/bin/wish
 #
-# $Id: elite-editor,v 1.5 2003/03/01 17:47:07 mdw Exp $
+# $Id: elite-editor,v 1.6 2003/03/02 12:28:14 mdw Exp $
 
 package require "elite" "1.0.0"
 
@@ -1166,12 +1166,23 @@ wm withdraw .
 
 if {[llength $argv]} {
   foreach a $argv {
-    set g [parse-galaxy-spec $a]
-    if {[llength $g]} {
-      destructure {ng g} $g
-      map-new $ng $g
-    } else {
-      cmdr-load $a
+    switch -glob -- $a {
+      "-jameson" {
+	cmdr-new
+      }
+      "-*" {
+	puts stderr "$argv0: unknown option: $a"
+	exit 1
+      }
+      default {
+	set g [parse-galaxy-spec $a]
+	if {[llength $g]} {
+	  destructure {ng g} $g
+	  map-new $ng $g
+	} else {
+	  cmdr-load $a
+	}
+      }
     }
   }
 } else {