From: Haojun Bao <baohaojun@gmail.com>
To: emacs-orgmode <emacs-orgmode@gnu.org>
Subject: [BUG] Can't export bold html correctly after change org-emphasis-regexp-components [9.6.6 (release_9.6.6 @ /Applications/Emacs.app/Contents/Resources/lisp/org/)]
Date: Sat, 4 Nov 2023 12:12:00 +0800 [thread overview]
Message-ID: <CAABrf9bAb0KU2db6gP1fvqZxdoi7agJvmFcpCSH08TXZpNrviQ@mail.gmail.com> (raw)
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.
------------------------------------------------------------------------
Steps to reproduce:
1. update org-emphasis-regexp-components, as I'm a Chinese, I added
some of the chinese Punctuation Marks, like the following:
(setq org-emphasis-regexp-components
'(
" ！？；：，。、 \t('\"{（“「『" ; pre
"- —；：，。、 \t.!,:!?？;！'\")}（）\\”」』" ; post, "-" must be the first!
" \t\r\n" ; border *forbidden*
"." ; body-regexp
1 ; newline
))
2. do M-x org-reload
3. Write a file with the following content, note that both hello is
displayed as bold:
*hello*：world
*hello* world
4. C-c C-e to export it as html, only the second hello is in bold, the
first hello is surrounded by the org bold marker '*'.
<div id="content" class="content">
<p>
*hello*：world
</p>
<p>
<b>hello</b> world
</p>
</div>
5. This works fine on Emacs 28.2
Emacs : GNU Emacs 29.1 (build 1, aarch64-apple-darwin21.6.0, NS
appkit-2113.60 Version 12.6.6 (Build 21G646))
of 2023-08-17
Package: Org mode version 9.6.6 (release_9.6.6 @
/Applications/Emacs.app/Contents/Resources/lisp/org/)
current state:
==============
(setq
org-archive-location "%s_archive::* Archive"
org-link-elisp-confirm-function 'yes-or-no-p
org-directory "~/system-config/doc/projects"
org-crypt-key nil
org-hide-emphasis-markers t
org-export-with-sub-superscripts '{}
org-log-done 'time
org-agenda-custom-commands '(("d" "Daily agenda and all TODOs"
((tags-todo "PRIORITY=\"A\""
((org-agenda-overriding-header "High-priority unfinished tasks:")))
(agenda "" ((org-agenda-skip-function
'(or (org-agenda-skip-entry-if 'todo 'done) (my-skip-entry?)))
(org-agenda-ndays 1)))
(alltodo ""
((org-agenda-skip-function
'(or
(air-org-skip-subtree-if-habit) (air-org-skip-subtree-if-priority 65)
(my-skip-entry?)
(org-agenda-skip-if nil
'(scheduled deadline)))
)
(org-agenda-overriding-header "ALL
normal priority tasks:"))
)
)
((org-agenda-compact-blocks t)))
("N" "Notes" tags "NOTE"
((org-agenda-overriding-header "Notes") (org-tags-match-list-sublevels
t))) ("R" . "Review")
("Rw" "Week in review" agenda ""
((org-agenda-files
'("~/src/github/projects/weekly.org")) (org-agenda-show-all-dates t)
(org-agenda-start-with-log-mode t)
(org-agenda-start-with-clockreport-mode t) (org-agenda-archives-mode
t)
(org-agenda-hide-tags-regexp (concat
org-agenda-hide-tags-regexp "\\|ARCHIVE")) (org-agenda-span 'week)
(org-agenda-start-on-weekday nil)
(org-agenda-overriding-header "Week in Review"))
("~/org/review/week.html"))
("Rd" "Day in review" agenda ""
((org-agenda-files
'("~/src/github/projects/weekly.org")) (org-agenda-show-all-dates t)
(org-agenda-start-with-log-mode t)
(org-agenda-start-with-clockreport-mode t) (org-agenda-archives-mode
t)
(org-agenda-hide-tags-regexp (concat
org-agenda-hide-tags-regexp "\\|ARCHIVE")) (org-agenda-span 'day)
(org-agenda-overriding-header "Day in Review"))
("~/org/review/day.html"))
("Rm" "Month in review" agenda ""
((org-agenda-files
'("~/src/github/projects/weekly.org")) (org-agenda-show-all-dates t)
(org-agenda-start-with-log-mode t)
(org-agenda-start-with-clockreport-mode t) (org-agenda-archives-mode
t)
(org-agenda-hide-tags-regexp (concat
org-agenda-hide-tags-regexp "\\|ARCHIVE")) (org-agenda-span 'month)
(org-agenda-start-day "01")
(org-read-date-prefer-future nil) (org-agenda-overriding-header "Month
in Review"))
("~/org/review/month.html"))
("g" "GTD"
((agenda "" nil) (tags "INBOX"
((org-agenda-overriding-header "Inbox") (org-tags-match-list-sublevels
nil)))
(stuck ""
((org-agenda-overriding-header "Stuck
Projects") (org-agenda-tags-todo-honor-ignore-options t)
(org-tags-match-list-sublevels t)
(org-agenda-todo-ignore-scheduled 'future))
)
(tags-todo "-INBOX"
((org-agenda-overriding-header "Next
Actions") (org-agenda-tags-todo-honor-ignore-options t)
(org-agenda-todo-ignore-scheduled 'future)
(org-agenda-skip-function
'(lambda nil (or
(org-agenda-skip-subtree-if 'todo '("HOLD" "WAITING"))
(org-agenda-skip-entry-if 'nottodo '("NEXT")))))
(org-tags-match-list-sublevels t)
(org-agenda-sorting-strategy '(todo-state-down effort-up
category-keep)))
)
(tags-todo "-INBOX/PROJECT"
((org-agenda-overriding-header
"Projects") (org-tags-match-list-sublevels t)
(org-agenda-sorting-strategy '(category-keep)))
)
(tags-todo "-INBOX/-NEXT"
((org-agenda-overriding-header
"Orphaned Tasks") (org-agenda-tags-todo-honor-ignore-options t)
(org-agenda-todo-ignore-scheduled 'future)
(org-agenda-skip-function
'(lambda nil
(or (org-agenda-skip-subtree-if
'todo '("PROJECT" "HOLD" "WAITING" "DELEGATED"))
(org-agenda-skip-subtree-if
'nottododo '("TODO")))
)
)
(org-tags-match-list-sublevels t)
(org-agenda-sorting-strategy '(category-keep)))
)
(tags-todo "/WAITING"
((org-agenda-overriding-header
"Waiting") (org-agenda-tags-todo-honor-ignore-options t)
(org-agenda-todo-ignore-scheduled
'future) (org-agenda-sorting-strategy '(category-keep)))
)
(tags-todo "/DELEGATED"
((org-agenda-overriding-header
"Delegated") (org-agenda-tags-todo-honor-ignore-options t)
(org-agenda-todo-ignore-scheduled
'future) (org-agenda-sorting-strategy '(category-keep)))
)
(tags-todo "-INBOX"
((org-agenda-overriding-header "On Hold")
(org-agenda-skip-function
'(lambda nil (or
(org-agenda-skip-subtree-if 'todo '("WAITING"))
(org-agenda-skip-entry-if 'nottodo '("HOLD")))))
(org-tags-match-list-sublevels nil)
(org-agenda-sorting-strategy '(category-keep)))
)
)
)
)
org-log-into-drawer t
org-babel-after-execute-hook '(bh/display-inline-images)
org-agenda-files '("~/system-config/doc/projects")
org-publish-project-alist '(("notes" :base-directory "~/notes/"
:publishing-directory "~/notes_html" :section-numbers t
:table-of-contents t :style
"<link rel=\"stylesheet\"\n
href=\"../other/mystyle.css\"\n
type=\"text/css\"/>")
("org" :base-directory
"~/system-config/doc/projects" :publishing-directory "~/public_html"
:section-numbers nil
:table-of-contents nil)
)
org-persist-after-read-hook '(org-element--cache-persist-after-read)
org-refile-targets '((nil :maxlevel . 5) (org-agenda-files :maxlevel . 5))
org-export-before-parsing-hook '(org-attach-expand-links)
org-clock-cancel-hook '(sanityinc/hide-org-clock-from-header-line)
org-cycle-tab-first-hook '(org-babel-hide-result-toggle-maybe
org-babel-header-arg-expand)
org-default-notes-file "~/src/github/projects/notes.org"
org-refile-use-outline-path t
org-archive-hook '(org-attach-archive-delete-maybe)
org-clock-in-hook '(sanityinc/show-org-clock-in-header-line)
org-file-apps '((auto-mode . emacs) ("\\.mm\\'" . default)
("\\.x?html?\\'" . default) ("\\(\\.pdf\\|\\.ps\\)\\'" . "of %s"))
org-odt-format-inlinetask-function 'org-odt-format-inlinetask-default-function
org-ascii-format-drawer-function #[771 " \207" [] 4 "\n\n(fn NAME
CONTENTS WIDTH)"]
org-cycle-hook '(org-cycle-hide-archived-subtrees
org-cycle-show-empty-lines
org-cycle-optimize-window-after-visibility-change
org-cycle-display-inline-images)
org-latex-minted-langs '((emacs-lisp "common-lisp") (cc "c++") (cperl
"perl") (shell-script "bash") (caml "ocaml") (waw "text"))
org-export-with-broken-links t
org-persist-before-read-hook '(org-element--cache-persist-before-read)
org-agenda-sticky t
org-modules '(org-bbdb org-bibtex org-docview org-gnus org-habit
org-info org-irc org-mhe org-rmail org-w3m ol-info ol-man)
org-link-from-user-regexp "\\<baohaojun@gmail\\.com\\>\\|\\<Bao Haojun\\>"
org-export-coding-system 'utf-8
org-mode-hook '((closure (t) nil (if (and
(lsp-bridge--not-mind-wave-chat-buffer)
(lsp-bridge--not-acm-doc-markdown-buffer)) (progn (lsp-bridge-mode
1))))
(closure (t) nil (org-add-link-type "wiki"
#'org-wiki--open-page #'org-wiki--org-link)
(org-add-link-type "wiki-asset-sys"
#'org-wiki--protocol-open-assets-with-sys #'org-wiki--asset-link))
(lambda nil (visual-line-mode 1) (setq
imenu-create-index-function #'ajoke--create-index-function)
(define-key org-mode-map [(control c) (v)]
'bhj-todo-from-mail-view-mail)
(define-key org-mode-map [(control c) (c) (c)]
'bhj-todo-copy-id)
(define-key org-mode-map [(control c) (s)] #'(lambda
nil (interactive) (shell-command-to-string "ask-to-sync-org >/dev/null
2>&1&")))
(define-key org-mode-map [(control c) (meta j) (d)]
'bhj-jwords-done)
(define-key org-mode-map [(control c) (meta j) (D)]
'bhj-jwords-undone)
(define-key org-mode-map [(control c) (meta j) (s)]
'bhj-jwords-someday) (org-jira-mode t))
#[0 "\300\301\302\303\304$\207" [add-hook
before-save-hook org-encrypt-entries nil t] 5]
#[0 "\301\211 \207" [imenu-create-index-function
org-imenu-get-tree] 2] org-clock-load
#[0 "\300\301\302\303\304$\207" [add-hook
change-major-mode-hook org-fold-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 (closure (t) nil (setq
imenu-create-index-function 'ajoke--create-index-function)))
org-babel-load-languages '((R . t) (ditaa . t) (dot . t) (emacs-lisp
. t) (gnuplot . t) (haskell) (latex . t) (ocaml) (octave . t) (perl .
t)
(plantuml . t) (python . t) (ruby . t)
(screen) (shell . t) (sql . t) (sqlite . t))
org-clock-x11idle-program-name "xprintidle"
org-agenda-span 'day
org-latex-format-drawer-function #[514 "\207" [] 3 "\n\n(fn _ CONTENTS)"]
org-jira-done-states '("Closed" "Resolved" "Done" "完成")
org-agenda-clockreport-parameter-plist '(:link t :maxlevel 3)
org-latex-format-headline-function 'org-latex-format-headline-default-function
org-confirm-shell-link-function 'yes-or-no-p
org-reveal-start-hook '(org-decrypt-entry)
org-agenda-compact-blocks t
org-html-format-drawer-function #[514 "\207" [] 3 "\n\n(fn NAME CONTENTS)"]
outline-isearch-open-invisible-function 'outline-isearch-open-invisible
org-use-sub-superscripts '{}
org-agenda-sorting-strategy '((agenda habit-down time-up
user-defined-up effort-up category-keep) (todo category-up effort-up)
(tags category-up effort-up)
(search category-up))
org-stuck-projects '("-INBOX/PROJECT" ("NEXT"))
org-after-todo-statistics-hook '(org-summary-todo)
org-html-validation-link nil
org-fold-catch-invisible-edits 'show
org-latex-classes '(("beamer"
"\\documentclass[presentation]{beamer}\n\\usepackage{bxdpx-beamer}"
("\\section{%s}" . "\\section*{%s}")
("\\subsection{%s}" . "\\subsection*{%s}")
("\\subsubsection{%s}" . "\\subsubsection*{%s}"))
("中文文章"
"\\documentclass[11pt,dvipdfmx,CJKbookmarks]{article}\n\\usepackage{CJKutf8}\n\\usepackage{atbegshi}\n\\AtBeginShipoutFirst{\\special{pdf:tounicode
UTF8-UTF16}} % for UTF-8\n [DEFAULT-PACKAGES]\n [PACKAGES]\n [EXTRA]"
("\\section{%s}" . "\\section*{%s}")
("\\subsection{%s}" . "\\subsection*{%s}") ("\\subsubsection{%s}" .
"\\subsubsection*{%s}")
("\\paragraph{%s}" . "\\paragraph*{%s}")
("\\subparagraph{%s}" . "\\subparagraph*{%s}"))
("cn_article"
"\\documentclass[11pt,dvipdfmx,CJKbookmarks]{article}\n\\usepackage{CJKutf8}\n\\usepackage{atbegshi}\n\\AtBeginShipoutFirst{\\special{pdf:tounicode
UTF8-UTF16}} % for UTF-8\n [DEFAULT-PACKAGES]\n [PACKAGES]\n [EXTRA]"
("\\section{%s}" . "\\section*{%s}")
("\\subsection{%s}" . "\\subsection*{%s}") ("\\subsubsection{%s}" .
"\\subsubsection*{%s}")
("\\paragraph{%s}" . "\\paragraph*{%s}")
("\\subparagraph{%s}" . "\\subparagraph*{%s}"))
("中文演示"
"\\documentclass[presentation,dvipdfmx,CJKbookmarks]{beamer}\n\\usepackage{bxdpx-beamer}\n\\usepackage{CJKutf8}\n\\usepackage{atbegshi}\n\\AtBeginShipoutFirst{\\special{pdf:tounicode
UTF8-UTF16}} % for UTF-8\n [DEFAULT-PACKAGES]\n [PACKAGES]\n [EXTRA]"
("\\section{%s}" . "\\section*{%s}")
("\\subsection{%s}" . "\\subsection*{%s}") ("\\subsubsection{%s}" .
"\\subsubsection*{%s}"))
("cn_beamer"
"\\documentclass[presentation,dvipdfmx,CJKbookmarks]{beamer}\n\\usepackage{bxdpx-beamer}\n\\usepackage{CJKutf8}\n\\usepackage{atbegshi}\n\\AtBeginShipoutFirst{\\special{pdf:tounicode
UTF8-UTF16}} % for UTF-8\n [DEFAULT-PACKAGES]\n [PACKAGES]\n [EXTRA]"
("\\section{%s}" . "\\section*{%s}")
("\\subsection{%s}" . "\\subsection*{%s}") ("\\subsubsection{%s}" .
"\\subsubsection*{%s}"))
("article" "\\documentclass[11pt]{article}"
("\\section{%s}" . "\\section*{%s}") ("\\subsection{%s}" .
"\\subsection*{%s}")
("\\subsubsection{%s}" . "\\subsubsection*{%s}")
("\\paragraph{%s}" . "\\paragraph*{%s}")
("\\subparagraph{%s}" . "\\subparagraph*{%s}"))
("report" "\\documentclass[11pt]{report}"
("\\part{%s}" . "\\part*{%s}") ("\\chapter{%s}" . "\\chapter*{%s}")
("\\section{%s}" . "\\section*{%s}")
("\\subsection{%s}" . "\\subsection*{%s}") ("\\subsubsection{%s}" .
"\\subsubsection*{%s}"))
("book" "\\documentclass[11pt]{book}"
("\\part{%s}" . "\\part*{%s}") ("\\chapter{%s}" . "\\chapter*{%s}")
("\\section{%s}" . "\\section*{%s}")
("\\subsection{%s}" . "\\subsection*{%s}") ("\\subsubsection{%s}" .
"\\subsubsection*{%s}"))
)
org-plantuml-jar-path "~/system-config/bin/plantuml.jar"
org-odt-format-headline-function 'org-odt-format-headline-default-function
org-agenda-mode-hook '((closure (t) nil (add-hook
'window-configuration-change-hook 'org-agenda-align-tags nil t))
hl-line-mode)
org-agenda-before-write-hook '(org-agenda-add-entry-text)
org-agenda-after-show-hook '(org-show-entry)
org-edit-timestamp-down-means-later t
org-babel-tangle-lang-exts '(("ruby" . "rb") ("python" . "py")
("perl" . "pl") ("latex" . "tex") ("emacs-lisp" . "el") ("elisp" .
"el"))
org-src-mode-hook '(org-src-babel-configure-edit-buffer
org-src-mode-configure-edit-buffer)
org-html-htmlize-output-type 'css
org-confirm-elisp-link-function 'yes-or-no-p
org-agenda-window-setup 'current-window
org-latex-hyperref-template "\\hypersetup{\n pdfauthor={%a},\n
pdftitle={%t},\n pdfkeywords={%k},\n pdfsubject={%d},\n
pdfcreator={%c},\n pdflang={%L},\n colorlinks=true,\n
linkcolor=blue,\n filecolor=magenta,\n urlcolor=cyan,\n}\n"
org-tags-exclude-from-inheritance '("crypt")
org-clock-out-remove-zero-time-clocks t
org-todo-keywords '((sequence "TODO(t)" "DOING(n)" "NEXT(x)" "|"
"DONE(d!/!)") (sequence "PROJECT(p)" "|" "DONE(d!/!)"
"CANCELLED(c@/!)")
(sequence "WAITING(w@/!)" "DELEGATED(e!)" "|"
"HOLD(h@/!)"))
org-clock-out-hook '(sanityinc/hide-org-clock-from-header-line)
org-support-shift-select t
org-speed-command-hook '(org-speed-command-activate
org-babel-speed-command-activate)
org-html-format-inlinetask-function
'org-html-format-inlinetask-default-function
org-ascii-format-inlinetask-function 'org-ascii-format-inlinetask-default
org-odt-format-drawer-function #[514 "\207" [] 3 "\n\n(fn NAME CONTENTS)"]
org-confirm-babel-evaluate nil
org-fold-core-isearch-open-function 'org-fold-core--isearch-reveal
org-clock-in-resume t
org-clock-persist t
org-latex-format-inlinetask-function
'org-latex-format-inlinetask-default-function
org-persist-before-write-hook '(org-element--cache-persist-before-write)
org-tab-first-hook '(org-babel-hide-result-toggle-maybe
org-babel-header-arg-expand)
org-link-shell-confirm-function 'yes-or-no-p
org-babel-pre-tangle-hook '((lambda nil (setenv "SC_ORG_FILEPATH"
(buffer-file-name))) save-buffer)
org-jira-default-jql "(reporter = currentUser() or assignee =
currentUser()) and status != done ORDER BY priority DESC, created ASC"
org-agenda-loop-over-headlines-in-active-region nil
org-agenda-start-on-weekday nil
org-todo-keyword-faces '(("NEXT" :inherit warning) ("PROJECT"
:inherit font-lock-string-face))
org-fold-reveal-start-hook '(org-decrypt-entry)
org-occur-hook '(org-first-headline-recenter)
org-metadown-hook '(org-babel-pop-to-session-maybe)
org-link-parameters '(("attachment" :follow org-attach-follow
:complete org-attach-complete-link)
("wiki-asset-sys" :follow
org-wiki--protocol-open-assets-with-sys :export org-wiki--asset-link)
("wiki" :follow org-wiki--open-page :export
org-wiki--org-link)
("man" :follow org-man-open :export
org-man-export :store org-man-store-link)
("info" :follow org-info-open :export
org-info-export :store org-info-store-link :insert-description
org-info-description-as-command)
("id" :follow org-id-open) ("smb" :follow nil
:export org-smb-link-export) ("jira" :follow org-jira-open :export
nil) ("file+sys")
("file+emacs") ("shell" :follow org-link--open-shell)
("news" :follow #[514 "\301\300\302 Q \"\207"
["news" browse-url ":"] 6 "\n\n(fn URL ARG)"])
("mailto" :follow #[514 "\301\300\302 Q \"\207"
["mailto" browse-url ":"] 6 "\n\n(fn URL ARG)"])
("https" :follow #[514 "\301\300\302 Q \"\207"
["https" browse-url ":"] 6 "\n\n(fn URL ARG)"])
("http" :follow #[514 "\301\300\302 Q \"\207"
["http" browse-url ":"] 6 "\n\n(fn URL ARG)"])
("ftp" :follow #[514 "\301\300\302 Q \"\207"
["ftp" browse-url ":"] 6 "\n\n(fn URL ARG)"])
("help" :follow org-link--open-help :store
org-link--store-help) ("file" :complete org-link-complete-file)
("elisp" :follow org-link--open-elisp))
org-html-format-headline-function 'org-html-format-headline-default-function
org-metaup-hook '(org-babel-load-in-session-maybe)
org-refile-allow-creating-parent-nodes 'confirm
org-todo-repeat-to-state "NEXT"
org-outline-path-complete-in-steps nil
org-fast-tag-selection-single-key 'expert
org-tags-column 80
org-src-lang-modes '(("plantuml" . fundamental) ("ocaml" . tuareg)
("elisp" . emacs-lisp) ("ditaa" . artist) ("asymptote" . asy) ("dot" .
graphviz-dot)
("sqlite" . sql) ("calc" . fundamental) ("C" .
c) ("cpp" . c++) ("C++" . c++) ("screen" . shell-script) ("shell" .
sh) ("bash" . sh))
org-refile-target-verify-function 'sanityinc/verify-refile-target
)
next reply other threads:[~2023-11-04 4:18 UTC|newest]
Thread overview: 3+ messages / expand[flat|nested] mbox.gz Atom feed top
2023-11-04 4:12 Haojun Bao [this message]
2023-11-04 12:42 ` [BUG] Can't export bold html correctly after change org-emphasis-regexp-components [9.6.6 (release_9.6.6 @ /Applications/Emacs.app/Contents/Resources/lisp/org/)] Ihor Radchenko
2023-11-04 14:16 ` Haojun Bao
Reply instructions:
You may reply publicly to this message via plain-text email
using any one of the following methods:
* Save the following mbox file, import it into your mail client,
and reply-to-all from there: mbox
Avoid top-posting and favor interleaved quoting:
https://en.wikipedia.org/wiki/Posting_style#Interleaved_style
List information: https://www.orgmode.org/
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to=CAABrf9bAb0KU2db6gP1fvqZxdoi7agJvmFcpCSH08TXZpNrviQ@mail.gmail.com \
--to=baohaojun@gmail.com \
--cc=emacs-orgmode@gnu.org \
/path/to/YOUR_REPLY
https://kernel.org/pub/software/scm/git/docs/git-send-email.html
* If your mail client supports setting the In-Reply-To header
via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line
before the message body.
Code repositories for project(s) associated with this public inbox
https://git.savannah.gnu.org/cgit/emacs/org-mode.git
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).