(define-module (radix packages linux)
  #:use-module (guix packages)
  #:use-module (guix gexp)
  #:use-module (gnu packages linux)
  #:export (thinkfan-next))

(define thinkfan-next
  (package
   (inherit thinkfan)
   (arguments
    (list #:modules '((guix build cmake-build-system)
                      (guix build utils)
                      (srfi srfi-26))
          #:tests? #f
          #:configure-flags
          #|Enable reading temperatures from hard disks via S.M.A.R.T.|#
          #~(list "-DUSE_ATASMART:BOOL=ON")
          #:phases
          #~(modify-phases %standard-phases
              (add-after 'unpack 'create-init-scripts
                #|Don't even verify for the presence of SystemD or OpenRC|#
                (lambda _
                  (substitute* "CMakeLists.txt"
                    (("pkg_check_modules\\((SYSTEMD|OPENRC).*" _) "")
                    #|Fix the destinations|#
                    (("/etc" directory) (string-append #$output directory))))))))))