pkg update and first config fix
org-brain not working, add org-roam
This commit is contained in:
@@ -1,10 +1,10 @@
|
||||
;;; ol-eww.el --- Store URL and kill from Eww mode -*- lexical-binding: t -*-
|
||||
|
||||
;; Copyright (C) 2014-2021 Free Software Foundation, Inc.
|
||||
;; Copyright (C) 2014-2022 Free Software Foundation, Inc.
|
||||
|
||||
;; Author: Marco Wahl <marcowahlsoft>a<gmailcom>
|
||||
;; Keywords: link, eww
|
||||
;; Homepage: https://orgmode.org
|
||||
;; URL: https://orgmode.org
|
||||
|
||||
;; This file is part of GNU Emacs.
|
||||
|
||||
@@ -44,14 +44,14 @@
|
||||
|
||||
|
||||
;;; Code:
|
||||
|
||||
(require 'org-macs)
|
||||
(org-assert-version)
|
||||
|
||||
(require 'ol)
|
||||
(require 'cl-lib)
|
||||
(require 'eww)
|
||||
|
||||
;; For Emacsen < 25.
|
||||
(defvar eww-current-title)
|
||||
(defvar eww-current-url)
|
||||
|
||||
|
||||
;; Store Org link in Eww mode buffer
|
||||
(org-link-set-parameters "eww"
|
||||
@@ -67,14 +67,10 @@
|
||||
(when (eq major-mode 'eww-mode)
|
||||
(org-link-store-props
|
||||
:type "eww"
|
||||
:link (if (< emacs-major-version 25)
|
||||
eww-current-url
|
||||
(eww-current-url))
|
||||
:link (eww-current-url)
|
||||
:url (url-view-url t)
|
||||
:description (if (< emacs-major-version 25)
|
||||
(or eww-current-title eww-current-url)
|
||||
(or (plist-get eww-data :title)
|
||||
(eww-current-url))))))
|
||||
:description (or (plist-get eww-data :title)
|
||||
(eww-current-url)))))
|
||||
|
||||
|
||||
;; Some auxiliary functions concerning links in Eww buffers
|
||||
@@ -115,7 +111,7 @@ keep the structure of the Org file."
|
||||
(setq transform-start (region-beginning))
|
||||
(setq transform-end (region-end))
|
||||
;; Deactivate mark if current mark is activate.
|
||||
(when (fboundp 'deactivate-mark) (deactivate-mark)))
|
||||
(deactivate-mark))
|
||||
(message "Transforming links...")
|
||||
(save-excursion
|
||||
(goto-char transform-start)
|
||||
|
||||
Reference in New Issue
Block a user