Adrian Aichner <aichner(a)ecf.teradyne.com> writes:
(with-temp-buffer
;; What ever happened to i-f-c-literally
(let (file-name-handler-alist)
(insert-file-contents-internal full-package-filename))
(if (not (string= (md5 (current-buffer))
(package-get-info-prop this-package
'md5sum)))
(error "Package %s does not match md5 checksum" base-filename)))
Do you know how to interpret the i-f-c-literally comment?
Yes. I wrote it. I would have sworn that at the time 21.0.bsomething
my XEmacs did not have that function (but maybe I was confusing it
with find-file-literally, which is indeed gone).
Will this work in an XEmacs without file-coding?
Yes.
I will devise a patch for package-get.el and package-info.el to use
insert-file-contents-literally if nobody objects.
Perfect. However it needs my patch to insert-file-contents-literally
to actually work (currently i-f-c-l does not set the coding system!)
Jan
P.S. If all goes well I can actually apply patches from thursday or
so. I am in the middle of moving.