From 2263cb727254e671571e19638a12cac9b5522062 Mon Sep 17 00:00:00 2001 From: =?utf8?q?David=20V=C3=A1zquez?= Date: Sun, 9 Mar 2014 12:08:03 +0100 Subject: [PATCH] Fix gethash indentation --- src/hash-table.lisp | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/src/hash-table.lisp b/src/hash-table.lisp index e47384e..dc4f418 100644 --- a/src/hash-table.lisp +++ b/src/hash-table.lisp @@ -78,11 +78,11 @@ (defun gethash (key hash-table &optional default) (let* ((obj (caddr hash-table)) - (hash (funcall (cadr hash-table) key)) - (exists (in hash obj))) + (hash (funcall (cadr hash-table) key)) + (exists (in hash obj))) (if exists - (values (cdr (oget obj hash)) t) - (values default nil)))) + (values (cdr (oget obj hash)) t) + (values default nil)))) (defun sethash (new-value key hash-table) (let ((obj (caddr hash-table)) -- 1.7.10.4