@@ -128,12 +128,11 @@
 				     ))
 			(list "Author: "
 			      "Owner: "
 			      "Reviewed: "
 			      "Tags: "
-			      "Description: "
-			      ))
+			      "Description: "))
 		   (list (iup:label "" #:expand "VERTICAL"))))
     (apply iup:vbox  ; #:expand "YES"
 	   (list 
 	    (store-meta "author"
 			 (iup:label (db:testmeta-get-author testmeta) #:expand "HORIZONTAL")
@@ -197,11 +196,12 @@
 			(list "Hostname: "
 			      "Uname -a: "
 			      "Disk free: "
 			      "CPU Load: "
 			      "Run duration: "
-			      "Logfile: "))
+			      "Logfile: "
+			      "Top process id: "))
 		   (iup:label "" #:expand "VERTICAL")))
     (apply iup:vbox ; #:expand "YES"
 	   (list
 	    ;; NOTE: Yes, the host can change!
 	    (store-label "HostName"
@@ -220,13 +220,17 @@
 			 (iup:label (conc (db:test-get-cpuload testdat)) #:expand "HORIZONTAL")
 			 (lambda (testdat)(conc (db:test-get-cpuload testdat))))
 	    (store-label "RunDuration"
 			 (iup:label (conc (seconds->hr-min-sec (db:test-get-run_duration testdat))) #:expand "HORIZONTAL")
 			 (lambda (testdat)(conc (seconds->hr-min-sec (db:test-get-run_duration testdat)))))
-	    (store-label "CPULoad"
+	    (store-label "LogFile"
 			 (iup:label (conc (db:test-get-final_logf testdat)) #:expand "HORIZONTAL")
-			 (lambda (testdat)(conc (db:test-get-final_logf testdat)))))))))
+			 (lambda (testdat)(conc (db:test-get-final_logf testdat))))
+	    (store-label "ProcessId"
+			 (iup:label (conc (db:test-get-process_id testdat)) #:expand "HORIZONTAL")
+			 (lambda (testdat)(conc (db:test-get-process_id testdat))))
+	    )))))
 
 ;; use a global for setting the buttons colors
 ;;                           state status teststeps
 (define *state-status* (vector #f #f #f))
 (define (update-state-status-buttons testdat)