Evaluate eshell-info-banner-path-separator on compile
This commit is contained in:
parent
89d2b7226b
commit
d4033120c1
@ -2,7 +2,7 @@
|
|||||||
|
|
||||||
;; Author: Lucien Cartier-Tilet <lucien@phundrak.com>
|
;; Author: Lucien Cartier-Tilet <lucien@phundrak.com>
|
||||||
;; Maintainer: Lucien Cartier-Tilet <lucien@phundrak.com>
|
;; Maintainer: Lucien Cartier-Tilet <lucien@phundrak.com>
|
||||||
;; Version: 0.8.5
|
;; Version: 0.8.6
|
||||||
;; Package-Requires: ((emacs "25.1") (s "1"))
|
;; Package-Requires: ((emacs "25.1") (s "1"))
|
||||||
;; Homepage: https://github.com/Phundrak/eshell-info-banner.el
|
;; Homepage: https://github.com/Phundrak/eshell-info-banner.el
|
||||||
|
|
||||||
@ -60,9 +60,10 @@
|
|||||||
; Constants ;
|
; Constants ;
|
||||||
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
||||||
|
|
||||||
(defconst eshell-info-banner-path-separator
|
(eval-when-compile
|
||||||
(substring-no-properties (file-relative-name (expand-file-name "x" "y")) 1 2)
|
(defconst eshell-info-banner-path-separator
|
||||||
"File separator used by the current operating system.")
|
(substring-no-properties (file-relative-name (expand-file-name "x" "y")) 1 2)
|
||||||
|
"File separator used by the current operating system."))
|
||||||
|
|
||||||
(defconst eshell-info-banner--min-length-left 8
|
(defconst eshell-info-banner--min-length-left 8
|
||||||
"Minimum length of text on the left hand side of the banner.")
|
"Minimum length of text on the left hand side of the banner.")
|
||||||
|
Loading…
Reference in New Issue
Block a user