初稿: 2018-08-09 Thu 12:52
最終更新日: 2018-12-14 Fri 20:44
ホーム | 文書トップ | 目次

org-current-line

1: (defsubst org-current-line (&optional pos)
2:   (save-excursion
3:     (and pos (goto-char pos))
4:     ;; works also in narrowed buffer, because we start at 1, not point-min
5:     (+ (if (bolp) 1 0) (count-lines 1 (point)))))

日付: 2018-08-09 Thu 12:52

著者: conao

Created: 2018-12-14 Fri 21:04

Validate