From 0419f1ba9252fd02b14a5f0243dd62c88fbb1717 Mon Sep 17 00:00:00 2001
From: Tom Willemse
Date: Sun, 26 Jan 2014 01:49:36 +0100
Subject: Make the leading space optional

The first time eshell starts it won't yet have printed such a space.
---
 eshell-fringe-status.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/eshell-fringe-status.el b/eshell-fringe-status.el
index 56f58fb..5cde3a8 100644
--- a/eshell-fringe-status.el
+++ b/eshell-fringe-status.el
@@ -71,7 +71,7 @@ which doesn't accept at least one space will break."
   (let ((first (aref eshell-prompt-regexp 0)))
     (when (eql first ?^)
       (setq eshell-prompt-regexp
-            (format "%c %s" first (substring eshell-prompt-regexp 1))))))
+            (format "%c ?%s" first (substring eshell-prompt-regexp 1))))))
 
 (defun efs--revert-prompt-regexp ()
   "The counterpart for `efs--extend-prompt-regexp', remove a space.
@@ -83,7 +83,7 @@ disabling the mode."
     (when (and (eql first ?^)
                (eql (aref eshell-prompt-regexp 1) ?\s))
       (setq eshell-prompt-regexp
-            (format "%c%s" first (substring eshell-prompt-regexp 2))))))
+            (format "%c%s" first (substring eshell-prompt-regexp 3))))))
 
 (defun eshell-fringe-status ()
   "Display an indication of the last command's exit status.
-- 
cgit v1.2.3-54-g00ecf