X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=pgg-pgp.el;h=c64713e5c13183a11fbeabe539093779d9d74e01;hb=a87d9e3848ac020992a1765eb11175e238d7a0f9;hp=a99bdbdf086aa55188ad1c94bb7f87a8f06ef659;hpb=6c9e214812e69707125958677b92bffbe7d508bf;p=elisp%2Fsemi.git diff --git a/pgg-pgp.el b/pgg-pgp.el index a99bdbd..c64713e 100644 --- a/pgg-pgp.el +++ b/pgg-pgp.el @@ -20,8 +20,8 @@ ;; You should have received a copy of the GNU General Public License ;; along with GNU Emacs; 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. ;;; Code: @@ -171,10 +171,11 @@ Bourne shell or its equivalent \(not tcsh) is needed for \"2>\"." (format "PGP passphrase for %s: " pgg-pgp-user-id) (pgg-scheme-lookup-key scheme pgg-pgp-user-id 'sign))) (args - (list (if clearsign "-fast" "-fbast") + (list (if clearsign "-fast" "-fbas") "+verbose=1" "+language=us" "+batchmode" "-u" pgg-pgp-user-id))) - (pgg-pgp-process-region start end passphrase pgg-pgp-program args) + (pgg-as-lbt start end 'CRLF + (pgg-pgp-process-region start end passphrase pgg-pgp-program args)) (pgg-process-when-success (goto-char (point-min)) (when (re-search-forward "^-+BEGIN PGP" nil t);XXX