summaryrefslogtreecommitdiff
path: root/indexing/texindex/ix.genkey
blob: b1ffba45fa5d1b82be67ef34363402f6c355a9c4 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
# ix.genkey : Generierung eines Sortierschluessels ohne Sonderzeichen
# Eingabe: string1 string2 ... \t num num ...
# Ausgabe: string1 string2 ... (ohne S.Z.) \t string1 string2 ... \t num num ..
#
# Ersetze global die Tilde durch Spaces
s/~/ /g
# kopiere die Zeile in den Zwischenpuffer
h
# alles hinter \t loeschen
s/	.*$//
# zum Sortieren loesche alle nicht - alphanumerischen Zeichen
s/[^a-zA-Z0-9 ]//g
# falls dabei eine leere Zeile rauskommt, setze ein Space rein
s/^$/ /
# kopiere die urspruengliche Zeile aus dem Puffer hinter den Speicher
G
# ersetze newline zwischen den Zeilen durch \t
s/\n/	/
# Falls ein Komma am Ende des Strings steht, loesche es
s/,	/	/