Mercurial > hg > xemacs-beta

comparison lisp/package-info.el @ 237:89ec2bb86eea r20-5b17

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r20-5b17
author cvs
date Mon, 13 Aug 2007 10:15:03 +0200
parents 85a06df23a9a
children f955c73f5258
comparison
equal deleted inserted replaced
236:78d3ccccee6d 237:89ec2bb86eea
73 (filename (nth 1 command-line-args-left))) 73 (filename (nth 1 command-line-args-left)))
74 (find-file package-info) 74 (find-file package-info)
75 (erase-buffer) 75 (erase-buffer)
76 (insert-file-contents-literally package-info-template) 76 (insert-file-contents-literally package-info-template)
77 (goto-char (point-min)) 77 (goto-char (point-min))
78 (pi-update-key "VERSION" version) 78 (pi-update-key "VERSION" (format "\"%s\"" version))
79 (pi-update-key "MD5SUM" (format "\"%s\"" 79 (pi-update-key "MD5SUM" (format "\"%s\""
80 (pi-md5sum filename))) 80 (pi-md5sum filename)))
81 (pi-update-key "FILENAME" (format "\"%s\"" 81 (pi-update-key "FILENAME" (format "\"%s\""
82 (file-name-nondirectory filename))) 82 (file-name-nondirectory filename)))
83 (pi-update-key "SIZE" (format "%d" 83 (pi-update-key "SIZE" (format "%d"