# HG changeset patch
# User Dave Love <fx@gnu.org>
# Date 934803967 0
# Node ID 0829d4d02982283841c3cdaef6315ae4073202a0
# Parent  94c605866a9e48b8093225e50a89eb21e5e2ff6b
(auto-compression-mode): New variable for customization.

diff -r 94c605866a9e -r 0829d4d02982 lisp/jka-compr.el
--- a/lisp/jka-compr.el	Mon Aug 16 11:41:29 1999 +0000
+++ b/lisp/jka-compr.el	Mon Aug 16 11:46:07 1999 +0000
@@ -759,6 +759,19 @@
 	(inhibit-file-name-operation operation))
     (apply operation args)))
 
+;;;###autoload
+(defcustom auto-compression-mode nil
+  "Toggle automatic file compression and uncompression.
+Setting this variable directly does not take effect;
+use either \\[customize] or the function `auto-compression-mode'."
+  :set (lambda (symbol value)
+	 (auto-compression-mode (or value 0)))
+  :initialize 'custom-initialize-default
+  :group 'jka-compr
+  :version "21.1"
+  :type 'boolean
+  :require 'jka-compr)
+
 ;;;###autoload(defun auto-compression-mode (&optional arg)
 ;;;###autoload  "\
 ;;;###autoloadToggle automatic file compression and uncompression.