>>>> "APA" == Adrian Aichner
<aichner(a)ecf.teradyne.com> writes:
APA> I'm working on a patch for lisp\package-info.el now.
Following patch was generated against 21.1 CVS as of today.
It applied fine to 21.2 CVS as of today.
This allows me to install XEmacs packages under WindowsNT which I
build under WindowsNT.
It removes the dependance on the extrnal program md5sum.
I will apply this to 21.2 if noone vetos or applies the patch by tuesday.
Best regards,
Adrian
lisp/ChangeLog:
2000-03-26 Adrian Aichner <aichner(a)ecf.teradyne.com>
* package-info.el (pi-md5sum): Calculate MD5 sum just like
`package-get' does in package-get.el, instead of using external
"md5sum" program.
Patch:
cd d:\tmp\21.1\xemacs\
cvs diff lisp/package-info.el
Compilation started at Sun Mar 26 15:13:15 2000 +0200 (W. Europe Daylight Time)
Index: lisp/package-info.el
===================================================================
RCS file: /usr/CVSroot/XEmacs/xemacs/lisp/package-info.el,v
retrieving revision 1.4
diff -u -r1.4 package-info.el
--- package-info.el 1998/01/25 09:54:45 1.4
+++ package-info.el 2000/03/26 13:13:44
@@ -48,12 +48,14 @@
; (setq result (md5 (current-buffer))))
; result))
+;;; APA: Stolen from package-get in package-get.el
+;;; Does this still lose under Mule?
+;;; Will package-get lose too?
(defun pi-md5sum (file)
(with-temp-buffer
- (call-process "md5sum" file t)
- (goto-char (point-min))
- (looking-at "[a-z0-9]+")
- (buffer-substring (match-beginning 0) (match-end 0))))
+ (let (file-name-handler-alist)
+ (insert-file-contents-internal file)
+ (md5 (current-buffer)))))
(defun pi-update-key (key value)
(save-excursion
Compilation exited abnormally with code 1 at Sun Mar 26 15:13:21