diff options
author | Sergey Poznyakoff <gray@gnu.org.ua> | 2011-05-13 23:43:07 +0300 |
---|---|---|
committer | Sergey Poznyakoff <gray@gnu.org.ua> | 2011-05-13 23:43:07 +0300 |
commit | 3b336240d9ac05bac621568b95086dbff2371acd (patch) | |
tree | c4a1f208ce8f33300f7e31811b79aa921f9e357e /build-aux/git2chg.awk | |
parent | 4c1056b45580fcb687cac656834f42dd9fba4ae8 (diff) | |
download | grecs-3b336240d9ac05bac621568b95086dbff2371acd.tar.gz grecs-3b336240d9ac05bac621568b95086dbff2371acd.tar.bz2 |
Improvements in git2chg.awk and grecs setup sequence.
* build-aux/git2chg.awk: New configuration variables:
since=YYYY-MM-DD, to cut off entries earlier than the
given date, and append=FILE, to append FILE to the
generated ChangeLog.
* am/grecs.m4 (GRECS_HOST_PROJECT_INCLUDES): New substitution
variable.
* src/Make.am (INCLUDES): Expand GRECS_HOST_PROJECT_INCLUDES.
* tests/Makefile.am: Likewise.
Diffstat (limited to 'build-aux/git2chg.awk')
-rw-r--r-- | build-aux/git2chg.awk | 30 |
1 files changed, 30 insertions, 0 deletions
diff --git a/build-aux/git2chg.awk b/build-aux/git2chg.awk index 1ddf698..11e2f1c 100644 --- a/build-aux/git2chg.awk +++ b/build-aux/git2chg.awk @@ -11,14 +11,36 @@ # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the # GNU General Public License for more details. # # You should have received a copy of the GNU General Public License # along with Grecs. If not, see <http://www.gnu.org/licenses/>. +BEGIN { + if (since) + split(since,since_a,"-") +} + +function timeok(t, a) { + if (!since) + return 1 + split(t,a,"-") + if (a[1] < since_a[1]) + return 0 + if (a[1] > since_a[1]) + return 1 + if (a[2] < since_a[2]) + return 0 + if (a[2] > since_a[2]) + return 1 + return a[3] > since_a[3] +} + /^[0-9]+ .* +<[^>]+>/ { s = strftime("%F", $1) + if (!timeok(s)) + exit sub(/^[0-9]+ +/,"") if (s == datestr && author == $0) next datestr = s author = $0 if (runlen) { runlen = 0; print "" } @@ -32,12 +54,20 @@ NF==0 { next } { if (runlen) { runlen = 0; print "" } print "\t" $0 } END { + if (append) { + print "" + while ((getline < append) > 0) { + if (match($0, /^Local *Variables:/)) + break + print + } + } print "\f" # Make sure Emacs won't recognize this line: print "Local", "Variables:" print "mode: change-log" print "version-control: never" print "buffer-read-only: t" |