From 6c41f03042bc62afd9076377a5d4faeabd4bced8 Mon Sep 17 00:00:00 2001
From: Joel Holdbrooks <cjholdbrooks@gmail.com>
Date: Thu, 15 Aug 2013 14:53:30 -0700
Subject: [PATCH] Refactor escape

---
 src/clj/frak.clj | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/src/clj/frak.clj b/src/clj/frak.clj
index 3179719..8de473e 100644
--- a/src/clj/frak.clj
+++ b/src/clj/frak.clj
@@ -48,8 +48,8 @@
 
 (def ^:private escape-char? escape-chars)
 
-(defn escape [c]
-  (if (escape-char? c) (str "\\" c) (str c)))
+(defn- escape [c]
+  (str (when (escape-char? c) "\\") c))
 
 (def ^{:private true :dynamic true} *capture* false)
 
-- 
2.25.1