X-Git-Url: https://git.distorted.org.uk/~mdw/sod/blobdiff_plain/54ea6ee880f52c23279bf58262ca245b531d04b0..7d8d3a165fa725b686d1c89b78179a4d5705d11a:/src/output-proto.lisp

diff --git a/src/output-proto.lisp b/src/output-proto.lisp
index 6a26a7b..e31b201 100644
--- a/src/output-proto.lisp
+++ b/src/output-proto.lisp
@@ -111,8 +111,7 @@
    a reason to its sub-objects that is different from the REASON with which
    it was itself invoked.")
 
-  (:method-combination progn)
-  (:method progn (object reason sequencer)
+  (:method (object reason sequencer)
     (declare (ignore object reason sequencer))))
 
 ;;;--------------------------------------------------------------------------