diff options
| author | Sacha Chua <sacha@sachachua.com> | 2025-12-03 14:39:50 -0500 |
|---|---|---|
| committer | Sacha Chua <sacha@sachachua.com> | 2025-12-03 14:39:50 -0500 |
| commit | f7033806b5f496d426ba6324aed9978a84a9a39e (patch) | |
| tree | 4bfe1b6c7fead80cad5e773ca517b4880508d641 | |
| parent | cdbbdf6d2f46d5faa333da097b24015877eeb98a (diff) | |
| download | emacsconf-el-f7033806b5f496d426ba6324aed9978a84a9a39e.tar.xz emacsconf-el-f7033806b5f496d426ba6324aed9978a84a9a39e.zip | |
don't update if it's not interactive
| -rw-r--r-- | emacsconf-pad.el | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/emacsconf-pad.el b/emacsconf-pad.el index 7d43423..e5d20f3 100644 --- a/emacsconf-pad.el +++ b/emacsconf-pad.el @@ -264,9 +264,10 @@ ${next-talk-list} (emacsconf-pad-create-pad pad-id) (when (or emacsconf-pad-force-all (not (emacsconf-pad-modified-p pad-id)) - (progn - (browse-url (emacsconf-pad-url o)) - (y-or-n-p (format "%s might have been modified. Reset? " (plist-get o :slug))))) + (and (called-interactively-p) + (progn + (browse-url (emacsconf-pad-url o)) + (y-or-n-p (format "%s might have been modified. Reset? " (plist-get o :slug)))))) (emacsconf-pad-set-html pad-id (emacsconf-pad-initial-content o)) |