diff options
| author | sterni <sternenseemann@systemli.org> | 2023-04-09T14·29+0200 |
|---|---|---|
| committer | clbot <clbot@tvl.fyi> | 2023-04-29T12·55+0000 |
| commit | 7e6595dbf411423e779ff7a26092ed593ffcd8fc (patch) | |
| tree | 76f7534047fa77f293604d82e801c8ba2a0960c5 /third_party/lisp/mime4cl/mime.lisp | |
| parent | 2464ea7303601cf5ee1dc4b3439d91ff182001b0 (diff) | |
fix(3p/lisp/mime4cl): correctly define find-mime-text-part r/6119
The generic function itself needs to be defined using defgeneric, defmethod is used for a defining method of a generic function, i.e. how it should behave when confronted with a certain class. Change-Id: Idd38afa02b56c5002e215decfff7f0c25267eab5 Reviewed-on: https://cl.tvl.fyi/c/depot/+/8532 Autosubmit: sterni <sternenseemann@systemli.org> Reviewed-by: sterni <sternenseemann@systemli.org> Tested-by: BuildkiteCI
Diffstat (limited to 'third_party/lisp/mime4cl/mime.lisp')
| -rw-r--r-- | third_party/lisp/mime4cl/mime.lisp | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/third_party/lisp/mime4cl/mime.lisp b/third_party/lisp/mime4cl/mime.lisp index eec7f87dfa19..a5917db67fc4 100644 --- a/third_party/lisp/mime4cl/mime.lisp +++ b/third_party/lisp/mime4cl/mime.lisp @@ -979,7 +979,7 @@ is a string.")) ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; -(defmethod find-mime-text-part (msg) +(defgeneric find-mime-text-part (msg) (:documentation "Return message if it is a text message or first text part. If no suitable text part is found, return NIL.")) |