]> code.delx.au - gnu-emacs-elpa/commitdiff
Fix last change.
authorChong Yidong <cyd@stupidchicken.com>
Fri, 1 Jul 2011 04:38:17 +0000 (00:38 -0400)
committerChong Yidong <cyd@stupidchicken.com>
Fri, 1 Jul 2011 04:38:17 +0000 (00:38 -0400)
admin/archive-contents.el

index cb2c6466fa0fdfeba3dca08e2912f312df246d1d..6c315ca54a8631641ae1221eee13063fd9a0fb9d 100644 (file)
@@ -71,8 +71,8 @@ Otherwise return nil."
                             (nth 1 exp) file)))
            (push (cons (intern pkg)
                        (vector (version-to-list vers) req (nth 3 exp) 'tar))
-                 packages))
-         (rename-file file (concat pkg "-" vers)))
+                 packages)
+           (rename-file file (concat pkg "-" vers))))
         ;; Simple package
         ((string-match "\\([^/]+\\)\\.el\\'" file)
          (let* ((pkg (match-string 1 file))