org-test: Small code clean-up

* testing/org-test.el (org-test-with-temp-text): Clean-up code.

testing/org-test.el

@@ -208,13 +208,13 @@ otherwise place the point at the beginning of the inserted text."
   `(let ((inside-text (if (stringp ,text) ,text (eval ,text))))
      (with-temp-buffer
        (org-mode)
-       (let ((point (string-match (regexp-quote "<point>") inside-text)))
+       (let ((point (string-match "<point>" inside-text)))
 	 (if point
 	     (progn
 	       (insert (replace-match "" nil nil inside-text))
 	       (goto-char (1+ (match-beginning 0))))
-	   (progn (insert inside-text)
-		  (goto-char (point-min)))))
+	   (insert inside-text)
+	   (goto-char (point-min))))
        ,@body)))
 (def-edebug-spec org-test-with-temp-text (form body))