gnu: python-efl: Use regex to delete cythonized files.
authorEfraim Flashner <efraim@flashner.co.il>
Tue, 1 Sep 2020 12:40:03 +0000 (15:40 +0300)
committerEfraim Flashner <efraim@flashner.co.il>
Tue, 1 Sep 2020 12:46:53 +0000 (15:46 +0300)
* gnu/packages/enlightenment.scm (python-efl)[source]: Adjust snippet to
delete cythonized files based on a regex pattern.

gnu/packages/enlightenment.scm

index cb72f3b..16e9dcb 100644 (file)
@@ -402,13 +402,15 @@ embedded systems.")
         (modules '((guix build utils)))
         ;; Remove files generated by Cython
         (snippet
-          '(begin
-             (copy-file "efl/dbus_mainloop/e_dbus.c" "efl/dbus_mainloop/e_dbus.q")
-             (for-each delete-file (find-files "efl" ".*\\.c$"))
-             (delete-file "efl/eo/efl.eo_api.h")
-             (copy-file "efl/dbus_mainloop/e_dbus.q" "efl/dbus_mainloop/e_dbus.c")
-             (delete-file "efl/dbus_mainloop/e_dbus.q")
-             #t))))
+         '(begin
+            (for-each (lambda (file)
+                        (let ((generated-file
+                                (string-append (string-drop-right file 3) "c")))
+                          (when (file-exists? generated-file)
+                            (delete-file generated-file))))
+                      (find-files "efl" "\\.pyx$"))
+            (delete-file "efl/eo/efl.eo_api.h")
+            #t))))
     (build-system python-build-system)
     (arguments
      '(#:phases