update of packages
This commit is contained in:
@@ -1,6 +1,6 @@
|
||||
;;; org-footnote.el --- Footnote support in Org -*- lexical-binding: t; -*-
|
||||
;;
|
||||
;; Copyright (C) 2009-2022 Free Software Foundation, Inc.
|
||||
;; Copyright (C) 2009-2023 Free Software Foundation, Inc.
|
||||
;;
|
||||
;; Author: Carsten Dominik <carsten.dominik@gmail.com>
|
||||
;; Keywords: outlines, hypermedia, calendar, wp
|
||||
@@ -851,9 +851,12 @@ to `org-footnote-section'. Inline definitions are ignored."
|
||||
(format "[fn:%s] DEFINITION NOT FOUND." label))
|
||||
"\n"))))
|
||||
;; Insert un-referenced footnote definitions at the end.
|
||||
(pcase-dolist (`(,label . ,definition) definitions)
|
||||
(unless (member label inserted)
|
||||
(insert "\n" definition "\n")))))))))
|
||||
;; Combine all insertions into one to create a single cache
|
||||
;; update call.
|
||||
(org-combine-change-calls (point) (point)
|
||||
(pcase-dolist (`(,label . ,definition) definitions)
|
||||
(unless (member label inserted)
|
||||
(insert "\n" definition "\n"))))))))))
|
||||
|
||||
(defun org-footnote-normalize ()
|
||||
"Turn every footnote in buffer into a numbered one."
|
||||
|
||||
Reference in New Issue
Block a user