Compare commits
2 Commits
c82358d586
...
b729ee8c7a
| Author | SHA1 | Date | |
|---|---|---|---|
|
|
b729ee8c7a | ||
|
|
ebc28cebd4 |
@@ -167,7 +167,12 @@
|
||||
"Advice to add DEADLINE for UNTIL in recurring events."
|
||||
(let ((result (funcall orig-fun eventdata-alist)))
|
||||
(let* ((rrule-props (alist-get 'rrule-props eventdata-alist))
|
||||
(until-str (cadr (assq 'UNTIL rrule-props))))
|
||||
(until-str (cadr (assoc 'UNTIL rrule-props)))
|
||||
(summary (alist-get 'summary eventdata-alist)))
|
||||
;; Debug: log what we're seeing (remove after debugging)
|
||||
(when rrule-props
|
||||
(message "CALDAV-DEBUG: %s | rrule-props: %S | until: %s"
|
||||
(or summary "?") rrule-props until-str))
|
||||
(when until-str
|
||||
(save-excursion
|
||||
(org-back-to-heading t)
|
||||
@@ -187,10 +192,13 @@
|
||||
)
|
||||
|
||||
(defun my/get-rbw-password (alias)
|
||||
"Return the password for ALIAS via rbw, unlocking the vault only if needed."
|
||||
(let* ((cmd (format "rbw get %s 2>&1" alias))
|
||||
(output (shell-command-to-string cmd)))
|
||||
(string-trim output)))
|
||||
"Return the password for ALIAS via rbw, unlocking the vault only if needed.
|
||||
Returns nil and signals an error if the entry is not found."
|
||||
(let* ((cmd (format "rbw get %s 2>/dev/null" (shell-quote-argument alias)))
|
||||
(output (string-trim (shell-command-to-string cmd))))
|
||||
(if (string-empty-p output)
|
||||
(user-error "rbw: no entry found for '%s' - run: rbw add %s" alias alias)
|
||||
output)))
|
||||
|
||||
(after! gptel
|
||||
:config
|
||||
|
||||
Reference in New Issue
Block a user