File: mkChangeLog

package info (click to toggle)
shoop 0.1
  • links: PTS
  • area: main
  • in suites: woody
  • size: 328 kB
  • ctags: 41
  • sloc: sh: 1,138; makefile: 209; perl: 44
file content (32 lines) | stat: -rwxr-xr-x 515 bytes parent folder | download 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
 
#!/bin/sh -e
NAMES=$(awk "
/^CVS:/{
	sub(/^CVS:/, \"\");
	printf \"-u '%s:\", \$1;
	sub(\$1 \" \",\"\");
	split(\$0, A, / *[<>] */);
	printf \"%s:%s'\n\", A[1], A[2]
}
" docs/AUTHORS)
eval rcs2log -v $NAMES | 
awk '
/	\* /{
	split($0,A,/:/);
	count=split(A[1],B,/, /);
	first=1;
	for(C = 1; C <= count; C++) {
		if(!first)
			printf ", ";
		sub(/\/cvsroot\/shoop\/shoop\//,"",B[C]);
		printf "%s", B[C];
		first=0
	}
	printf ":%s\n", A[2];
	printed=1
}
{
	if(printed != 1)
		print;
	printed=0
}
' > ${1:-ChangeLog}