Re: [O] Bug: link formating problem [9.0.5 (9.0.5-elpaplus @ /Users/mistkafka/.emacs.d/elpa/org-plus-contrib-20170210/)]

[Chunyang Xu]

I changed `org-plain-link-re' to make it not longer think "[" and "]"
are valid characters in a URL, which solves the problem.

diff -u --label 
/Users/xcy/.emacs.d/elpa-25.2.1/org-plus-contrib-20170515/org.el --label 
\#\<buffer\ org.el\> 
/Users/xcy/.emacs.d/elpa-25.2.1/org-plus-contrib-20170515/org.el 
/var/folders/7f/s191h4q97p90374yw15ssrs00000gn/T/buffer-content-71053Vt
--- /Users/xcy/.emacs.d/elpa-25.2.1/org-plus-contrib-20170515/org.el
+++ #<buffer org.el>
@@ -5847,7 +5847,7 @@
          org-plain-link-re
          (concat
           "\\<" types-re ":"
-          "\\([^ \t\n()<>]+\\(?:([[:word:]0-9_]+)\\|\\([^[:punct:] 
\t\n]\\|/\\)\\)\\)")
+          "\\([^][ \t\n()<>]+\\(?:([[:word:]0-9_]+)\\|\\([^[:punct:] 
\t\n]\\|/\\)\\)\\)")
          ;;     "\\([^]\t\n\r<>() ]+[^]\t\n\r<>,.;() ]\\)")
          org-bracket-link-regexp
          "\\[\\[\\([^][]+\\)\\]\\(\\[\\([^][]+\\)\\]\\)?\\]"

Diff finished.  Fri May 26 16:01:30 2017

林镇国 <address@hidden> writes:

> 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
>
>      http://orgmode.org/manual/Feedback.html#Feedback
>
> Your bug report will be posted to the Org mailing list.
> ------------------------------------------------------------------------
>
> Hi!
>
> When I insert a link to my note, such as“这是一个[[link][链接]]啦~”，
> the text after the link, "啦~", will be formatting as link style.
>
> Space participe is not work in some language, such as Chinese and
> Japanese. If I use a space to participe the link the the text after
> it, that's really ugly in Chinese.
>
> And I wonder even in English, must we add a space after a link?
>
> By the way, it just a formatting problem(with org-hide-emphasis-markers
> is t), not export problem, the link export to html is ok!
>
> Emacs  : GNU Emacs 25.2.1 (x86_64-apple-darwin13.4.0, Carbon Version 157 
> AppKit 1265.21)
> of 2017-02-06
> Package: Org mode version 9.0.5 (9.0.5-elpaplus @ 
> /Users/mistkafka/.emacs.d/elpa/org-plus-contrib-20170210/)
>
> current state:
> ==============
> (setq
> org-id-locations-file "/Users/mistkafka/.emacs.d/.cache/.org-id-locations"
> org-tab-first-hook '(org-babel-hide-result-toggle-maybe 
> org-babel-header-arg-expand)
> org-clock-persist-file "/Users/mistkafka/.emacs.d/.cache/org-clock-save.el"
> org-speed-command-hook '(org-speed-command-default-hook 
> org-babel-speed-command-hook)
> org-time-clocksum-format '(:hours "%d" :require-hours t :minutes ":%02d" 
> :require-minutes t)
> org-occur-hook '(org-first-headline-recenter)
> org-imenu-depth 8
> org-metaup-hook '(org-babel-load-in-session-maybe)
> org-html-format-drawer-function '(closure
>                                    (htmlize-buffer-places 
> org-html-format-table-no-css htmlize-css-name-prefix htmlize-output-type 
> htmlize-output-type
>                                     htmlize-css-name-prefix t)
>                                    (_name contents) contents)
> org-log-done t
> org-latex-format-inlinetask-function 
> 'org-latex-format-inlinetask-default-function
> org-confirm-shell-link-function 'yes-or-no-p
> org-image-actual-width nil
> org-ascii-format-inlinetask-function 'org-ascii-format-inlinetask-default
> org-link-translation-function 'toc-org-unhrefify
> org-present-mode-hook '(spacemacs//org-present-start)
> org-agenda-restore-windows-after-quit t
> org-latex-format-headline-function 'org-latex-format-headline-default-function
> org-default-notes-file "notes.org"
> org-todo-keyword-faces '(("NEXT" :inherit warning) ("PROJECT" :inherit 
> font-lock-string-face))
> org-after-todo-state-change-hook '(org-clock-out-if-current)
> org-latex-format-drawer-function '(closure (t) (_ contents) contents)
> org-odt-format-headline-function 'org-odt-format-headline-default-function
> org-todo-repeat-to-state "NEXT"
> org-src-mode-hook '(org-src-babel-configure-edit-buffer 
> org-src-mode-configure-edit-buffer)
> org-agenda-before-write-hook '(org-agenda-add-entry-text)
> org-babel-pre-tangle-hook '(save-buffer)
> org-mode-hook '(#[0 "\300\301\302\303\304$\207" [add-hook 
> change-major-mode-hook org-show-block-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 spacemacs/load-yasnippet 
> toc-org-enable org-download-enable org-bullets-mode 
> spacemacs//org-babel-do-load-languages flyspell-mode
>                  spacemacs/add-org-surrounds evil-org-mode org-eldoc-load 
> spacemacs//init-company-org-mode company-mode)
> org-archive-hook '(org-attach-archive-delete-maybe)
> org-ascii-format-drawer-function '(closure (t) (_name contents _width) 
> contents)
> org-odt-format-inlinetask-function 'org-odt-format-inlinetask-default-function
> org-cycle-hook '(org-cycle-hide-archived-subtrees org-cycle-hide-drawers 
> org-cycle-show-empty-lines org-optimize-window-after-visibility-change)
> org-publish-timestamp-directory 
> "/Users/mistkafka/.emacs.d/.cache/.org-timestamps/"
> org-present-mode-quit-hook '(spacemacs//org-present-end)
> org-export-async-init-file 
> "/Users/mistkafka/.emacs.d/layers/+emacs/org/local/org-async-init.el"
> org-download-annotate-function 'org-download-annotate-default
> org-todo-keywords '((sequence "TODO(t)" "NEXT(n)" "|" "DONE(d@/!)") (sequence 
> "PROJECT(p)" "|" "DONE(d@/!)" "CANCELLED(c@/!)")
>                      (sequence "WAITING(w@/!)" "DELEGATED(e!)" "HOLD(h)" "|" 
> "CANCELLED(c@/!)"))
> org-hide-emphasis-markers t
> org-babel-tangle-lang-exts '(("python" . "py") ("emacs-lisp" . "el") ("elisp" 
> . "el"))
> org-confirm-elisp-link-function 'yes-or-no-p
> org-startup-with-inline-images t
> org-metadown-hook '(org-babel-pop-to-session-maybe)
> org-log-into-drawer t
> org-odt-format-drawer-function '(closure
>                                   (hfy-user-sheet-assoc hfy-html-quote-regex 
> hfy-html-quote-map hfy-face-to-css hfy-begin-span-handler hfy-end-span-handler
>                                    archive-zip-extract 
> nxml-auto-insert-xml-declaration-flag t)
>                                   (_name contents) contents)
> org-babel-after-execute-hook '(spacemacs/ob-fix-inline-images)
> org-html-format-headline-function 'org-html-format-headline-default-function
> org-link-parameters '(("id" :follow org-id-open) ("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) ("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)))) ("message" :follow (lambda (path) (browse-url (concat 
> "message:" path))))
>                        ("news" :follow (lambda (path) (browse-url (concat 
> "news:"; path)))) ("shell" :follow org--open-shell-link))
> org-babel-load-languages '((python . t) (emacs-lisp . t))
> org-html-format-inlinetask-function 
> 'org-html-format-inlinetask-default-function
> org-agenda-files '("~/gtd/work.org" "~/gtd/project.org" "~/gtd/tasks.org")
> org-clock-out-hook '(org-clock-remove-empty-clock-drawer)
> org-clock-out-remove-zero-time-clocks t
> org-publish-project-alist '(("gitpage" :base-directory 
> "~/mistkafka.github.io/org/" :base-extension "org" :publishing-directory 
> "~/mistkafka.github.io/_posts/" :recursive
>                               t :publishing-function org-html-publish-to-html 
> :html-extension "html" :body-only t :with-toc nil :section-numbers nil)
>                              )
> )
>
>
> 林镇国
> address@hidden