branch: externals/ebdb
commit 76f8d4b373d1634512cd3c99ddcd65928b4e53e1
Author: Eric Abrahamsen <e...@ericabrahamsen.net>
Commit: Eric Abrahamsen <e...@ericabrahamsen.net>
Make it clear what field type we're prompting for
* ebdb-i18n.el (ebdb-read): In these methods for address and phone
fields, the label prompt used to come first, and told the user what
kind of field they were adding. Now label prompts come last, and the
internationalized methods prompt for country first, and it wasn't
clear (especially during record creation) what field type was being
prompted for. Clarify that here.
---
ebdb-i18n.el | 4 ++--
1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/ebdb-i18n.el b/ebdb-i18n.el
index be29f33..7d70baf 100644
--- a/ebdb-i18n.el
+++ b/ebdb-i18n.el
@@ -681,7 +681,7 @@ for their symbol representations."
&optional slots obj)
(let ((country
(cdr (assoc (completing-read
- "Country: "
+ "Address country: "
(ebdb-i18n-countries)
nil nil
(when obj (car (rassoc (ebdb-address-country obj)
@@ -736,7 +736,7 @@ for their symbol representations."
(if obj
(slot-value obj 'country-code)
(cdr (assoc (completing-read
- "Country/Region: "
+ "Phone number country/region: "
ebdb-i18n-phone-codes nil nil)
ebdb-i18n-phone-codes))))
(area-code (when obj (slot-value obj 'area-code))))
