From 9699776ccb30ade407a4e0352f454eeb381dea20 Mon Sep 17 00:00:00 2001 From: Dave Love Date: Mon, 16 Aug 1999 11:46:07 +0000 Subject: (auto-compression-mode): New variable for customization. --- lisp/jka-compr.el | 13 +++++++++++++ 1 file changed, 13 insertions(+) (limited to 'lisp/jka-compr.el') diff --git a/lisp/jka-compr.el b/lisp/jka-compr.el index b2b53335fc4..17a8d189cbb 100644 --- a/lisp/jka-compr.el +++ b/lisp/jka-compr.el @@ -759,6 +759,19 @@ It is not recommended to set this variable permanently to anything but nil.") (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. -- cgit v1.2.3-70-g09d2