Working backporting environment

git-svn-id: svn+ssh://stiller/home/schatz/reps/r-backports@4 f247ebf9-aa24-0410-a698-f940e971ad2b

1 files changed, 26 insertions, 0 deletions

diff --git a/edit_changelog.py b/edit_changelog.py
new file mode 100644
index 0000000..d85d48b
--- /dev/null
+++ b/edit_changelog.py
@@ -0,0 +1,26 @@
+#!/usr/bin/python
+# edit_changelog.py
+
+from time import strftime
+from debian_bundle.changelog import Changelog, Version
+
+author = 'Johannes Ranke <jranke@uni-bremen.de>'
+
+chlg = "debian/changelog"
+content = file(chlg).read()
+changelog = Changelog(content)
+newVersion = changelog.upstream_version()  + "-" + changelog.debian_version()  + "~cran.1"
+
+changelog.new_block(package=changelog.package(),
+                    version=Version(newVersion),
+                    distributions='etch-backports',
+                    urgency='low',
+                    author=author,
+                    date=strftime("%a, %e %b %Y %H:%M:%S %z"),
+                    )
+
+changelog.add_change('');
+changelog.add_change('  * Backport to etch for repository on CRAN');
+changelog.add_change('');
+
+file(chlg,"w").write(str(changelog))