aboutsummaryrefslogtreecommitdiff
path: root/build-aux
diff options
context:
space:
mode:
Diffstat (limited to 'build-aux')
-rw-r--r--build-aux/git2chg.awk30
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
@@ -14,8 +14,30 @@
# 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
@@ -35,6 +57,14 @@ NF==0 {
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:"

Return to:

Send suggestions and report system problems to the System administrator.