From cdbde348be913d3f08b73c7f585077b0e180e849 Mon Sep 17 00:00:00 2001
From: Sean Whitton <spwhitton@spwhitton.name>
Date: Sat, 29 May 2021 16:02:45 -0700
Subject: PROPAPPUNAPPLY: call PROPUNAPPLY, not PROPAPPUNAPPLY again

Signed-off-by: Sean Whitton <spwhitton@spwhitton.name>
---
 src/property.lisp | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'src/property.lisp')

diff --git a/src/property.lisp b/src/property.lisp
index 9fe0c72..597d9bc 100644
--- a/src/property.lisp
+++ b/src/property.lisp
@@ -115,7 +115,7 @@
 
 (defun propappunapply (propapp)
   (if propapp
-      (apply #'propappunapply propapp)
+      (apply #'propunapply propapp)
       :no-change))
 
 (defvar *known-properties* nil
-- 
cgit v1.2.3