#acl bernie:read,write All:read
def _macro_WordIndex(*args, **kvargs):
s = make_index_key()
pages = list(page_list())
map = {}
word_re = re.compile('[A-Z][a-z]+')
for name in pages:
for word in word_re.findall(name):
try:
map[word].append(name)
except KeyError:
map[word] = [name]
all_words = list(map.keys())
all_words.sort()
last_letter = None
# set title
for word in all_words:
letter = word[0].lower()
if letter != last_letter:
s += '%s
' % (letter, letter)
last_letter = letter
s += '%s