@@ -1621,11 +1621,11 @@
 			", and views-cfgdat and megatest configdat as parameters. To debug try loading in the repl: megatest -repl")
 	   (set! success #f))
 	 (print "Adding tab " view-name " with proc " viewgen)
 	 ;; (iup:child-add! tabs
 	 (set! result-child 
-	       ((eval (string->symbol viewgen)) tabs tab-num view-name views-cfgdat *configdat*))))
+	       ((eval (string->symbol viewgen)) commondat tabs tab-num view-name views-cfgdat *configdat*))))
     ;; and finally set the updater
     (if success
 	(dboard:commondat-add-updater commondat
 				      (lambda ()
 					(handle-exceptions
@@ -1636,11 +1636,11 @@
 					   (debug:print 0 *default-log-port* "ERROR: failed call procedure \"" updater
 							"\", with; tabnum=" tabnum ", view-name=" view-name
 							", and views-cfgdat and megatest configdat as parameters. To debug try loading in the repl: megatest -repl")
 					   (set! success #f))
 					 (debug:print 4 *default-log-port* "Running updater for tab " view-name " with proc " updater " and tab-num: " tab-num)
-					 ((eval (string->symbol updater)) tabs tab-num view-name views-cfgdat *configdat*)))
+					 ((eval (string->symbol updater)) commondat tabs tab-num view-name views-cfgdat *configdat*)))
 				      tab-num: tab-num))
     (if success
 	(begin
 	  ;; (iup:attribute-set! tabs (conc "TABTITLE" tab-num) view-name)
 	  (dboard:common-set-tabdat! commondat tab-num (dboard:tabdat-make-data))))