procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Update to Org 9.7.9

Browse source
This commit is contained in:
Kyle Meyer 2024-07-26 23:58:01 -04:00
parent 1ae2f00447
commit 88e1ec22f2
3 changed files with 9 additions and 6 deletions
Download patch file Download diff file Expand all files Collapse all files

2
etc/refcards/orgcard.tex
View file

@ -1,5 +1,5 @@
% Reference Card for Org Mode % Reference Card for Org Mode
\def\orgversionnumber{9.7.8} \def\orgversionnumber{9.7.9}
\def\versionyear{2024} % latest update \def\versionyear{2024} % latest update
\input emacsver.tex \input emacsver.tex

4
lisp/org/org-version.el
View file

@ -5,13 +5,13 @@
(defun org-release () (defun org-release ()
"The release version of Org. "The release version of Org.
Inserted by installing Org mode or when a release is made." Inserted by installing Org mode or when a release is made."
(let ((org-release "9.7.8")) (let ((org-release "9.7.9"))
org-release)) org-release))
;;;###autoload ;;;###autoload
(defun org-git-version () (defun org-git-version ()
"The Git version of Org mode. "The Git version of Org mode.
Inserted by installing Org or when a release is made." Inserted by installing Org or when a release is made."
(let ((org-git-version "release_9.7.8-5-gfdf0e0")) (let ((org-git-version "release_9.7.9"))
org-git-version)) org-git-version))
(provide 'org-version) (provide 'org-version)

9
lisp/org/org.el
View file

@ -9,7 +9,7 @@
;; URL: https://orgmode.org ;; URL: https://orgmode.org
;; Package-Requires: ((emacs "26.1")) ;; Package-Requires: ((emacs "26.1"))
;; Version: 9.7.8 ;; Version: 9.7.9
;; This file is part of GNU Emacs. ;; This file is part of GNU Emacs.
;; ;;
@ -20818,8 +20818,11 @@ end."
(when (and (not (eq org-yank-image-save-method 'attach)) (when (and (not (eq org-yank-image-save-method 'attach))
(not (file-directory-p org-yank-image-save-method))) (not (file-directory-p org-yank-image-save-method)))
(make-directory org-yank-image-save-method t)) (make-directory org-yank-image-save-method t))
(with-temp-file absname ;; DATA is a raw image. Tell Emacs to write it raw, without
(insert data)) ;; trying to auto-detect the coding system.
(let ((coding-system-for-write 'emacs-internal))
(with-temp-file absname
(insert data)))
(if (null (eq org-yank-image-save-method 'attach)) (if (null (eq org-yank-image-save-method 'attach))
(setq link (org-link-make-string (concat "file:" (file-relative-name absname)))) (setq link (org-link-make-string (concat "file:" (file-relative-name absname))))
(require 'org-attach) (require 'org-attach)