From 7cc98473241c927a726454f31e3cd98c5742a12f Mon Sep 17 00:00:00 2001
From: Ricardo Wurmus <rekado@elephly.net>
Date: Sun, 15 Jan 2017 12:16:49 +0100
Subject: gnu: tipp10: Adjust phases.

* gnu/packages/education.scm (tipp10)[arguments]: Return #t for
"disable-new-version-check"; fix indentation.
---
 gnu/packages/education.scm | 31 ++++++++++++++++---------------
 1 file changed, 16 insertions(+), 15 deletions(-)

diff --git a/gnu/packages/education.scm b/gnu/packages/education.scm
index 69f5a51f59..5444579059 100644
--- a/gnu/packages/education.scm
+++ b/gnu/packages/education.scm
@@ -161,22 +161,23 @@ (define-public tipp10
        #:phases
        (modify-phases %standard-phases
          (add-after 'unpack 'disable-new-version-check
-          (lambda _
-            ;; Make new version check to default to false.
-            ;; TODO: Remove the checkbox from the dialog and the check itself
-            (substitute* '("widget/settingspages.cpp" "widget/mainwindow.cpp")
-              (("settings.value(\"check_new_version\", true)")
-               "settings.value(\"check_new_version\", false)"))))
+           (lambda _
+             ;; Make new version check to default to false.
+             ;; TODO: Remove the checkbox from the dialog and the check itself
+             (substitute* '("widget/settingspages.cpp" "widget/mainwindow.cpp")
+               (("settings.value(\"check_new_version\", true)")
+                "settings.value(\"check_new_version\", false)"))
+             #t))
          (replace 'configure
-          (lambda* (#:key outputs #:allow-other-keys)
-            (let ((out (assoc-ref outputs "out")))
-              ;; Make program honor $PREFIX
-              (substitute* "tipp10.pro"
-                (("\\.path = /usr/") (string-append ".path = " out "/")))
-              (substitute* "def/defines.h"
-                (("\"/usr/") (string-append "\"" out "/")))
-              ;; Recreate Makefile
-              (zero? (system* "qmake"))))))))
+           (lambda* (#:key outputs #:allow-other-keys)
+             (let ((out (assoc-ref outputs "out")))
+               ;; Make program honor $PREFIX
+               (substitute* "tipp10.pro"
+                 (("\\.path = /usr/") (string-append ".path = " out "/")))
+               (substitute* "def/defines.h"
+                 (("\"/usr/") (string-append "\"" out "/")))
+               ;; Recreate Makefile
+               (zero? (system* "qmake"))))))))
     (inputs
      `(("qt4" ,qt-4)
        ("sqlite" ,sqlite)))
-- 
cgit v1.2.3