Add as command-line argument.

2023-04-01 18:15:31 +02:00 · 2023-04-01 18:15:31 +02:00 · 10ca5f9289
commit 10ca5f9289
parent 76f45b5f7c
2 changed files with 8 additions and 1 deletions
--- a/src/web-static.scm
+++ b/src/web-static.scm
@ -65,7 +65,7 @@
       (lambda ()
 	 (let loop ((lines
 		     (get-process-output-lines
-		      (sprintf "git -C \"~A\" log \"~A\""
+		      (sprintf "git -C \"~A\" log -p -- \"~A\""
 			       (string-translate* (*members-directory*)
 						  '(("\"" "\\\"")))
 			       (member-file-name mr)