Index: db.scm
==================================================================
--- db.scm
+++ db.scm
@@ -435,11 +435,11 @@
      (list "metadat" '("var" #f) '("val" #f))
      (append (list "runs" 
 		   '("id"  #f))
 	     (map (lambda (k)(list k #f))
 		  (append keys
-			  (list "runname" "state" "status" "owner" "event_time" "comment" "fail_count" "pass_count"))))
+			  (list "runname" "state" "status" "owner" "event_time" "comment" "fail_count" "pass_count" "contour"))))
      (list "test_meta"
 	   '("id"             #f)
 	   '("testname"       #f)
 	   '("owner"          #f)
 	   '("description"    #f)

Index: megatest.config
==================================================================
--- megatest.config
+++ megatest.config
@@ -6,8 +6,8 @@
 fullrun   tests/fullrun
 ext-tests ext-tests
 
 [contours]
 #     mode-patt/tag-expr
-quick QUICKPATT/quick
-full  MAXPATT/all QUICKPATT/quick
+quick quick/QUICKPATT
+full  all/MAXPATT quick/QUICKPATT
 

Index: mtut.scm
==================================================================
--- mtut.scm
+++ mtut.scm
@@ -307,20 +307,21 @@
 ;; NEED TIMESTAMP ON PKTS for efficient loading of packets into db.
 
 
 ;; make a run request pkt from basic data
 ;;
-(define (create-run-pkt mtconf area runkey runname mode-patt tag-expr pktsdir reason)
+(define (create-run-pkt mtconf area runkey runname mode-patt tag-expr pktsdir reason contour)
   (let ((area-path (configf:lookup mtconf "areas" area)))
     (let-values (((uuid pkt)
 		  (command-line->pkt
 		   "run"
 		   (append 
 		    `(("-target"     . ,runkey)
 		      ("-run-name"   . ,runname)
 		      ("-start-dir"  . ,area-path)
-		      ("-msg"        . ,reason))
+		      ("-msg"        . ,reason)
+		      ("-contour"    . ,contour))
 		    (if mode-patt
 			`(("-mode-patt"  . ,mode-patt))
 			'())
 		    (if tag-expr
 			`(("-tag-expr"   . ,tag-expr))
@@ -399,22 +400,22 @@
        
        ;; now have torun populated
        (for-each
 	(lambda (contour)
 	  (let* ((mode-tag  (string-split (or (configf:lookup mtconf "contours" contour) "") "/"))
-		 (tag-expr  (if (eq? (length mode-tag) 2)(cadr mode-tag) #f))
-		 (mode-patt (if (null? mode-tag) #f (car mode-tag))))
+		 (mode-patt (if (eq? (length mode-tag) 2)(cadr mode-tag) #f))
+		 (tag-expr  (if (null? mode-tag) #f (car mode-tag))))
 	    (for-each
 	     (lambda (runkeydat)
 	       (let* ((runkey (car runkeydat))
 		      (info   (cadr runkeydat)))
 		 (for-each
 		  (lambda (area)
 		    (let ((runname (cadr info))
 			  (reason  (car  info)))
 		      (print "runkey: " runkey " contour: " contour " info: " info " area: " area  " tag-expr: " tag-expr " mode-patt: " mode-patt)
-		      (create-run-pkt mtconf area runkey runname mode-patt tag-expr pktsdir reason)))
+		      (create-run-pkt mtconf area runkey runname mode-patt tag-expr pktsdir reason contour)))
 		  areas)))
 	     (configf:get-section torun contour))))
 	(hash-table-keys torun))))))
 
 
@@ -487,15 +488,20 @@
 	 ;; 	(hash-table-delete! adjargs key))) ;; we need to delete any params intended for mtutil
 	 ;;  (hash-table-keys adjargs))
 	 (let-values (((uuid pkt)
 		       (command-line->pkt *action* adjargs)))
 	   (write-pkt pktsdir uuid pkt))))
-      ((dispatch import rungen)
+      ((dispatch import rungen process)
        (let* ((mtconfdat (simple-setup (args:get-arg "-start-dir")))
 	      (mtconf    (car mtconfdat))
 	      (toppath   (configf:lookup mtconf "dyndat" "toppath")))
 	 (case (string->symbol *action*)
+	   ((process)  (begin
+			 (load-pkts-to-db mtconf)
+			 (generate-run-pkts mtconf toppath)
+			 (load-pkts-to-db mtconf)
+			 (dispatch-commands mtconf toppath)))
 	   ((import)   (load-pkts-to-db mtconf)) ;; import pkts
 	   ((rungen)   (generate-run-pkts mtconf toppath))
 	   ((dispatch) (dispatch-commands mtconf toppath)))))))
 
 (if (or (args:get-arg "-repl")

Index: tests/fullrun/runconfigs.config
==================================================================
--- tests/fullrun/runconfigs.config
+++ tests/fullrun/runconfigs.config
@@ -43,6 +43,16 @@
 [ubuntu/nfs/sleep60]
 SLEEPRUNNER 60
 
 [ubuntu/nfs/sleep240]
 SLEEPRUNNER 240
+
+[v1.63/tip/dev]
+QUICKPATT %/desert,%/ae
+# OTHER_PATT foo%/desert,%/ae
+
+# [v1.63/%/%]
+# QUICKPATT %/desert,%/ae
+
+[nada/foo/bar]
+junk foo
 

Index: tests/fullrun/tests/sqlitespeed/testconfig
==================================================================
--- tests/fullrun/tests/sqlitespeed/testconfig
+++ tests/fullrun/tests/sqlitespeed/testconfig
@@ -9,5 +9,7 @@
 MANYITEMS [system (env > envfile.txt;echo aa ab ac ad ae af ag ah ai)]
 # BORKED  
 
 [test_meta]
 jobgroup sqlite3
+tags quick
+

Index: tests/simplerun/tests/test2/testconfig
==================================================================
--- tests/simplerun/tests/test2/testconfig
+++ tests/simplerun/tests/test2/testconfig
@@ -15,7 +15,7 @@
 # test_meta is a section for storing additional data on your test
 [test_meta]
 author matt
 owner  matt
 description Yet another example test
-tags tagone,tagtwo
+tags tagone,tagtwo,quick
 reviewed never