Skip to content
Snippets Groups Projects
Commit 98e01d86 authored by steveb's avatar steveb
Browse files

Reenable auto-compression-mode

parent dd63c273
No related branches found
No related tags found
No related merge requests found
1998-02-15 SL Baur <steve@altair.xemacs.org>
* jka-compr.el: Reenable auto-compression-mode symbol.
1998-01-24 SL Baur <steve@altair.xemacs.org>
* Makefile (VERSION): Update to package standard 1.0.
......
......@@ -19,7 +19,7 @@
# This XEmacs package contains independent single file lisp packages
VERSION = 1.04
VERSION = 1.05
AUTHOR_VERSION =
MAINTAINER = XEmacs Development Team <xemacs-beta@xemacs.org>
PACKAGE = os-utils
......
......@@ -723,19 +723,18 @@
(inhibit-file-name-operation operation))
(apply operation args)))
;; XEmacs change: I don't have a clue what this is trying do. -sb
;; ;;;###autoload(defun auto-compression-mode (&optional arg)
;; ;;;###autoload "\
;; ;;;###autoloadToggle automatic file compression and uncompression.
;; ;;;###autoloadWith prefix argument ARG, turn auto compression on if positive, else off.
;; ;;;###autoloadReturns the new status of auto compression (non-nil means on)."
;; ;;;###autoload (interactive "P")
;; ;;;###autoload (if (not (fboundp 'jka-compr-installed-p))
;; ;;;###autoload (progn
;; ;;;###autoload (require 'jka-compr)
;; ;;;###autoload ;; That turned the mode on, so make it initially off.
;; ;;;###autoload (toggle-auto-compression)))
;; ;;;###autoload (toggle-auto-compression arg t))
;;;###autoload(defun auto-compression-mode (&optional arg)
;;;###autoload "\
;;;###autoloadToggle automatic file compression and uncompression.
;;;###autoloadWith prefix argument ARG, turn auto compression on if positive, else off.
;;;###autoloadReturns the new status of auto compression (non-nil means on)."
;;;###autoload (interactive "P")
;;;###autoload (if (not (fboundp 'jka-compr-installed-p))
;;;###autoload (progn
;;;###autoload (require 'jka-compr)
;;;###autoload ;; That turned the mode on, so make it initially off.
;;;###autoload (toggle-auto-compression)))
;;;###autoload (toggle-auto-compression arg t))
;; XEmacs: autoload this function
;;;###autoload
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment