summaryrefslogtreecommitdiff
path: root/local
diff options
context:
space:
mode:
Diffstat (limited to 'local')
-rw-r--r--local/bibli-paris/bibli-paris.el8
1 files changed, 6 insertions, 2 deletions
diff --git a/local/bibli-paris/bibli-paris.el b/local/bibli-paris/bibli-paris.el
index 9d250ce..1a4d2e5 100644
--- a/local/bibli-paris/bibli-paris.el
+++ b/local/bibli-paris/bibli-paris.el
@@ -240,10 +240,14 @@ at the central library."
;;;###autoload
(defun bibli-paris/update-entry ()
"Update the schedule and quote of the entry at point."
- (interactive
+ (interactive)
(deferred:$
+ (deferred:call 'message
+ "Fetching holdings for %s (%s) ..."
+ (bibli-paris/get-entry-title)
+ (bibli-paris/get-entry-author))
(bibli-paris/fetch-entry-holdings-by-id (bibli-paris/get-entry-recnum))
- (deferred:nextc it 'bibli-paris/update-entry-from))))
+ (deferred:nextc it 'bibli-paris/update-entry-from)))
(defun bibli-paris/async-update-entries-at-points (pom-recnum-seq)
"Update all entries specified by their positions and record numbers in