From 096ecc9e24f42767b406d01525199d5e74d87804 Mon Sep 17 00:00:00 2001 From: Ihor Radchenko Date: Fri, 12 Apr 2024 09:53:47 +0300 Subject: [PATCH 1/2] Update version number for the 9.6.26 release --- lisp/org.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lisp/org.el b/lisp/org.el index 66dc03044..f6befb635 100644 --- a/lisp/org.el +++ b/lisp/org.el @@ -9,7 +9,7 @@ ;; URL: https://orgmode.org ;; Package-Requires: ((emacs "26.1")) -;; Version: 9.6.25 +;; Version: 9.6.26 ;; This file is part of GNU Emacs. ;; From 5128460f9402b98ff503ef40bc8840555bab506d Mon Sep 17 00:00:00 2001 From: Lei Zhe Date: Fri, 5 Apr 2024 22:07:12 +0800 Subject: [PATCH 2/2] org-table-header-line-mode: Fix when cursor is outside table * lisp/org-table.el (org-table-header-set-header): Display table header even when the point is below the table, as long as the table is visible at the top of the window. --- lisp/org-table.el | 5 +++++ 1 file changed, 5 insertions(+) diff --git a/lisp/org-table.el b/lisp/org-table.el index 92490f9f6..2e438792b 100644 --- a/lisp/org-table.el +++ b/lisp/org-table.el @@ -487,6 +487,11 @@ This may be useful when columns have been shrunk." (delete-overlay org-table-header-overlay)) (let* ((ws (window-start)) (beg (save-excursion + ;; Check table at window start, not at point. + ;; Point might be after the table, or at + ;; another table located below the one visible + ;; on top. + (goto-char ws) (goto-char (org-table-begin)) (while (or (org-at-table-hline-p) (looking-at-p ".*|\\s-+<[rcl]?\\([0-9]+\\)?>"))