diff --git a/lisp/ob-core.el b/lisp/ob-core.el index c995b6ea4..45ecedcc3 100644 --- a/lisp/ob-core.el +++ b/lisp/ob-core.el @@ -2586,7 +2586,7 @@ block but are passed literally to the \"example-block\"." (defun org-babel-read (cell &optional inhibit-lisp-eval) "Convert the string value of CELL to a number if appropriate. Otherwise if cell looks like lisp (meaning it starts with a -\"(\", \"'\", \"`\" or a \"[\") then read it as lisp, +\"(\", \"'\", \"\\=`\" or a \"[\") then read it as lisp, otherwise return it unmodified as a string. Optional argument NO-LISP-EVAL inhibits lisp evaluation for situations in which is it not appropriate." diff --git a/lisp/org-agenda.el b/lisp/org-agenda.el index f5a58b1a8..7e786d5a4 100644 --- a/lisp/org-agenda.el +++ b/lisp/org-agenda.el @@ -5713,7 +5713,7 @@ This function is invoked if `org-agenda-todo-ignore-deadlines', (let ((calendar-date-style 'european) (european-calendar-style t)) (diary-date day month year mark)))) -;; Define the` org-class' function +;; Define the `org-class' function (defun org-class (y1 m1 d1 y2 m2 d2 dayname &rest skip-weeks) "Entry applies if date is between dates on DAYNAME, but skips SKIP-WEEKS. DAYNAME is a number between 0 (Sunday) and 6 (Saturday).