diff options
author | Case Duckworth | 2021-09-28 10:01:38 -0500 |
---|---|---|
committer | Case Duckworth | 2021-09-28 10:01:38 -0500 |
commit | 0508ae9e42e781928a755a8d8a11513dfcbf0ae4 (patch) | |
tree | b05777bd7775d6b278139422eecaa2897f13cb66 /lisp | |
parent | Install super-save-mode (diff) | |
download | emacs-0508ae9e42e781928a755a8d8a11513dfcbf0ae4.tar.gz emacs-0508ae9e42e781928a755a8d8a11513dfcbf0ae4.zip |
Ignore blank lines when counting words stupidly
Diffstat (limited to 'lisp')
-rw-r--r-- | lisp/acdw-org.el | 3 |
1 files changed, 3 insertions, 0 deletions
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 |