From 1474b17b931d1bc6ca54a5a908d378c72ea4491c Mon Sep 17 00:00:00 2001
From: ueno <ueno>
Date: Sat, 6 Nov 1999 19:02:24 +0000
Subject: [PATCH] * pgg.el (pgg-sign-region): Add optional argument
 `cleartext'.

---
 pgg.el |    5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/pgg.el b/pgg.el
index 8008db5..e6fa06d 100644
--- a/pgg.el
+++ b/pgg.el
@@ -188,11 +188,12 @@ and END to the keyring.")
     status))
 
 ;;;###autoload
-(defun pgg-sign-region (start end)
+(defun pgg-sign-region (start end &optional cleartext)
   (interactive "r")
   (let* ((entity (pgg-make-scheme pgg-default-scheme))
 	 (status (luna-send entity 'sign-region 
-			    entity start end (interactive-p))))
+			    entity start end 
+			    (or (interactive-p) cleartext))))
     (when (interactive-p)
       (if status
 	  (progn
-- 
1.7.10.4