[ -z "${_GET[order]}" ] && _GET[order]="firstname"
+BR='
+'
+
listcourses() {
ls -1 ${_DATA}/ical/*ics |while read file; do
icstime="$(sed -rn 's:^DTSTART\:(TZID=.*\:)?([0-9]{4})([0-9]{2})([0-9]{2})T([0-9]{2})([0-9]{2})([0-9]{2})Z?\r$:\2-\3-\4 \5\:\6\:\7:p' "$file")"
done |sort |sed -r 's:^.*\t(.*/)([^/]+)$:\2:'
}
+list_hi_companies(){
+ sed -rn 's;^X-HEALTH-INSURANCE:([^\;]+)\;.*$;\1;p' ${_DATA}/vcard/*vcf
+}
+
listcards() {
case "${_GET[filtertype]}" in
any)
case "$line" in
key=*) printf %s\\n "$line"
;;
- value=*) printf %s\\n "$line"
+ value=*) printf %s\\n "${line}"
;;
tag=*) ot=''
printf %s "$line" \
if [ -z "$key" ]; then
eval "$line"
else
- values[$key]="$value"
+ values[$key]="${value//\\r\\n/$BR}"
for t in ${(k)tag}; do
tags[${key}_$t]="$tag[$t]"
done
if [ -z "$key" ]; then
eval "$line"
else
- [ -n "$value" ] && values[$key]="$value" || values[$key]='\r'
+ [ -n "$value" ] && values[$key]="${value//\\r\\n/$BR}" || values[$key]='\r'
for t in ${(k)tag}; do
tags[${key}_$t]="$tag[$t]"
done