diff --git a/lisp/org.el b/lisp/org.el
index 5a67482ef..9c1b1b293 100644
--- a/lisp/org.el
+++ b/lisp/org.el
@@ -4030,7 +4030,7 @@ means to push this value onto the list in the variable.")
 			  (re-search-forward re nil t)))
 	    (setq key (upcase (match-string 1 ext-setup-or-nil))
 		  value (org-match-string-no-properties 2 ext-setup-or-nil))
-	    (if stringp value (setq value (org-trim value)))
+	    (if (stringp value) (setq value (org-trim value)))
 	    (cond
 	     ((equal key "CATEGORY")
 	      (setq cat value))