From 0508ae9e42e781928a755a8d8a11513dfcbf0ae4 Mon Sep 17 00:00:00 2001 From: Case Duckworth Date: Tue, 28 Sep 2021 10:01:38 -0500 Subject: Ignore blank lines when counting words stupidly --- lisp/acdw-org.el | 3 +++ 1 file changed, 3 insertions(+) (limited to 'lisp/acdw-org.el') 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." (goto-char (match-end 0))) ;; Ignore source blocks ((org-in-src-block-p) (forward-line)) + ;; Ignore blank lines + ((looking-at "^$") + (forward-line)) ;; Count everything else (t ;; ... unless it's in a few weird contexts -- cgit 1.4.1-21-gabe81