diff options
Diffstat (limited to 'feebleline.el')
| -rw-r--r-- | feebleline.el | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/feebleline.el b/feebleline.el index 64061f0..eea9a09 100644 --- a/feebleline.el +++ b/feebleline.el @@ -137,9 +137,9 @@ (when (and (buffer-file-name) (buffer-modified-p)) "*")) (defun feebleline-project-name () - "Return projectile project name if exists, otherwise nil." - (unless (string-equal "-" (projectile-project-name)) - (projectile-project-name))) + "Return project name if exists, otherwise nil." + (when (cdr (project-current)) + (file-name-nondirectory (directory-file-name (cdr (project-current)))))) (defmacro feebleline-append-msg-function (&rest b) "Macro for adding B to the feebleline mode-line, at the end." @@ -208,7 +208,7 @@ Returns a pair with desired column and string." (message-truncate-lines t) (max-mini-window-height 1) (right-string (string-join (reverse right))) - (free-space (- (window-width) (length left-string) (length right-string))) + (free-space (- (frame-width) (length left-string) (length right-string))) (padding (make-string (max 0 free-space) ?\ ))) (insert (concat left-string (if right-string (concat padding right-string))))))))) |