1 files changed, 14 insertions, 12 deletions
diff --git a/packages/komodo/strong-type.scm b/packages/komodo/strong-type.scm
index 9961234..aca04e2 100644
--- a/packages/komodo/strong-type.scm
+++ b/packages/komodo/strong-type.scm
@@ -1,5 +1,7 @@
 (define-module (strong-type)
-  #:use-module (guix build-system cmake)
+  ;; #:use-module (guix build utils)
+  #:use-module (guix build-system copy)
+  ;; #:use-module (guix build-system cmake)
   #:use-module (guix git-download)
   #:use-module ((guix licenses)
 		#:prefix license:)
@@ -9,6 +11,10 @@
 
 (define git-extension ".git")
 
+(define installation-source "../source")
+
+(define installation-target ".")
+
 (define strong-type-description-lines
   (list "This tiny library provides a way to wrap an existing type in order to "
 	"give it additional meaning."))
@@ -22,27 +28,24 @@
 (define strong-type-synopsis-lines
   (list "C++ implementation of strong types"))
 
-(define strong-type-tests #f)
-
 (define strong-type-version "1.0.3")
 
 ;; ABSTRACTION LAYER -2
 
-(define delete-install-phase
-  `(delete 'install))
+(define install-everything
+  `(list ,installation-source ,installation-target))
 
 (define strong-type-git
   (string-append strong-type-github git-extension))
 
 ;; ABSTRACTION LAYER -1
 
+(define install-plan
+  `(list ,install-everything))
+
 (define strong-type-content-hash
   (content-hash (base32 strong-type-hash)))
 
-(define strong-type-phases
-  `(modify-phases %standard-phases
-		  ,delete-install-phase))
-
 (define strong-type-git-reference
   (git-reference (url strong-type-git)
 		 (commit strong-type-version)))
@@ -50,8 +53,7 @@
 ;; ABSTRACTION LAYER -0
 
 (define get-strong-type-arguments
-  (list #:phases strong-type-phases
-	#:tests? strong-type-tests))
+  (list #:install-plan install-plan))
 
 (define get-strong-type-description
   (string-concatenate strong-type-description-lines))
@@ -76,7 +78,7 @@
   (package (name get-strong-type-name)
 	   (version get-strong-type-version)
 	   (source get-strong-type-origin)
-	   (build-system cmake-build-system)
+	   (build-system copy-build-system)
 	   (arguments get-strong-type-arguments)
 	   (synopsis get-strong-type-synopsis)
 	   (description get-strong-type-description)