branch: externals/ebdb commit fb7e4d267dae3e2971b8e0026b224d47ba3dc42b Author: Eric Abrahamsen <e...@ericabrahamsen.net> Commit: Eric Abrahamsen <e...@ericabrahamsen.net>
Add formatting for Russian phone numbers * ebdb-i18n-basic.el (ebdb-string-i18n): Why not? --- ebdb-i18n-basic.el | 16 ++++++++++++++++ 1 file changed, 16 insertions(+) diff --git a/ebdb-i18n-basic.el b/ebdb-i18n-basic.el index 892305c..351d11b 100644 --- a/ebdb-i18n-basic.el +++ b/ebdb-i18n-basic.el @@ -207,5 +207,21 @@ ebdb-i18n-india-states))))) slots) +;;; Russia + +(cl-defmethod ebdb-string-i18n ((phone ebdb-field-phone) + (_cc (eql 8))) + (with-slots (area-code number extension) phone + (concat + "+8 " + (when area-code (format "%d " area-code)) + (apply #'format + (cl-case (length number) + (5 "%s-%s%s-%s%s") + (6 "%s%s-%s%s-%s%s") + (7 "%s%s%s-%s%s-%s%s")) + (split-string number "" t)) + (when extension (format " X%s" extension))))) + (provide 'ebdb-i18n-basic) ;;; ebdb-i18n-basic.el ends here