update of packages

lisp/org/ol.el

@@ -1,6 +1,6 @@
 ;;; ol.el --- Org links library                      -*- lexical-binding: t; -*-
 
-;; Copyright (C) 2018-2022 Free Software Foundation, Inc.
+;; Copyright (C) 2018-2023 Free Software Foundation, Inc.
 
 ;; Author: Carsten Dominik <carsten.dominik@gmail.com>
 ;; Keywords: outlines, hypermedia, calendar, wp
@@ -150,7 +150,7 @@ link.
   called with two arguments: the link location (a string such as
   \"~/foobar\", \"id:some-org-id\" or \"https://www.foo.com\")
   and the description generated by `org-insert-link'.  It should
-  return the description to use (this reflects the behaviour of
+  return the description to use (this reflects the behavior of
   `org-link-make-description-function').  If it returns nil, no
   default description is used, but no error is thrown (from the
   user's perspective, this is equivalent to a default description
@@ -1488,9 +1488,9 @@ If the link is in hidden text, expose it."
 
 (defun org-link-descriptive-ensure ()
   "Toggle the literal or descriptive display of links in current buffer if needed."
-  (if org-link-descriptive
-      (org-fold-core-set-folding-spec-property (car org-link--link-folding-spec) :visible nil)
-    (org-fold-core-set-folding-spec-property (car org-link--link-folding-spec) :visible t)))
+  (org-fold-core-set-folding-spec-property
+   (car org-link--link-folding-spec)
+   :visible (not org-link-descriptive)))
 
 ;;;###autoload
 (defun org-toggle-link-display ()