Integrate git blame with highlighting.

2023-05-15 19:40:24 +02:00 · 2023-05-15 19:40:24 +02:00 · 83d0917e7a
commit 83d0917e7a
parent ac4471bfc3
5 changed files with 27 additions and 9 deletions
--- a/src/listing.scm
+++ b/src/listing.scm
@ -199,7 +199,12 @@
 						   post-str)
 					   ""))
 				      (else
-				       "xxx")))
+				       (format "~A~A ~A"
+					       pre-str
+					       (if (ldict? line)
+						   (ldict-ref line key "--")
+						   "**")
+					       post-str))))
 				  keys)
 			     rtbl)))
 	       (loop (cdr lines)