lib/scripts/isa-xterm
changeset 7206 012d8defdaa3
parent 6344 9442bc6763f7
child 7241 8f3c14d60345
--- a/lib/scripts/isa-xterm	Thu Aug 12 15:35:03 1999 +0200
+++ b/lib/scripts/isa-xterm	Mon Aug 16 11:53:18 1999 +0200
@@ -17,6 +17,7 @@
   echo "  Options are:"
   echo "    -g GEOM      main window geometry (default 80x60)"
   echo "    -h MODE      highlight mode, may be false, bold (default), color"
+  echo "    -m MODE      pass print mode"
   echo "    -p TEXT      pass text (options etc.) to isabelle session"
   echo "    -s BOOL      symbolic font output? (default true)"
   echo "    -x PRG       executable program (default xterm)"
@@ -41,13 +42,14 @@
 MAINGEOM="80x60"
 HILITE=bold
 PASS=""
+PASS_MODE=""
 SYMBOLS="true"
 XTERM="xterm"
 
 function getoptions()
 {
   OPTIND=1
-  while getopts "g:h:p:s:x:" OPT
+  while getopts "g:h:m:p:s:x:" OPT
   do
     case "$OPT" in
       g)
@@ -56,6 +58,9 @@
       h)
         HILITE="$OPTARG"
         ;;
+      m)
+        PASS_MODE="$PASS_MODE -m $OPTARG"
+        ;;
       p)
         PASS="$PASS $OPTARG"
         ;;
@@ -88,6 +93,8 @@
   echo "WARNING: unknown highlight mode '$HILITE'" >&2
 fi
 
+PASS="$PASS_MODE $PASS"
+
 if [ -z "$SYMBOLS" -o "$SYMBOLS" = false ]; then
   exec $XTERM -T Isabelle -n Isabelle -geometry "$MAINGEOM" -e $ISABELLE $PASS "$@"
 else