aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--dump/triples.scm3
1 files changed, 2 insertions, 1 deletions
diff --git a/dump/triples.scm b/dump/triples.scm
index 8ed9952..5bd1ed1 100644
--- a/dump/triples.scm
+++ b/dump/triples.scm
@@ -47,7 +47,8 @@ characters with an underscore and prefixing with gn:PREFIX."
(? (lambda (el) (string-match "^\\[ .* \\]$" el)) object))
"~a ~a ~a .~%")
(_ "~a ~a ~s .~%"))])
- (format #t pattern subject predicate object)))
+ (format #t pattern subject predicate
+ (if (symbol? object) (symbol->string object) object))))
(define (scm->triples alist id)
(for-each (match-lambda