From def5a2f567c30fcebc63c3b3abb10a1e78e93283 Mon Sep 17 00:00:00 2001
From: Eric Schulte <schulte.eric@gmail.com>
Date: Fri, 15 Jul 2011 09:31:36 -0600
Subject: [PATCH] test: updated babel tangling test to reflect body-parsing
 change

---
 testing/examples/babel.org     | 6 +++---
 testing/lisp/test-ob-tangle.el | 7 ++-----
 2 files changed, 5 insertions(+), 8 deletions(-)

diff --git a/testing/examples/babel.org b/testing/examples/babel.org
index f36dc3169..d06ea464b 100644
--- a/testing/examples/babel.org
+++ b/testing/examples/babel.org
@@ -227,17 +227,17 @@ an = sign.
 
 ** query all mounted disks
 #+begin_src sh :noweb-ref fullest-disk
-  df \
+  df
 #+end_src
 
 ** strip the header row
 #+begin_src sh :noweb-ref fullest-disk
-  |sed '1d' \
+  |sed '1d'
 #+end_src
 
 ** sort by the percent full
 #+begin_src sh :noweb-ref fullest-disk
-  |awk '{print $5 " " $6}'|sort -n |tail -1 \
+  |awk '{print $5 " " $6}'|sort -n |tail -1
 #+end_src
 
 ** extract the mount point
diff --git a/testing/lisp/test-ob-tangle.el b/testing/lisp/test-ob-tangle.el
index 78737a032..5f0385ef7 100644
--- a/testing/lisp/test-ob-tangle.el
+++ b/testing/lisp/test-ob-tangle.el
@@ -56,11 +56,8 @@
 (ert-deftest ob-tangle/continued-code-blocks-w-noweb-ref ()
   "Test that the :noweb-ref header argument is used correctly."
   (org-test-at-id "54d68d4b-1544-4745-85ab-4f03b3cbd8a0"
-    (let ((tangled "df \\
-|sed '1d' \\
-|awk '{print $5 \" \" $6}'|sort -n |tail -1 \\
-|awk '{print $2}'
-"))
+    (let ((tangled
+	   "df|sed '1d'|awk '{print $5 \" \" $6}'|sort -n |tail -1|awk '{print $2}'"))
       (org-narrow-to-subtree)
       (org-babel-tangle)
       (with-temp-buffer