Skip to content
Browse files

bug18646: make sure argument to decode-header-text is non-nil

  • Loading branch information...
1 parent 3f4b1cb commit de680a7f2f0d8177b9c5ee10ef7b6dcef3591c97 @dklayer dklayer committed Dec 21, 2009
Showing with 6 additions and 0 deletions.
  1. +5 −0 ChangeLog
  2. +1 −0 mime-api.cl
View
5 ChangeLog
@@ -1,3 +1,8 @@
+2009-12-21 Kevin Layer <layer@gemini.franz.com>
+
+ * mime-api.cl (decode-header-text): bug18646: put in error
+ check for `nil'.
+
2009-09-30 Kevin Layer <layer@gemini.franz.com>
* mime-api.cl: rfe9010: decode-header-text: remove "soft"
View
1 mime-api.cl
@@ -425,6 +425,7 @@ This is a multi-part message in MIME format.~%"))
(defun decode-header-text (text)
(declare (optimize (speed 3))
(string text))
+ (when (null text) (error "first argument expected to be non-nil."))
(let ((pos 0)
(len (length text))
last-tail)

0 comments on commit de680a7

Please sign in to comment.
Something went wrong with that request. Please try again.