aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--src/guile/skribilo/package/diff.scm3
1 files changed, 2 insertions, 1 deletions
diff --git a/src/guile/skribilo/package/diff.scm b/src/guile/skribilo/package/diff.scm
index fe509b7..2d634ec 100644
--- a/src/guile/skribilo/package/diff.scm
+++ b/src/guile/skribilo/package/diff.scm
@@ -367,7 +367,8 @@
(unchanged :loc (ast-loc ast2) ast1))
(else
- (insertion :loc (ast-loc ast2) ast2)))))
+ (let ((loc (and (ast? ast2) (ast-loc ast2))))
+ (insertion :loc loc ast2))))))