diff lisp/net/tramp-uu.el @ 110377:6dcf9897d91a

merge trunk
author Kenichi Handa <handa@m17n.org>
date Thu, 16 Sep 2010 11:11:13 +0900
parents ec526909f60b
children 417b1e4d63cd
line wrap: on
line diff
--- a/lisp/net/tramp-uu.el	Thu Sep 16 10:51:56 2010 +0900
+++ b/lisp/net/tramp-uu.el	Thu Sep 16 11:11:13 2010 +0900
@@ -50,6 +50,7 @@
   "Return the byte that is encoded as CHAR."
   (cdr (assq char tramp-uu-b64-char-to-byte)))
 
+;;;###tramp-autoload
 (defun tramp-uuencode-region (beg end)
   "UU-encode the region between BEG and END."
   ;; First we base64 encode the region, then we transmogrify that into
@@ -87,6 +88,10 @@
       (goto-char beg)
       (insert "begin 600 xxx\n"))))
 
+(add-hook 'tramp-unload-hook
+	  (lambda ()
+	    (unload-feature 'tramp-uu 'force)))
+
 (provide 'tramp-uu)
 
 ;; arch-tag: 7153f2c6-8be5-4cd2-8c06-0fbcf5190ef6