           (propertize (ar/eshell-config--git-branch-prompt)
                       'face 'font-lock-function-name-face)
           " "
-          (propertize (ar/eshell-config--prompt-char) 'face 'eshell-prompt)
+          (propertize (if (= (user-uid) 0)
+                          "#"
+                        "$") 'face 'eshell-prompt)
           ;; needed for the input text to not have prompt face
           (propertize " " 'face 'default)))
 

(require 'validate)
(require 'iimage)
(require 'cl-lib)

(defun ar/eshell-config--prompt-char ()
  "Return shell config character, based on current OX. For example, an  for MacOS."
  (let ((os-char (cond ((string-equal system-type "darwin") "")
                       ((string-equal system-type "gnu/linux") "🐧")
                       (t "?"))))
    (format "%s %s" os-char (if (= (user-uid) 0)
                                "#"
                              "$"))))

(defun ar/eshell-config--shrinked-dpath ()
  "Shrinked current directory path."


(defalias 'eshell/e 'eshell/emacs)
(defalias 'eshell/ec 'eshell/emacs)

(validate-setq eshell-prompt-function #'ar/eshell-config--prompt-function)

