diff options
Diffstat (limited to 'modules/language/python/module/re.scm')
-rw-r--r-- | modules/language/python/module/re.scm | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/modules/language/python/module/re.scm b/modules/language/python/module/re.scm index 3b8f8af..bf44d13 100644 --- a/modules/language/python/module/re.scm +++ b/modules/language/python/module/re.scm @@ -4,6 +4,7 @@ #:use-module (language python list) #:use-module (language python dict) #:use-module (language python try) + #:use-module (language python bool) #:use-module (language python exceptions) #:use-module ((language python module _python) #:select (str isinstance range)) #:use-module (language python string) @@ -318,7 +319,7 @@ (car x))) (define (vali x) - (if (eq? x None) + (if (not (bool x)) (list -1 -1) (cdr x))) @@ -357,7 +358,7 @@ (define group (case-lambda ((self nm) - (if (= nm 0) + (if (and (number? nm) (= nm 0)) (group self) (let ((x (py-get (ref self '__t) nm er))) (if (eq? x er) |