diff options
-rw-r--r-- | init.el | 11 | ||||
-rw-r--r-- | lisp/acdw-org.el | 3 |
2 files changed, 10 insertions, 4 deletions
diff --git a/init.el b/init.el index 94d3aa5..11c9e71 100644 --- a/init.el +++ b/init.el | |||
@@ -2117,23 +2117,26 @@ the default is \"/\"." | |||
2117 | minions) | 2117 | minions) |
2118 | (:also-load acdw-modeline) | 2118 | (:also-load acdw-modeline) |
2119 | (:option simple-modeline-segments | 2119 | (:option simple-modeline-segments |
2120 | ;; Yeah this is laid out like poo. It's so I can easily change | ||
2121 | ;; things around if need be. | ||
2120 | '((;; left | 2122 | '((;; left |
2121 | acdw-modeline/winum | 2123 | acdw-modeline/winum |
2122 | acdw-modeline/modified | 2124 | acdw-modeline/modified |
2123 | acdw-modeline/buffer-name | 2125 | acdw-modeline/buffer-name |
2124 | acdw-modeline/vc-branch | 2126 | acdw-modeline/vc-branch |
2125 | acdw-modeline/position) | 2127 | acdw-modeline/position |
2126 | (;; right | 2128 | acdw-modeline/wc |
2129 | ) (;; right | ||
2127 | acdw-modeline/track | 2130 | acdw-modeline/track |
2128 | simple-modeline-segment-misc-info | 2131 | simple-modeline-segment-misc-info |
2129 | acdw-modeline/wc | ||
2130 | acdw-modeline/text-scale | 2132 | acdw-modeline/text-scale |
2131 | simple-modeline-segment-process | 2133 | simple-modeline-segment-process |
2132 | acdw-modeline/god-mode-indicator | 2134 | acdw-modeline/god-mode-indicator |
2133 | acdw-modeline/minions | 2135 | acdw-modeline/minions |
2134 | acdw-modeline/reading-mode | 2136 | acdw-modeline/reading-mode |
2135 | acdw-modeline/narrowed | 2137 | acdw-modeline/narrowed |
2136 | acdw-modeline/major-mode))) | 2138 | acdw-modeline/major-mode |
2139 | ))) | ||
2137 | 2140 | ||
2138 | (:option tab-bar-mode t | 2141 | (:option tab-bar-mode t |
2139 | tab-bar-show 1) | 2142 | tab-bar-show 1) |
diff --git a/lisp/acdw-org.el b/lisp/acdw-org.el index f210301..96f3f69 100644 --- a/lisp/acdw-org.el +++ b/lisp/acdw-org.el | |||
@@ -317,6 +317,9 @@ instead of the true count." | |||
317 | (goto-char (match-end 0))) | 317 | (goto-char (match-end 0))) |
318 | ;; Ignore source blocks | 318 | ;; Ignore source blocks |
319 | ((org-in-src-block-p) (forward-line)) | 319 | ((org-in-src-block-p) (forward-line)) |
320 | ;; Ignore blank lines | ||
321 | ((looking-at "^$") | ||
322 | (forward-line)) | ||
320 | ;; Count everything else | 323 | ;; Count everything else |
321 | (t | 324 | (t |
322 | ;; ... unless it's in a few weird contexts | 325 | ;; ... unless it's in a few weird contexts |