[PATCH for 21.[12]] Re: Can't install packages produced on WindowsNT

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&gt; * 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