From 47dd531f0442d1e3e523bc3d4f0574987ed93f04 Mon Sep 17 00:00:00 2001
From: Matthew Butterick <mb@mbtype.com>
Date: Mon, 17 Mar 2014 07:57:37 -0700
Subject: [PATCH] remove white space

---
 decode.rkt | 2 --
 1 file changed, 2 deletions(-)

diff --git a/decode.rkt b/decode.rkt
index ee6319f..876f8a2 100644
--- a/decode.rkt
+++ b/decode.rkt
@@ -29,7 +29,6 @@
                                  #:symbol-proc [symbol-proc (λ(x)x)]
                                  #:valid-char-proc [valid-char-proc (λ(x)x)]
                                  #:cdata-proc [cdata-proc (λ(x)x)]
-                                 
                                  #:exclude-tags [excluded-tags '()])
   ((xexpr/c)  
    (#:txexpr-tag-proc (txexpr-tag? . -> . txexpr-tag?)
@@ -49,7 +48,6 @@
       [(txexpr? x) (let-values([(tag attrs elements) (txexpr->values x)]) 
                      (if (member tag excluded-tags)    
                          x ; because it's excluded
-                         
                          ;; we apply processing here rather than do recursive descent on the pieces
                          ;; because if we send them back through loop, certain element types are ambiguous
                          ;; e.g., ((p "foo")) tests out as both txexpr-attrs and txexpr-elements