gnu: aegis: Use 'modify-phases'.

* gnu/packages/version-control.scm (aegis)[arguments]: Use 'modify-phases'.

gnu/packages/version-control.scm

@@ -964,8 +964,8 @@ accessed and migrated on modern systems.")
                                "--sharedstatedir=/var/com/aegis")
        #:parallel-build? #f ; There are some nasty racy rules in the Makefile.
        #:phases
-        (alist-cons-before
-         'configure 'pre-conf
+       (modify-phases %standard-phases
+         (add-before 'configure 'pre-conf
            (lambda _
               (substitute* (append '("configure"
                                      "etc/check-tar-gz.sh"
@@ -981,9 +981,8 @@ accessed and migrated on modern systems.")
                                      "libaegis/getpw_cache.cc")
                                    (find-files "test" "\\.sh"))
                            (("/bin/sh") (which "sh")))
-             (setenv "SH" (which "sh")))
-         (alist-replace
-          'check
+              (setenv "SH" (which "sh"))))
+         (replace 'check
            (lambda _
              (let ((home (string-append (getcwd) "/my-new-home")))
                ;; Some tests need to write to $HOME.
@@ -995,8 +994,7 @@ accessed and migrated on modern systems.")
                  (("type lex")  "type flex"))
 
                ;; The author decided to call the check rule "sure".
-              (zero? (system* "make" "sure"))))
-         %standard-phases))))
+               (zero? (system* "make" "sure"))))))))
     (home-page "http://aegis.sourceforge.net")
     (synopsis "Project change supervisor")
     (description "Aegis is a project change supervisor, and performs some of