src/: Yet more naming and export twiddles.

[sod] / src / method-impl.lisp

diff --git a/src/method-impl.lisp b/src/method-impl.lisp
index b9543fd..6f6caad 100644 (file)
--- a/src/method-impl.lisp
+++ b/src/method-impl.lisp
@@ -542,7 +542,7 @@
 (defmethod primary-method-class ((message standard-message))
   'delegating-direct-method)
 
-(defmethod message-effective-method-class ((message standard-message))
+(defmethod sod-message-effective-method-class ((message standard-message))
   'standard-effective-method)
 
 (defmethod simple-method-body