diff options
| author | Daniel Mendler <mail@daniel-mendler.de> | 2026-01-04 12:03:27 +0100 |
|---|---|---|
| committer | Daniel Mendler <mail@daniel-mendler.de> | 2026-01-04 12:03:27 +0100 |
| commit | f8682a046a57525754ebc812ba3ae9c973db083b (patch) | |
| tree | f13be30f2be180ed7f4ec7a9f9290d078bd1eeda /README.org | |
| parent | 93694ae3c1862bd835195669a55a3c817a8e7c58 (diff) | |
Use when-let*
Diffstat (limited to 'README.org')
| -rw-r--r-- | README.org | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -139,8 +139,8 @@ small example completion backend, which can be used with both (defun demo-backend (action &optional arg &rest _) (pcase action ('prefix - (when-let (beg (save-excursion - (and (re-search-backward "[;:]" (pos-bol) t) (point)))) + (when-let* ((beg (save-excursion + (and (re-search-backward "[;:]" (pos-bol) t) (point))))) (list (buffer-substring-no-properties beg (point)) "" t))) ('candidates (all-completions arg demo-alist)) ('annotation (concat " " (cdr (assoc arg demo-alist)))) |