compile: gw-persson: Simplify.
authorRicardo Wurmus <rekado@elephly.net>
Tue, 4 Jun 2019 10:43:35 +0000 (12:43 +0200)
committerRicardo Wurmus <rekado@elephly.net>
Tue, 4 Jun 2019 10:43:35 +0000 (12:43 +0200)
* modules/language/python/compile.scm (gw-persson): Use "and" instead
of "if".

modules/language/python/compile.scm

index 54b6f5b..d6eb07d 100644 (file)
@@ -249,10 +249,9 @@ empty list."
 (define (pre) (warn "Patching guile will lead to way better experience use 'python.patch' on guile-2.2 e.g. (use-modules (language python guilemod))"))
 
 (define (gw-persson x l)
-  (if (or (member x (fluid-ref (@@ (system base message) %dont-warn-list)))
-          (member x l))
-      x
-      #f))
+  (and (or (member x (fluid-ref (@@ (system base message) %dont-warn-list)))
+           (member x l))
+       x))
 
 (define (dont-warn v)
   (catch #t