From cbeca0b29257118bce4e8cea52811a5a6314905f Mon Sep 17 00:00:00 2001 From: bg66 Date: Thu, 8 Aug 2002 07:38:22 +0000 Subject: [PATCH] Hack for non-optimize. --- lsdb.el | 10 +++++----- 1 file changed, 5 insertions(+), 5 deletions(-) diff --git a/lsdb.el b/lsdb.el index d6aa072..330648b 100644 --- a/lsdb.el +++ b/lsdb.el @@ -355,11 +355,11 @@ This is the current number of slots in HASH-TABLE, whether occupied or not." (eval-and-compile (condition-case nil - (progn - ;; In XEmacs, hash tables can also be created by the lisp reader - ;; using structure syntax. - (read-from-string "#s(hash-table)") - (defalias 'lsdb-read 'read)) + (and + ;; In XEmacs, hash tables can also be created by the lisp reader + ;; using structure syntax. + (read-from-string "#s(hash-table)") + (defalias 'lsdb-read 'read)) (invalid-read-syntax (defun lsdb-read (&optional marker) "Read one Lisp expression as text from MARKER, return as Lisp object." -- 1.7.10.4