1 files changed, 28 insertions, 0 deletions
diff --git a/edit_changelog_etch.py b/edit_changelog_etch.py
new file mode 100644
index 0000000..61cf371
--- /dev/null
+++ b/edit_changelog_etch.py
@@ -0,0 +1,28 @@
+#!/usr/bin/python
+# SVN: $Id: edit_changelog.py 5 2006-12-20 14:08:52Z ranke $
+# Author: Johannes Ranke <jranke@uni-bremen.de>
+# Last Change: 2006 Dez 20
+
+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-cran',
+                    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))