From: morioka <morioka>
Date: Tue, 17 Feb 1998 13:45:57 +0000 (+0000)
Subject: (eword-decode-header): Forgot to bind `p'.
X-Git-Tag: semi-0_118_2~3
X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=2e51f5466de86a04a90d9ca8f9a70ae4c12c4ce7;p=elisp%2Fsemi.git

(eword-decode-header): Forgot to bind `p'.
---

diff --git a/eword-decode.el b/eword-decode.el
index c59d65b..9b6870f 100644
--- a/eword-decode.el
+++ b/eword-decode.el
@@ -10,7 +10,7 @@
 ;;	Renamed: 1993/06/03 to tiny-mime.el
 ;;	Renamed: 1995/10/03 from tiny-mime.el (split off encoder)
 ;;	Renamed: 1997/02/22 from tm-ew-d.el
-;; Version: $Revision: 1.8 $
+;; Version: $Revision: 1.9 $
 ;; Keywords: encoded-word, MIME, multilingual, header, mail, news
 
 ;; This file is part of SEMI (SEMI is Emacs MIME Interfaces).
@@ -45,7 +45,7 @@
 ;;;
 
 (defconst eword-decode-RCS-ID
-  "$Id: eword-decode.el,v 1.8 1998-02-17 13:10:39 morioka Exp $")
+  "$Id: eword-decode.el,v 1.9 1998-02-17 13:45:57 morioka Exp $")
 (defconst eword-decode-version (get-version-string eword-decode-RCS-ID))
 
 
@@ -218,7 +218,7 @@ If SEPARATOR is not nil, it is used as header separator."
 		      code-conversion
 		    default-mime-charset))))
 	(if default-charset
-	    (let (beg end field-name len)
+	    (let (beg p end field-name len)
 	      (goto-char (point-min))
 	      (while (re-search-forward std11-field-head-regexp nil t)
 		(setq beg (match-beginning 0)