changeset 25284:0829d4d02982

(auto-compression-mode): New variable for customization.
author Dave Love <fx@gnu.org>
date Mon, 16 Aug 1999 11:46:07 +0000
parents 94c605866a9e
children b4f8e285c891
files lisp/jka-compr.el
diffstat 1 files changed, 13 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- 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.