From 8d145be3f38ea4422f50a90b2eaaef697998654e Mon Sep 17 00:00:00 2001 From: ueno Date: Sat, 24 Aug 2002 05:41:39 +0000 Subject: [PATCH] (lsdb-insert-hash-table): Bind print-level and print-length. --- lsdb.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/lsdb.el b/lsdb.el index c27b756..f4a442e 100644 --- a/lsdb.el +++ b/lsdb.el @@ -416,7 +416,8 @@ This is the current number of slots in HASH-TABLE, whether occupied or not." " test equal data (") (lsdb-maphash (lambda (key value) - (insert (prin1-to-string key) " " (prin1-to-string value) " ")) + (let (print-level print-length) + (insert (prin1-to-string key) " " (prin1-to-string value) " "))) hash-table) (insert "))")) -- 1.7.10.4