Some typo or w/e made me break everything. Seems to be fine now.

1 files changed, 9 insertions, 16 deletions

diff --git a/feebleline.el b/feebleline.el
index e15718b..eb59975 100644
--- a/feebleline.el
+++ b/feebleline.el
@@ -81,22 +81,15 @@
 
 ;; Note: ugly parentheses, for the simple reason that it makes it easier to
 ;; transpose, add and comment out lines.
-(defvar feebleline-mode-line-text
-  "Each element is a list with the following format:
-
-    (FORMAT-STRING FORMAT-ARGS PROPS)
-
-FORMAT-STRING will be used as the first argument to `format', and
-FORMAT-ARGS (a list) will be expanded as the rest of `format'
-arguments.  If PROPS is given, it should be a list which will be
-sent to `add-text-properties'.")
-  '(
-    ("%7s"      ((format "%s,%s" (format-mode-line "%l") (current-column))))
-    (" : %s"    ((if (buffer-file-name) (buffer-file-name)
-                   (buffer-name))) (face feebleline-bufname-face))
-    ("%s"       ((if (and (buffer-file-name) (buffer-modified-p)) "*" "" )) (face feebleline-asterisk-face))
-    (" | %s"    ((feebleline-previous-buffer-name)) (face feebleline-previous-buffer-face))
-    )
+(defvar feebleline-mode-line-text)
+(setq feebleline-mode-line-text
+      '(
+        ("%7s"      ((format "%s,%s" (format-mode-line "%l") (current-column))))
+        (" : %s"    ((if (buffer-file-name) (buffer-file-name)
+                       (buffer-name))) (face feebleline-bufname-face))
+        ("%s"       ((if (and (buffer-file-name) (buffer-modified-p)) "*" "" )) (face feebleline-asterisk-face))
+        (" | %s"    ((feebleline-previous-buffer-name)) (face feebleline-previous-buffer-face))
+        ))
 
 (defun feebleline-default-settings ()
   "Some default settings that works well with feebleline."