[Top][All Lists]

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[O] Bug: org-git-link.el broken [9.0.5 (release_9.0.5 @ /home/leo/.emacs

From: Leo Alekseyev
Subject: [O] Bug: org-git-link.el broken [9.0.5 (release_9.0.5 @ /home/leo/.emacs.d/elisp/org-mode.git/lisp/)]
Date: Wed, 22 Mar 2017 02:34:51 -0700

org-store-link fails inside org-git-link if org-git-link is enabled with (require 'org-git-link)

From what I can tell in the debugger, the code walks up the directory tree looking for .git files in a parent directory.  However, when I am inside e.g. "~/foo.el", at some point the code will execute (org-git-split-dirpath "~/")  (org-git-link.el line 129), which evaluates to (nil, "~").  dir will subsequently be set to nil on line 132, which results in an error.

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


Your bug report will be posted to the Org mailing list.

Emacs  : GNU Emacs 26.0.50 (build 2, x86_64-pc-linux-gnu, GTK+ Version 3.18.9)
 of 2017-03-20
Package: Org mode version 9.0.5 (release_9.0.5 @ /home/leo/.emacs.d/elisp/org-mode.git/lisp/)

current state:
 org-babel-results-keyword "results"
 org-src-mode-hook '((lambda nil (auto-save-mode t)) (lambda nil (define-key org-src-mode-map " @" (quote org-src-do-key-sequence-at-code-block)))
                     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-edit-src-content-indentation 0
 org-src-tab-acts-natively t
 org-agenda-files '("~/My Dropbox/notes.org/memos.txt")
 org-shiftup-final-hook '(windmove-up)
 org-cycle-include-plain-lists nil
 org-mode-hook '(er/add-org-mode-expansions turn-on-font-lock flyspell-mode
                 (lambda nil (auto-fill-mode t) (setq adaptive-fill-regexp nil) (setq comment-start nil))
                  (org-inlinetask-min-level org-mode-abbrev-table org-mode-syntax-table buffer-face-mode-face org-mode-map org-tbl-menu org-org-menu
                   org-struct-menu org-entities org-last-state org-id-track-globally org-clock-start-time texmathp-why remember-data-file
                   org-agenda-tags-todo-honor-ignore-options iswitchb-temp-buflist calc-embedded-open-mode calc-embedded-open-formula
                   calc-embedded-close-formula align-mode-rules-list org-emphasis-alist org-emphasis-regexp-components org-export-registered-backends
                   org-modules org-babel-load-languages t)
                  nil (add-hook (quote change-major-mode-hook) (quote org-show-block-all) (quote append) (quote local)))
                  (org-bracket-link-regexp org-src-window-setup *this* org-babel-confirm-evaluate-answer-no org-src-preserve-indentation org-src-lang-modes
                   org-edit-src-content-indentation org-babel-library-of-babel t)
                  nil (add-hook (quote change-major-mode-hook) (quote org-babel-show-result-all) (quote append) (quote local)))
                 org-babel-result-hide-spec org-babel-hide-all-hashes)
 org-outline-path-complete-in-steps nil
 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-shiftdown-final-hook '(windmove-down)
 org-babel-pre-tangle-hook '(save-buffer)
 org-file-apps '(("\\.nb\\'" . "/opt/Wolfram/Mathematica/8.0/Executables/Mathematica %s") ("\\.xoj\\'" . "xournal %s") ("\\.pdf\\'" . "evince %s")
                 (" \\.pdf::\\([0-9]+\\)\\'" . "evince %s -p %1") (auto-mode . emacs) ("\\.x?html?\\'" . default) ("\\.nb\\'" . "mathematica %s"))
 org-tab-first-hook '(org-babel-hide-result-toggle-maybe org-babel-header-arg-expand)
 org-hide-leading-stars t
 org-babel-load-languages '((R . t) (shell . t) (python . t) (perl . t) (C . t) (matlab . t) (latex . t) (scheme . t) (scala . t) (ruby . t) (sqlite . t)
                            (java . t) (js . t) (elasticsearch . t))
 org-shiftright-final-hook '(windmove-right)
 org-occur-hook '(org-first-headline-recenter)
 outline-minor-mode-hook '(th-outline-minor-mode-init
                           (lambda nil (define-key outline-minor-mode-map (kbd "TAB") (quote org-cycle))
                            (define-key outline-minor-mode-map [(tab)] (quote org-cycle))
                            (define-key outline-minor-mode-map [(shift tab)] (quote org-global-cycle))
                            (define-key outline-minor-mode-map [backtab] (quote org-global-cycle)))
 org-structure-template-alist '(("s" "#+begin_src ?\n\n#+end_src" "<src lang=\"?\">\n\n</src>")
                                ("e" "#+begin_example\n?\n#+end_example" "<example>\n?\n</example>")
                                ("q" "#+begin_quote\n?\n#+end_quote" "<quote>\n?\n</quote>") ("v" "#+begin_verse\n?\n#+end_verse" "<verse>\n?\n</verse>")
                                ("c" "#+begin_center\n?\n#+end_center" "<center>\n?\n</center>")
                                ("l" "#+begin_latex\n?\n#+end_latex" "<literal style=\"latex\">\n?\n</literal>")
                                ("L" "#+latex: " "<literal style=\"latex\">?</literal>")
                                ("h" "#+begin_html\n?\n#+end_html" "<literal style=\"html\">\n?\n</literal>")
                                ("H" "#+html: " "<literal style=\"html\">?</literal>") ("a" "#+begin_ascii\n?\n#+end_ascii") ("A" "#+ascii: ")
                                ("i" "#+index: ?" "#+index: ?") ("I" "#+include %file ?" "<include file=%file markup=\"?\">"))
 org-cycle-hook '(org-cycle-hide-archived-subtrees org-cycle-hide-drawers org-cycle-show-empty-lines org-optimize-window-after-visibility-change)
 org-todo-keywords '((sequence "TODO" "WAIT" "|" "DONE" "CANCELED"))
 org-speed-command-hook '(org-speed-command-default-hook org-babel-speed-command-hook)
 org-replace-disputed-keys t
 org-shiftleft-final-hook '(windmove-left)
 org-babel-tangle-lang-exts '(("es" . "es") ("java" . "java") ("ruby" . "rb") ("scala" . "scala") ("latex" . "tex") ("D" . "d") ("C++" . "cpp")
                              ("perl" . "pl") ("python" . "py") ("emacs-lisp" . "el") ("elisp" . "el"))
 org-return-follows-link t
 org-src-ask-before-returning-to-edit-buffer nil
 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) ("man" :follow org-man-open :export org-man-export :store org-man-store-link)
                       ("git" :follow org-git-open :store org-git-store-link) ("gitbare" :follow org-gitbare-open)
                       ("occur" :follow org-occur-open :export nil) ("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-disputed-keys '(([(shift up)] . [(meta p)]) ([(shift down)] . [(meta n)]) ([(shift left)] . [(meta -)]) ([(shift right)] . [(meta +)])
                     ([(meta return)] . [(control meta return)]) ([(control shift right)] . [(meta shift +)]) ([(control shift left)] . [(meta shift -)]))
 org-entities-user '(("bbE" "\\mathbb{E}" t "E" "E" "E" "E") ("bbR" "\\mathbb{R}" t "R" "R" "R" "ℝ") ("bbC" "\\mathbb{C}" t "C" "C" "C" "ℂ")
                     ("bbZ" "\\mathbb{Z}" t "Z" "Z" "Z" "ℤ") ("bbP" "\\mathbb{P}" t "P" "P" "P" "ℙ") ("bbQ" "\\mathbb{Q}" t "Q" "Q" "Q" "ℚ")
                     ("bbN" "\\mathbb{N}" t "N" "N" "N" "ℕ") ("calN" "\\mathcal{N}" t "N" "N" "N" "N") ("calO" "\\mathcal{O}" t "O" "O" "O" "O")
                     ("calF" "\\mathcal{F}" t "F" "F" "F" "ℱ") ("hbar" "\\hbar" t "&#8463;" "hbar" "hbar" "ℏ")
                     ("sqrt" "\\sqrt{\\,}" t "&radic;" "[square root]" "[square root]" "√"))
 org-src-window-setup 'current-window
 org-confirm-babel-evaluate nil
 org-directory "~/Dropbox/org/"
 org-goto-interface 'outline-path-completion
 org-use-speed-commands t
 org-default-notes-file "~/Dropbox/org//org-capture.org"

reply via email to

[Prev in Thread] Current Thread [Next in Thread]