--- capa/capa51/GUITools/quizzer.tcl	1999/11/08 22:30:02	1.7
+++ capa/capa51/GUITools/quizzer.tcl	1999/12/03 18:39:38	1.10
@@ -3785,7 +3785,10 @@ proc createCreateDviWin {} {
 # sends the file quiztemp.ps to the printer through lpr using
 # the option foud in gLprCommand
 ###########################################################
-# Arguments: none
+# Arguments: lprCommand - actual command to be run to print
+#            showCompletionMessage - (defaults to 1 true)
+#                      controls whether the print complete 
+#                      message gets shown
 # Returns: Nothing
 # Globals: gCapaConfig -
 #          gStopPrinting -
@@ -4070,12 +4073,14 @@ proc printSection { { lprCommand "" } }
 	default	{ set type "-T"	}
     }
 
+    set prSection [string trimleft $gPrintSelection(section) 0]
+
     if { [set gStopPrinting [expr 2 == [runLatex \
 	    "echo [pwd] | $gCapaConfig(qzparse_command) \
-	    -sec $gPrintSelection(section) -set $set \
+	    -sec $prSection -set $set \
 	    -d [pwd] -c [pwd] $type " gCreateDviText] ] ] } {
 	for {set i $start} { $i <= $end} { incr i } {
-	    exec rm -f section$gPrintSelection(section)-set$i.tex 
+	    exec rm -f section$prSection-set$i.tex 
 	}
 	if {$showStopping} {
 	    displayMessage "Printing has been stopped."
@@ -4092,7 +4097,7 @@ proc printSection { { lprCommand "" } }
     }
 
     for { set i $start} { $i <= $end } { incr i } {
-	if { ! [file exists section$gPrintSelection(section)-set$i.tex] } {
+	if { ! [file exists section$prSection-set$i.tex] } {
 	    if {$showStopping} {
 		displayError "The qzparse command: $gCapaConfig(qzparse_command), was unable to produce the expected output. Printing stopped"
 		set gStopPrinting 0
@@ -4101,7 +4106,7 @@ proc printSection { { lprCommand "" } }
 	    return 2
 	}
 	
-	exec mv section$gPrintSelection(section)-set$i.tex quiztemp.tex
+	exec mv section$prSection-set$i.tex quiztemp.tex
 	exec /bin/rm -f quiztemp.dvi 
 
 	$gCreateDviText insert end "$gCapaConfig(latex_command)\n"
@@ -4662,7 +4667,7 @@ proc analyzeStop {} {
     global gAnalyze
     set gAnalyze(stop) 1
     set gAnalyze(status) "Stopped"
-    exec kill -SIGKILL $gAnalyze(pid)
+    catch {exec kill -SIGKILL $gAnalyze(pid)}
 }
 
 ###########################################################