/[emacs]/emacs/lisp/gnus/mm-encode.el
ViewVC logotype

Diff of /emacs/lisp/gnus/mm-encode.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.7 by zsh, Fri Nov 29 15:57:52 2002 UTC revision 1.8 by lektu, Tue Feb 4 13:06:38 2003 UTC
# Line 1  Line 1 
1  ;;; mm-encode.el --- functions for encoding MIME things  ;;; mm-encode.el --- functions for encoding MIME things
2  ;; Copyright (C) 1998, 1999, 2000, 2002 Free Software Foundation, Inc.  ;; Copyright (C) 1998, 1999, 2000, 2002 Free Software Foundation, Inc.
3    
4  ;; Author: Lars Magne Ingebrigtsen <larsi@gnus.org>  ;; Author: Lars Magne Ingebrigtsen <larsi@gnus.org>
# Line 144  The encoding used is returned." Line 144  The encoding used is returned."
144        (while rules        (while rules
145          (when (string-match (caar rules) type)          (when (string-match (caar rules) type)
146            (throw 'found            (throw 'found
147                   (let ((encoding                   (let ((encoding
148                          (if (eq (cadr (car rules)) 'qp-or-base64)                          (if (eq (cadr (car rules)) 'qp-or-base64)
149                              (mm-qp-or-base64)                              (mm-qp-or-base64)
150                            (cadr (car rules)))))                            (cadr (car rules)))))

Legend:
Removed from v.1.7  
changed lines
  Added in v.1.8

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26