jka-compr + byte-compiler-base-file-name bug

[Karl Chen]

Synopsis:
    (byte-compiler-base-file-name "a.el.gz")
     -> "a.el.gz"

Correct answer, after patch below:
    (byte-compiler-base-file-name "a.el.gz")
     -> "a.el"


2005-10-09  Karl Chen  <address@hidden>

        * jka-cmpr-hook.el (jka-compr-handler): Fix
        byte-compiler-base-file-name

--- /usr/share/emacs/22.0.50/lisp/.backup/jka-cmpr-hook.el.~1~
+++ /usr/share/emacs/22.0.50/lisp/jka-cmpr-hook.el
@@ -281,7 +281,7 @@
 ;;; in order to decide when to call it.
 
 (put 'jka-compr-handler 'safe-magic t)
-(put 'jka-compr-handler 'operations '(jka-compr-byte-compiler-base-file-name
+(put 'jka-compr-handler 'operations '(byte-compiler-base-file-name
                                      write-region insert-file-contents
                                      file-local-copy load))

-- 
Karl 2005-10-09 23:27