X-Git-Url: http://git.chise.org/gitweb/?p=elisp%2Fflim.git;a=blobdiff_plain;f=smtp.el;h=3704d46c44009761a136bcc86a030227f7f007ac;hp=6e866260611138ccdc81f1629fd7b7085484ce56;hb=6ef1daccd72054e60d0ef6f87bb052982340f49c;hpb=342307de334c6fe1e6b0e74861d4220e04366634

diff --git a/smtp.el b/smtp.el
index 6e86626..3704d46 100644
--- a/smtp.el
+++ b/smtp.el
@@ -23,8 +23,8 @@
 
 ;; You should have received a copy of the GNU General Public License
 ;; along with this program; see the file COPYING.  If not, write to the
-;; Free Software Foundation, Inc., 59 Temple Place - Suite 330,
-;; Boston, MA 02111-1307, USA.
+;; Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
+;; Boston, MA 02110-1301, USA.
 
 
 ;;; Commentary:
@@ -795,10 +795,7 @@ nil, the symbols `b', `k' and `l'."
 						       (point-max))))))
 			  nil nil format))
 	  (setq index (1+ (match-end 0))
-		format (replace-match (concat "%%"
-					      (or (match-string 1 format)
-						  (match-string 2 format)))
-				      nil nil format))))
+		format (replace-match "%\\&" nil nil format))))
       (cons format type))))
 
 (defun smtp-show-progress-message (def prev)