Corrected the superclass of telnet-option-warning.

Pascal J. Bourguignon [2021-05-13 22:28]
Corrected the superclass of telnet-option-warning.
Filename
common-lisp/telnet/telnet.lisp
diff --git a/common-lisp/telnet/telnet.lisp b/common-lisp/telnet/telnet.lisp
index 51b0775..ccd3f9c 100644
--- a/common-lisp/telnet/telnet.lisp
+++ b/common-lisp/telnet/telnet.lisp
@@ -279,7 +279,7 @@ specific options subnegotiations.
                      (telnet-warning-format-arguments condition)))))


-(define-condition telnet-option-warning (warning)
+(define-condition telnet-option-warning (telnet-warning)
   ((option  :initarg :option  :reader telnet-option-warning-option :type option))
   (:report (lambda (condition stream)
              (format stream "Telnet Warning with NVT ~S, option ~A: ~?"
ViewGit