I wrote about a potential solution to this issue at https://emacs.stackexchange.com/questions/50216/org-mode-code-block-parentheses-mismatch/52209#52209 . You might find a solution that works for you there. John ----------------------------------- Professor John Kitchin Doherty Hall A207F Department of Chemical Engineering Carnegie Mellon University Pittsburgh, PA 15213 412-268-7803 @johnkitchin http://kitchingroup.cheme.cmu.edu On Tue, Oct 29, 2019 at 11:52 AM Vladimir Nikishkin wrote: > > > Remember to cover the basics, that is, what you expected to happen and > what in fact did happen. You don't know how to make a good report? See > > https://orgmode.org/manual/Feedback.html#Feedback > > Your bug report will be posted to the Org mailing list. > ------------------------------------------------------------------------ > > The MWE would be the following: > #+begin_src scheme > (display (< 1 3)) > #+end_src > > In this example, if you put the point on the "<" symbol, it is > highlighted (fontified) together with the ")" following 3, which is > incorrect, since > in general, "<" is not a paired entity. (I.e. is a symbol "less" rather > than an angular bracket.) If you put the point on the first "(", the > notification area claims that "No closing parenthesis found", which is > obviously wrong. > > C-h s has the following lines: > < (> which means: open, matches > > > )< which means: close, matches < > Which seems to be not really correct for anything except noweb references. > > > Emacs : GNU Emacs 26.3 (build 1, x86_64-slackware-linux-gnu, GTK+ Version > 3.24.10) > of 2019-08-30 > Package: Org mode version 9.2.6 (9.2.6-4-ge30905-elpaplus @ > /home/lockywolf/.emacs.d/elpa/org-plus-contrib-20191021/) > > current state: > ============== > (setq > org-src-mode-hook '(org-src-babel-configure-edit-buffer > org-src-mode-configure-edit-buffer) > org-after-todo-state-change-hook '(org-checklist) > org-babel-after-execute-hook '((lambda nil > (if org-inline-image-overlays > (progn (org-redisplay-inline-images))) > ) > ) > org-texinfo-format-headline-function > 'org-texinfo-format-headline-default-function > org-metadown-hook '(org-babel-pop-to-session-maybe) > org-clock-out-hook '(org-clock-remove-empty-clock-drawer) > org-html-format-inlinetask-function > 'org-html-format-inlinetask-default-function > org-pretty-entities t > org-odt-format-headline-function 'org-odt-format-headline-default-function > org-agenda-files '("~/DevLinux/chibi-sicp/index.org" > "~/Personal_Planner/Planner.org") > org-ascii-format-inlinetask-function 'org-ascii-format-inlinetask-default > org-reveal-start-hook '(org-decrypt-entry) > org-modules '(org-habits org-w3m org-bbdb org-bibtex org-docview org-gnus > org-info org-irc > org-mhe org-rmail org-eww) > org-plantuml-jar-path "/usr/local/bin/plantuml.jar" > org-mode-hook '(org-tempo-setup > #[0 "\301\211\207" [imenu-create-index-function > org-imenu-get-tree] 2] > turn-on-org-cdlatex (lambda nil (imenu-add-to-menubar > "Imenu")) > #[0 "\300\301\302\303\304$\207" > [add-hook change-major-mode-hook org-show-all append > local] 5] > #[0 "\300\301\302\303\304$\207" > [add-hook change-major-mode-hook > org-babel-show-result-all append local] 5] > org-babel-result-hide-spec org-babel-hide-all-hashes > org-eldoc-load) > org-ref-insert-cite-function 'org-ref-insert-cite-link > org-odt-format-drawer-function #[514 "\207" [] 3 "\n\n(fn NAME CONTENTS)"] > org-archive-hook '(org-attach-archive-delete-maybe) > org-confirm-elisp-link-function 'yes-or-no-p > org-agenda-before-write-hook '(org-agenda-add-entry-text) > org-metaup-hook '(org-babel-load-in-session-maybe) > org-bibtex-headline-format-function #[257 "\300\236A\207" [:title] 3 > "\n\n(fn ENTRY)"] > org-latex-format-drawer-function #[514 "\207" [] 3 "\n\n(fn _ CONTENTS)"] > org-babel-pre-tangle-hook '(save-buffer) > org-latex-compiler "lualatex" > org-tab-first-hook '(org-babel-hide-result-toggle-maybe > org-babel-header-arg-expand) > org-babel-load-languages '((plantuml . t) (C . t) (scheme . t) (latex . > t)) > org-log-done 'time > org-ref-insert-label-function 'org-insert-link > org-checklist-export-function 'org-export-as-ascii > org-startup-align-all-tables t > org-ascii-format-drawer-function #[771 "\207" [] 4 "\n\n(fn NAME CONTENTS > WIDTH)"] > org-src-lang-modes '(("arduino" . arduino) ("redis" . redis) ("php" . > php) ("C" . c) > ("C++" . c++) ("asymptote" . asy) ("bash" . sh) > ("beamer" . latex) > ("calc" . fundamental) ("cpp" . c++) ("ditaa" . > artist) > ("dot" . fundamental) ("elisp" . emacs-lisp) > ("ocaml" . tuareg) > ("screen" . shell-script) ("shell" . sh) ("sqlite" . > sql)) > org-catch-invisible-edits t > org-occur-hook '(org-first-headline-recenter) > org-ref-insert-link-function 'org-ref-insert-cite-link > org-ref-insert-ref-function 'org-insert-link > org-edit-src-auto-save-idle-delay 15 > org-agenda-include-diary t > org-structure-template-alist '(("EL" . "src elisp :exports both :results > output\n?\n") > ("SV" . "src scheme :exports both :results > value\n?\n") > ("SO" . "src scheme :exports both :results > output\n?\n") > ("p" . "src plantuml :exports both :file ? > \n ") > ("a" . "export ascii") ("c" . "center") > ("C" . "comment") > ("e" . "example") ("E" . "export") ("h" . > "export html") > ("l" . "export latex") ("q" . "quote") > ("s" . "src") > ("v" . "verse")) > org-cycle-hook '(org-cycle-hide-archived-subtrees > org-cycle-show-empty-lines > org-optimize-window-after-visibility-change) > org-edit-src-turn-on-auto-save t > org-speed-command-hook '(org-speed-command-activate > org-babel-speed-command-activate) > org-hierarchical-todo-statistics nil > org-odt-format-inlinetask-function > 'org-odt-format-inlinetask-default-function > org-babel-tangle-lang-exts '(("stata" . "do") ("tcl" . "tcl") ("vala" . > "vala") > ("vbnet" . "vb") ("latex" . "tex") ("D" . > "d") ("C++" . "cpp") > ("emacs-lisp" . "el") ("elisp" . "el")) > org-format-latex-options '(:foreground default :background default :scale > 2.0 > :html-foreground "Black" :html-background > "Transparent" > :html-scale 1.0 :matchers ("begin" "$1" "$" > "$$" "\\(" "\\[")) > org-ref-pdf-to-bibtex-function 'copy-file > org-font-lock-set-keywords-hook '(org-drill-add-cloze-fontification) > org-confirm-shell-link-function 'yes-or-no-p > org-link-parameters '(("id" :follow org-id-open) ("message" :follow > org-mac-message-open) > ("x-devonthink-item" :follow > org-devonthink-item-open) > ("mac-evernote" :follow org-mac-evernote-note-open) > ("mac-outlook" :follow org-mac-outlook-message-open) > ("acrobat" :follow org-mac-acrobat-open) > ("skim" :follow org-mac-skim-open) > ("addressbook" :follow > org-mac-addressbook-item-open) > ("x-together-item" :follow > org-mac-together-item-open) > ("mairix" :follow org-mairix-open :store > org-mairix-store-gnus-link) > ("eww" :follow eww :store org-eww-store-link) > ("rmail" :follow org-rmail-open :store > org-rmail-store-link) > ("mhe" :follow org-mhe-open :store > org-mhe-store-link) > ("irc" :follow org-irc-visit :store > org-irc-store-link :export > org-irc-export) > ("info" :follow org-info-open :export > org-info-export :store > org-info-store-link) > ("gnus" :follow org-gnus-open :store > org-gnus-store-link) > ("docview" :follow org-docview-open :export > org-docview-export :store > org-docview-store-link) > ("bibtex" :follow org-bibtex-open :store > org-bibtex-store-link) > ("bbdb" :follow org-bbdb-open :export > org-bbdb-export :complete > org-bbdb-complete-link :store org-bbdb-store-link) > ("w3m" :store org-w3m-store-link) ("file+sys") > ("file+emacs") > ("doi" :follow org--open-doi-link) > ("elisp" :follow org--open-elisp-link) > ("file" :complete org-file-complete-link) > ("ftp" :follow (lambda (path) (browse-url (concat > "ftp:" path)))) > ("help" :follow org--open-help-link) > ("http" :follow (lambda (path) (browse-url (concat > "http:" path)))) > ("https" :follow (lambda (path) (browse-url (concat > "https:" path)))) > ("mailto" :follow (lambda (path) (browse-url > (concat "mailto:" path)))) > ("news" :follow (lambda (path) (browse-url (concat > "news:" path)))) > ("shell" :follow org--open-shell-link)) > org-latex-format-headline-function > 'org-latex-format-headline-default-function > org-agenda-start-with-follow-mode t > org-texinfo-format-inlinetask-function > 'org-texinfo-format-inlinetask-default-function > org-texinfo-format-drawer-function #[514 "\207" [] 3 "\n\n(fn NAME > CONTENTS)"] > org-latex-format-inlinetask-function > 'org-latex-format-inlinetask-default-function > org-tab-before-tab-emulation-hook '(org-tempo-complete-tag) > org-html-format-drawer-function #[514 "\207" [] 3 "\n\n(fn NAME > CONTENTS)"] > org-image-actual-width nil > org-html-use-infojs t > org-html-format-headline-function > 'org-html-format-headline-default-function > org-mairix-display-hook 'org-mairix-gnus-display-results > org-confirm-babel-evaluate 'my-org-confirm-babel-evaluate > org-ref-cite-onclick-function 'org-ref-cite-onclick-minibuffer-menu > org-use-speed-commands t > org-mairix-gnus-select-display-group-function > 'org-mairix-gnus-select-display-group-function-gg > org-latex-bib-compiler "biber" > org-default-notes-file "~/org/notes.org" > ) > -- > -- > Vladimir Nikishkin (MiEr, lockywolf) > >