diff --git a/lisp/ob-awk.el b/lisp/ob-awk.el
index 0429fc79d..b3d4e284e 100644
--- a/lisp/ob-awk.el
+++ b/lisp/ob-awk.el
@@ -66,14 +66,14 @@ called by `org-babel-execute-src-block'"
 			 (insert (org-babel-awk-var-to-awk res)))
 		       tmp))))
          (cmd (mapconcat #'identity
-			 (apply #'append
-				(list org-babel-awk-command
-				      "-f" code-file cmd-line)
-				(mapcar (lambda (pair)
-					  (format "-v %s=%s"
-						  (cadr pair) (cddr pair)))
-					(org-babel-get-header params :var))
-				(list in-file))
+			 (append
+			  (list org-babel-awk-command
+				"-f" code-file cmd-line)
+			  (mapcar (lambda (pair)
+				    (format "-v %s=%s"
+					    (cadr pair) (cddr pair)))
+				  (org-babel-get-header params :var))
+			  (list in-file))
 			 " ")))
     (org-babel-reassemble-table
      (let ((results
diff --git a/testing/lisp/test-ob-awk.el b/testing/lisp/test-ob-awk.el
index 0dec22604..354610868 100644
--- a/testing/lisp/test-ob-awk.el
+++ b/testing/lisp/test-ob-awk.el
@@ -29,13 +29,13 @@
     (org-babel-next-src-block)
     (should (= 42 (org-babel-execute-src-block)))))
 
-(ert-deftest ob-awk/input-src-block ()
+(ert-deftest ob-awk/input-src-block-1 ()
   "Test a code block as an input"
   (org-test-at-id "9e998b2a-3581-43fe-b26d-07d3c507b86a"
     (org-babel-next-src-block 2)
     (should (= 43 (org-babel-execute-src-block)))))
 
-(ert-deftest ob-awk/input-src-block ()
+(ert-deftest ob-awk/input-src-block-2 ()
   "Test a code block as an input"
   (org-test-at-id "9e998b2a-3581-43fe-b26d-07d3c507b86a"
     (org-babel-next-src-block 3)