 (setq denote-directory (expand-file-name "~/memex"))
 
 (define-key global-map (kbd "C-c n r") #'denote-dired-rename-file)
+(define-key global-map (kbd "C-c n n") #'denote-create-note)
+(define-key global-map (kbd "C-c n l") #'denote-link-insert-link)
+
+;;; Logos narrowing
+
+(when (not (package-installed-p 'logos))
+  (package-refresh-contents)
+  (package-install 'logos))
+(require 'logos)
+(setq logos-outlines-are-pages t)
+(setq logos-outline-regexp-alist
+      `((emacs-lisp-mode . "^;;;+ ")
+        (org-mode . "^\\*+ +")
+        (t . ,(or outline-regexp logos--page-delimiter))))
+(define-key global-map (kbd "C-x n l") #'logos-narrow-dwim)
 
 ;;; init.el ends here

(when (eq system-type 'darwin)
  (setq gnutls-algorithm-priority "NORMAL:-VERS-TLS1.3"))

(package-initialize)

;;; ---------- Use better defaults ----------

(when (not (package-installed-p 'modus-themes))
  (package-refresh-contents)
  (package-install 'modus-themes))

(setq modus-themes-bold-constructs t
      modus-themes-italic-constructs t
      modus-themes-links nil
      modus-themes-mode-line 'accented
      modus-themes-markup '(bold)
      modus-themes-org-blocks 'background)

(setq org-fontify-quote-and-verse-blocks t)

(load-theme 'modus-operandi)
(define-key global-map (kbd "<f5>") #'modus-themes-toggle)

;; (setq modus-themes-org-blocks 'gray-background)

;; I seperate my sentences with one space not two.
(setq-default sentence-end-double-space nil)
