@@ -2125,12 +2125,12 @@
 			    (let ((tab-content (dboard:add-external-tab commondat view-name views-cfgdat #f tab-num))) ;; was tabs
 			      (set! additional-tabnames (cons (cons tab-num view-name) additional-tabnames))
 			      (set! tab-num (+ tab-num 1))
 			      (set! result (append result (list tab-content)))))))))
 		 (sort (hash-table-keys views-cfgdat) (lambda (a b)
-							(let ((order-a (or (any-number (configf:lookup views-cfgdat a "order")) 999))
-							      (order-b (or (any-number (configf:lookup views-cfgdat b "order")) 999)))
+							(let ((order-a (or (any->number (configf:lookup views-cfgdat a "order")) 999))
+							      (order-b (or (any->number (configf:lookup views-cfgdat b "order")) 999)))
 							  (> order-a order-b)))))
 		result))
 	     (tabs (apply iup:tabs
 			  #:tabchangepos-cb (lambda (obj curr prev)
 					      (debug:catch-and-dump