[Bps-public-commit] App-Changeloggr branch, master, updated. 887606bdf829d8e2a9805c4bcc6c12736061779c
Alex M Vandiver
alexmv at bestpractical.com
Mon Mar 30 14:43:46 EDT 2009
The branch, master has been updated
via 887606bdf829d8e2a9805c4bcc6c12736061779c (commit)
via 5e5746fabd97ba60692f0699035e54f459e72eb3 (commit)
via e812846176cb051b567cd12d3fe40cc84233316c (commit)
from 39a62f1cf62c4f60ed00e0295fc325d3d53fc3f1 (commit)
Summary of changes:
lib/App/Changeloggr/Model/ChangeCollection.pm | 29 -------------------------
lib/App/Changeloggr/View.pm | 5 ++++
2 files changed, 5 insertions(+), 29 deletions(-)
- Log -----------------------------------------------------------------
commit e812846176cb051b567cd12d3fe40cc84233316c
Author: Alex Vandiver <alexmv at mit.edu>
Date: Mon Mar 30 14:42:07 2009 -0400
Remove old hashify_git_stanza
diff --git a/lib/App/Changeloggr/Model/ChangeCollection.pm b/lib/App/Changeloggr/Model/ChangeCollection.pm
index 452fc08..b24dc1a 100644
--- a/lib/App/Changeloggr/Model/ChangeCollection.pm
+++ b/lib/App/Changeloggr/Model/ChangeCollection.pm
@@ -127,34 +127,5 @@ CommitDate: Wed Jan 28 00:05:55 2009 +0000
=cut
-sub hashify_git_stanza {
- my @lines = (@_);
- my $content = join('', at lines);
- my $stanza = {};
- if ($content =~ /^commit (.*)$/im) {
- $stanza->{commit_id} = $1;
- }
- if ($content =~ /^Author:\s*(.*)$/im) {
- $stanza->{author} = $1;
- }
- if ($content =~ /^(?:Author)?Date:\s*(.*)$/im) {
- $stanza->{date} = $1;
- }
- if ($content =~ /^Commit:\s*(.*)$/im) {
- $stanza->{commit} = $1;
- }
- if ($content =~ /^CommitDate:\s*(.*)$/im) {
- $stanza->{commit_date} = $1;
- }
-
- if ($content =~ /.*?^(\s{4}.*?)(^\s{1,2}\S+\s+\|\s+\d+|\z)/ims) {
- $stanza->{msg} = $1;
- }
- if ($content =~ /\n(\s{1,2}\S+\s+\|\s+\d+.*)$/ims) {
- $stanza->{changed_files} = $1;
- }
- return $stanza;
-}
-
1;
commit 5e5746fabd97ba60692f0699035e54f459e72eb3
Author: Alex Vandiver <alexmv at mit.edu>
Date: Mon Mar 30 14:43:07 2009 -0400
Remove salutation, since we have no users
diff --git a/lib/App/Changeloggr/View.pm b/lib/App/Changeloggr/View.pm
index 0b9362b..aa7a224 100644
--- a/lib/App/Changeloggr/View.pm
+++ b/lib/App/Changeloggr/View.pm
@@ -4,6 +4,9 @@ use JiftyX::ModelHelpers;
use strict;
use warnings;
+# No salutation, ever
+template '/salutation' => sub {};
+
template '/' => page {
my $changelogs = M(ChangelogCollection => done => 0);
$changelogs->with_changes;
commit 887606bdf829d8e2a9805c4bcc6c12736061779c
Author: Alex Vandiver <alexmv at mit.edu>
Date: Mon Mar 30 14:43:34 2009 -0400
Redirect to create changelog when there are no existing changelogs
diff --git a/lib/App/Changeloggr/View.pm b/lib/App/Changeloggr/View.pm
index aa7a224..3f47736 100644
--- a/lib/App/Changeloggr/View.pm
+++ b/lib/App/Changeloggr/View.pm
@@ -18,6 +18,8 @@ template '/' => page {
li { changelog_summary($changelog) }
}
}
+ } else {
+ redirect '/create-changelog';
}
};
-----------------------------------------------------------------------
More information about the Bps-public-commit
mailing list