diff options
| author | Ludovic Court`es | 2007-06-29 11:43:30 +0000 |
|---|---|---|
| committer | Ludovic Court`es | 2007-06-29 11:43:30 +0000 |
| commit | 0f6d19ec622daef4b8f046c79c42885eac2f4df6 (patch) | |
| tree | e0f4eb8992e966be46253f7ef70795c91dd3ad4a | |
| parent | 0987800d0caf8371a2b25e285e233bd5e7e66aec (diff) | |
| parent | e926e7b014d2586f5d53f75a43df5b150823d574 (diff) | |
| download | skribilo-0f6d19ec622daef4b8f046c79c42885eac2f4df6.tar.gz skribilo-0f6d19ec622daef4b8f046c79c42885eac2f4df6.tar.lz skribilo-0f6d19ec622daef4b8f046c79c42885eac2f4df6.zip | |
`diff' package: Small bug fix.
* src/guile/skribilo/package/diff.scm (make-diff-document): Don't use
`ast-loc' when AST2 is not `ast?'.
git-archimport-id: skribilo@sv.gnu.org--2006/skribilo--devo--1.2--patch-122
| -rw-r--r-- | ChangeLog | 18 | ||||
| -rw-r--r-- | src/guile/skribilo/package/diff.scm | 3 |
2 files changed, 20 insertions, 1 deletions
@@ -2,6 +2,24 @@ # arch-tag: automatic-ChangeLog--skribilo@sv.gnu.org--2006/skribilo--devo--1.2 # +2007-06-29 11:43:30 GMT Ludovic Court`es <ludovic.courtes@laas.fr> patch-122 + + Summary: + `diff' package: Small bug fix. + Revision: + skribilo--devo--1.2--patch-122 + + * src/guile/skribilo/package/diff.scm (make-diff-document): Don't use + `ast-loc' when AST2 is not `ast?'. + + modified files: + ChangeLog src/guile/skribilo/package/diff.scm + + new patches: + lcourtes@laas.fr--2006-libre/skribilo--devo--1.2--patch-77 + lcourtes@laas.fr--2006-libre/skribilo--devo--1.2--patch-78 + + 2007-06-24 19:53:56 GMT Ludovic Courtes <ludovic.courtes@laas.fr> patch-121 Summary: 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)))))) |