1 ! Copyright (C) 2007, 2008 Slava Pestov.
2 ! See http://factorcode.org/license.txt for BSD license.
3 USING: io.files io.launcher io.styles io.encodings.ascii
4 prettyprint io hashtables kernel sequences assocs system sorting
8 : changelog ( -- authors )
9 image parent-directory [
10 "git log --pretty=format:%an" ascii <process-reader> lines
13 : patch-counts ( authors -- assoc )
15 [ dup rot [ = ] with count ] with
19 changelog patch-counts
20 sort-values <reversed>