diff options
author | Ihor Radchenko <yantar92@posteo.net> | 2024-01-23 20:12:37 +0100 |
---|---|---|
committer | Ihor Radchenko <yantar92@posteo.net> | 2024-01-23 20:12:37 +0100 |
commit | 8ce9a426dfa2a42884f6b4ef926c3d0550df244b (patch) | |
tree | a8e70219e60a1328764a96021bc4e07546f2f847 | |
parent | 37b38252545f9bd02406690c567109c1a098034d (diff) |
lisp/org-invoice.el: Fix compiler warning
* lisp/org-invoice.el (org-invoice-report): Use non-obsolete function
name when available.
-rw-r--r-- | lisp/org-invoice.el | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/org-invoice.el b/lisp/org-invoice.el index 1d34e5e..9a845e7 100644 --- a/lisp/org-invoice.el +++ b/lisp/org-invoice.el @@ -387,7 +387,9 @@ I place mine under a third-level heading like so: (let ((report (org-invoice-in-report-p))) (when (and (not report) jump) (when (re-search-forward "^#\\+BEGIN:[ \t]+invoice" nil t) - (org-show-entry) + (if (fboundp 'org-fold-show-entry) + (org-fold-show-entry) + (with-no-warnings (org-show-entry))) (beginning-of-line) (setq report (point)))) (if report (goto-char report) |