summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorRicardo Wurmus <rekado@elephly.net>2019-06-04 11:39:20 +0200
committerRicardo Wurmus <rekado@elephly.net>2019-06-04 11:39:20 +0200
commitef48b81adea8119985e66c36f1ac7d4570ad6922 (patch)
tree084e70366d0cdc6a88d932ae5e7598ce384a158f
parentd8eca15c63651e4c6014f4b91acd9589fb784cce (diff)
compile: get-doc: Simplify.
* modules/language/python/compile.scm (get-doc): Simplify.
-rw-r--r--modules/language/python/compile.scm4
1 files changed, 1 insertions, 3 deletions
diff --git a/modules/language/python/compile.scm b/modules/language/python/compile.scm
index efb98a2..c52905b 100644
--- a/modules/language/python/compile.scm
+++ b/modules/language/python/compile.scm
@@ -988,9 +988,7 @@ empty list."
(define *doc* (make-fluid #f))
(define (get-doc)
- (aif it (fluid-ref *doc*)
- it
- ""))
+ (or (fluid-ref *doc*) ""))
(define set-doc
(case-lambda
(() (fluid-set! *doc* #f))