aboutsummaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
Diffstat (limited to 'src')
-rw-r--r--src/standard-hooks.lisp2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/standard-hooks.lisp b/src/standard-hooks.lisp
index 36c4d8e..86725ca 100644
--- a/src/standard-hooks.lisp
+++ b/src/standard-hooks.lisp
@@ -52,7 +52,7 @@
(defun defun-restarts-expander (form)
(let* ((name (second form))
- (restart-name (intern (format nil "UNBIND-CLASS-~a" (symbol-name name)))))
+ (restart-name (intern (format nil "UNBIND-FUNCTION-~a" (symbol-name name)))))
`((,restart-name
()
(fmakunbound ',name)))))