Bug 1927

Summary:	doesn\'t find source for functions if bz2-compressed
Product:	Sisyphus	Reporter:	imz <vanyaz>
Component:	emacs-common	Assignee:	Ivan Zakharyaschev <imz>
Status:	CLOSED FIXED	QA Contact:
Severity:	minor
Priority:	P5	CC:	sbolshakov
Version:	unstable
Hardware:	all
OS:	Linux

Description imz 2003-01-13 20:57:41 MSK

Some .el-source files have been bzipped, but Emacs can\'t find such files to show the source. (Gzipped is OK.)

So the support for this has to be added.

---
Having /usr/share/emacs/21.2/lisp/jka-compr.el.bz2,

do in Emacs:

C-h f RET
auto-compression-mode

and tru to follow the link to the source (`jka-compr\'), you\'ll get 

find-function-search-for-symbol: The library `jka-compr\' is not in the path


---
emacs-common-21.2-alt12
emacs-el-21.2-alt12

Comment 1 imz 2003-02-11 02:44:48 MSK

emacs-21.2-alt14: patched to fix this (emacs-21.2-alt14-load-el_bz2.patch):

--- emacs-21.2.orig/lisp/emacs-lisp/find-func.el        2001-07-25 19:04:21 +0400
+++ emacs-21.2/lisp/emacs-lisp/find-func.el     2003-02-10 22:21:06 +0300
@@ -130,7 +130,11 @@
                           (if compression
                               (or (locate-library (concat library \&quot;.el.gz\&quot;)
                                                   t path)
+                                  (locate-library (concat library \&quot;.el.bz2\&quot;)
+                                                  t path)
                                   (locate-library (concat library \&quot;.gz\&quot;)
+                                                  t path)
+                                  (locate-library (concat library \&quot;.bz2\&quot;)
                                                   t path)))))))
       (if (not filename)
          (error \&quot;The library `%s\' is not in the path\&quot; library))


(There is also a second part of the patch to make loading bzipped2 libs possible.)

Comment 2 imz 2003-02-11 02:44:48 MSK

emacs-21.2-alt14: patched to fix this (emacs-21.2-alt14-load-el_bz2.patch):

--- emacs-21.2.orig/lisp/emacs-lisp/find-func.el        2001-07-25 19:04:21 +0400
+++ emacs-21.2/lisp/emacs-lisp/find-func.el     2003-02-10 22:21:06 +0300
@@ -130,7 +130,11 @@
                           (if compression
                               (or (locate-library (concat library \&quot;.el.gz\&quot;)
                                                   t path)
+                                  (locate-library (concat library \&quot;.el.bz2\&quot;)
+                                                  t path)
                                   (locate-library (concat library \&quot;.gz\&quot;)
+                                                  t path)
+                                  (locate-library (concat library \&quot;.bz2\&quot;)
                                                   t path)))))))
       (if (not filename)
          (error \&quot;The library `%s\' is not in the path\&quot; library))


(There is also a second part of the patch to make loading bzipped2 libs possible.)