Kommentera skriver numret i bufferten

src/commands1.el

@@ -614,7 +614,12 @@ If optional arg TEXT-NO is present write a comment to that text instead."
 		  (car current-prefix-arg))
 		 (t
 		  (signal 'lyskom-internal-error '(kom-write-comment))))))
-  (lyskom-start-of-command 'kom-write-comment)
+  (lyskom-start-of-command (concat 
+			    (car (cdr (assoc 'kom-write-comment
+					     lyskom-commands)))
+			    (if text-no 
+				(format " (%d)" text-no)
+			      "")))
   (if text-no
       (progn
 	(lyskom-collect 'main)