Mercurial > hg > xemacs-beta

comparison lisp/package-get.el @ 434:9d177e8d4150 r21-2-25

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r21-2-25
author cvs
date Mon, 13 Aug 2007 11:30:53 +0200
parents a5df635868b2
children 8de8e3f6228a
comparison
equal deleted inserted replaced
433:892ca416f0fb 434:9d177e8d4150
369 (with-temp-buffer 369 (with-temp-buffer
370 (insert-file-contents-literally location) 370 (insert-file-contents-literally location)
371 (md5 (current-buffer))))) 371 (md5 (current-buffer)))))
372 (unless (and location (file-writable-p location)) 372 (unless (and location (file-writable-p location))
373 (setq location package-get-user-index-filename)) 373 (setq location package-get-user-index-filename))
374 (when (y-or-n-p (concat "Update package index in" location "? ")) 374 (when (y-or-n-p (concat "Update package index in " location "? "))
375 (write-file location)))))) 375 (write-file location))))))
376 376
377 377
378 ;;;###autoload 378 ;;;###autoload
379 (defun package-get-update-base (&optional db-file force-current) 379 (defun package-get-update-base (&optional db-file force-current)