~ruther/guix-local

dfd1d5edf6f4980a99e501a255ee928285a37ff5 — Ludovic Courtès 11 years ago b36fcf9
guix package: Remove leftover internal procedure.

Reported by Alex Kost <alezost@gmail.com>.

* guix/scripts/package.scm (guix-package)[process-actions]: Remove
  'same-package?'.
1 files changed, 0 insertions(+), 6 deletions(-)

M guix/scripts/package.scm
M guix/scripts/package.scm => guix/scripts/package.scm +0 -6
@@ 796,12 796,6 @@ more information.~%"))
    (define dry-run? (assoc-ref opts 'dry-run?))
    (define profile  (assoc-ref opts 'profile))

    (define (same-package? entry name output)
      (match entry
        (($ <manifest-entry> entry-name _ entry-output _ ...)
         (and (equal? name entry-name)
              (equal? output entry-output)))))

    (define current-generation-number
      (generation-number profile))