2017-06-10 01:52:44 +02:00
|
|
|
;;; lang/org/autoload/capture.el -*- lexical-binding: t; -*-
|
2017-02-19 19:01:47 -05:00
|
|
|
|
2017-04-22 01:49:44 -04:00
|
|
|
;;;###autoload
|
2017-05-28 12:23:05 +02:00
|
|
|
(defun +org/capture (&optional key string)
|
2017-04-22 01:49:44 -04:00
|
|
|
"Initializes the current frame as a pop-up `org-capture' frame."
|
|
|
|
|
(interactive)
|
|
|
|
|
(let ((key (or key "n"))
|
|
|
|
|
(string (unless (string-empty-p string) string)))
|
|
|
|
|
(if string
|
|
|
|
|
(org-capture-string string key)
|
|
|
|
|
(org-capture nil key))))
|
