Issue with internal directory links

Issue with internal directory links

[Jonathan Fox]

[-- Attachment #1: Type: text/plain, Size: 6685 bytes --]

Issue:

When calling `org-open-at-point' with the cursor on an internal link
to a directory, the directory is not opened in a new dired buffer and
the following message is printed in the minibuffer:

"Running less path/to/directory...done"

--------------------------------------------------------------------------------

Expected behavior:

A dired buffer is opened using the directory in the link.

--------------------------------------------------------------------------------

The following org bug report was generated when replicating the expected
behavior:

Emacs  : GNU Emacs 26.1 (build 1, x86_64-pc-linux-gnu, GTK+ Version 3.18.9)
 of 2019-02-08
Package: Org mode version 9.1.9 (release_9.1.9-65-g5e4542 @
/usr/local/share/emacs/26.1/lisp/org/)

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-clock-out-if-current)
 org-metadown-hook '(org-babel-pop-to-session-maybe)
 org-clock-out-hook '(org-clock-remove-empty-clock-drawer)
 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)
 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-babel-pre-tangle-hook '(save-buffer)
 org-tab-first-hook '(org-babel-hide-result-toggle-maybe
org-babel-header-arg-expand)
 org-occur-hook '(org-first-headline-recenter)
 org-cycle-hook '(org-cycle-hide-archived-subtrees org-cycle-hide-drawers
org-cycle-show-empty-lines
 org-optimize-window-after-visibility-change)
 org-speed-command-hook '(org-speed-command-activate
org-babel-speed-command-activate)
 org-confirm-shell-link-function 'yes-or-no-p
 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))))
      ("news" :follow (lambda (path) (browse-url (concat "news:" path))))
("shell" :follow org--open-shell-link))
 )

--------------------------------------------------------------------------------

The following org bug report was generated when replicating the issue:

Emacs  : GNU Emacs 27.0.50 (build 1, x86_64-pc-linux-gnu, GTK+ Version
3.22.30)
 of 2019-12-14
Package: Org mode version 9.3 (release_9.3 @ /home/XXXX/emacs/lisp/org/)

current state:
==============
(setq
 org-src-mode-hook '(org-src-babel-configure-edit-buffer
org-src-mode-configure-edit-buffer)
 org-link-shell-confirm-function 'yes-or-no-p
 org-metadown-hook '(org-babel-pop-to-session-maybe)
 org-clock-out-hook '(org-clock-remove-empty-clock-drawer)
 org-mode-hook '(#[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-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-babel-pre-tangle-hook '(save-buffer)
 org-tab-first-hook '(org-babel-hide-result-toggle-maybe
org-babel-header-arg-expand)
 org-occur-hook '(org-first-headline-recenter)
 org-cycle-hook '(org-cycle-hide-archived-subtrees
org-cycle-show-empty-lines org-optimize-window-after-visibility-change)
 org-speed-command-hook '(org-speed-command-activate
org-babel-speed-command-activate)
 org-confirm-shell-link-function 'yes-or-no-p
 org-link-parameters '(("attachment" :follow org-attach-open-link :export
org-attach-export-link :complete org-attach-complete-link)
      ("id" :follow org-id-open) ("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")
("shell" :follow org-link--open-shell)
      ("news" :follow #[257 "\301\300\302 Q!\207" ["news" browse-url ":"] 5
"\n\n(fn URL)"])
      ("mailto" :follow #[257 "\301\300\302 Q!\207" ["mailto" browse-url
":"] 5 "\n\n(fn URL)"])
      ("https" :follow #[257 "\301\300\302 Q!\207" ["https" browse-url ":"]
5 "\n\n(fn URL)"])
      ("http" :follow #[257 "\301\300\302 Q!\207" ["http" browse-url ":"] 5
"\n\n(fn URL)"])
      ("ftp" :follow #[257 "\301\300\302 Q!\207" ["ftp" browse-url ":"] 5
"\n\n(fn URL)"])
      ("help" :follow org-link--open-help) ("file" :complete
org-link-complete-file)
      ("elisp" :follow org-link--open-elisp) ("doi" :follow
org-link--open-doi))
 org-link-elisp-confirm-function 'yes-or-no-p
 )

[-- Attachment #2: Type: text/html, Size: 8220 bytes --]

Re: Issue with internal directory links

[Nicolas Goaziou]

Hello,

Jonathan Fox <jonathanfox223@gmail.com> writes:

> When calling `org-open-at-point' with the cursor on an internal link
> to a directory, the directory is not opened in a new dired buffer and
> the following message is printed in the minibuffer:
>
> "Running less path/to/directory...done"
>
> --------------------------------------------------------------------------------
>
> Expected behavior:
>
> A dired buffer is opened using the directory in the link.
>
> --------------------------------------------------------------------------------

Could you show the link you're using? FWIW, I don't have trouble opening
links to directories.

Regards,

-- 
Nicolas Goaziou

Re: Issue with internal directory links

[Jonathan Fox]

[-- Attachment #1: Type: text/plain, Size: 1143 bytes --]

Hello,

Here's a link I'm using:

[[./templates][Templates]]

I think the issue I'm having arises within the `org-open-file' function at
the following variable assignment inside a let* expression:

(command (mailcap-mime-info mime-type))

In 26.1, the value assigned is `view-mode'. In 27.0.50, the value assigned
is "less '%s'".


On Sat, Jan 4, 2020 at 12:58 PM Nicolas Goaziou <mail@nicolasgoaziou.fr>
wrote:

> Hello,
>
> Jonathan Fox <jonathanfox223@gmail.com> writes:
>
> > When calling `org-open-at-point' with the cursor on an internal link
> > to a directory, the directory is not opened in a new dired buffer and
> > the following message is printed in the minibuffer:
> >
> > "Running less path/to/directory...done"
> >
> >
> --------------------------------------------------------------------------------
> >
> > Expected behavior:
> >
> > A dired buffer is opened using the directory in the link.
> >
> >
> --------------------------------------------------------------------------------
>
> Could you show the link you're using? FWIW, I don't have trouble opening
> links to directories.
>
> Regards,
>
> --
> Nicolas Goaziou
>

[-- Attachment #2: Type: text/html, Size: 1975 bytes --]

Re: Issue with internal directory links

[Nicolas Goaziou]

Hello,

Jonathan Fox <jonathanfox223@gmail.com> writes:

> Here's a link I'm using:
>
> [[./templates][Templates]]
>
> I think the issue I'm having arises within the `org-open-file' function at
> the following variable assignment inside a let* expression:
>
> (command (mailcap-mime-info mime-type))
>
> In 26.1, the value assigned is `view-mode'. In 27.0.50, the value assigned
> is "less '%s'".

I still cannot reproduce it, so your .mailcap file is different than
mine. Anyway, you can tweak `org-file-apps' variable to use whatever you
want to open the file.

HTH,

-- 
Nicolas Goaziou

Re: Issue with internal directory links

[Bastien]

Hi Jonathan,

Jonathan Fox <jonathanfox223@gmail.com> writes:

> Here's a link I'm using:
>
> [[./templates][Templates]]

You can try adding (directory . emacs) to `org-file-apps' in your
configuration like this:

(setq org-file-apps
      '((auto-mode . emacs)
      	(directory . emacs)
	("\\.mm\\'" . default)
	("\\.x?html?\\'" . default)
	("\\.pdf\\'" . default)))

A bug related to mailcap handling has been fixed in Emacs 27,
perhaps this is what caused the change in your setup.  I added
(directory . emacs) in `org-file-apps' by default in the master
branch.

Thanks for reporting this,

-- 
 Bastien