nndoc.el (nndoc-dissect-mime-parts-sub): Fix last change
[gnus] / lisp / nndoc.el
index 00d9f4d..9c28cb1 100644 (file)
@@ -1011,7 +1011,7 @@ PARENT is the message-ID of the parent summary line, or nil for none."
                      (when (re-search-forward "^Content-Type:\\([^;]*\\);"
                                               nil t)
                        (setq len (- (match-end 1) (match-beginning 1)
                      (when (re-search-forward "^Content-Type:\\([^;]*\\);"
                                               nil t)
                        (setq len (- (match-end 1) (match-beginning 1)
-                                    (length content-type))
+                                    (length content-type) 1)
                              head-end (- head-end len)
                              body-begin (- body-begin len)
                              body-end (- body-end len))
                              head-end (- head-end len)
                              body-begin (- body-begin len)
                              body-end (- body-end len))