[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] ebdb-bits 60dd5df: Stick to variable naming scheme
From: |
Eric Abrahamsen |
Subject: |
[elpa] ebdb-bits 60dd5df: Stick to variable naming scheme |
Date: |
Mon, 14 Aug 2017 19:13:31 -0400 (EDT) |
branch: ebdb-bits
commit 60dd5dfabca1824b7a32d83e527d1df4a91a4dde
Author: Eric Abrahamsen <address@hidden>
Commit: Eric Abrahamsen <address@hidden>
Stick to variable naming scheme
* packages/ebdb-i18n-chn/ebdb-i18n-chn.el
(ebdb-i18n-china-compound-surnames):
All auxiliary variables should start with "ebdb-i18n".
---
packages/ebdb-i18n-chn/ebdb-i18n-chn.el | 6 ++++--
1 file changed, 4 insertions(+), 2 deletions(-)
diff --git a/packages/ebdb-i18n-chn/ebdb-i18n-chn.el
b/packages/ebdb-i18n-chn/ebdb-i18n-chn.el
index 7fd80ac..1287b82 100644
--- a/packages/ebdb-i18n-chn/ebdb-i18n-chn.el
+++ b/packages/ebdb-i18n-chn/ebdb-i18n-chn.el
@@ -83,7 +83,7 @@
;; This isn't all of them, but it seems like a reasonable subset. See
;; https://en.wikipedia.org/wiki/Chinese_compound_surname for a fuller
;; list.
-(defvar ebdb-china-compound-surnames
+(defvar ebdb-i18n-chn-compound-surnames
'("慕容" "上官" "司马" "欧阳" "司徒" "司空" "西门" "爱新觉罗")
"A list of Chinese surnames that are longer than one
character.")
@@ -93,7 +93,9 @@
(_script (eql han))
&optional _slots)
(let (surname given-names)
- (if (string-match (format "\\`\\(%s\\)\\(.*\\)\\'" (regexp-opt
ebdb-china-compound-surnames)) string)
+ (if (string-match (format "\\`\\(%s\\)\\(.*\\)\\'"
+ (regexp-opt ebdb-i18n-chn-compound-surnames))
+ string)
(setq surname (match-string 1 string)
given-names (match-string 2 string))
(setq surname (substring string 0 1)
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [elpa] ebdb-bits 60dd5df: Stick to variable naming scheme,
Eric Abrahamsen <=