--- trunk/lib/Frey/SVK.pm	2008/11/29 15:58:23	619
+++ trunk/lib/Frey/SVK.pm	2008/11/29 16:17:18	620
@@ -19,7 +19,7 @@
 	isa => 'Str',
 );
 
-has message => (
+has commit_message => (
 	documentation => 'commit message',
 	is => 'rw',
 	isa => 'Str',
@@ -84,7 +84,7 @@
 		$status = qq|
 			<div class="commit">
 				<form>
-				<textarea name="message" cols=40 rows=4></textarea>
+				<textarea name="commit_message" cols=40 rows=4></textarea>
 				<br><input type="submit" name="action" value="commit">
 				</form>
 			</div>
@@ -125,8 +125,8 @@
 	if ( $self->action ) {
 		my $cmd = 'svk ' . $self->action . ' ' . $self->path;
 		if ( $self->action eq 'commit' ) {
-			confess "need message" unless $self->message;
-			my $msg = $self->message;
+			confess "need commit message" unless $self->commit_message;
+			my $msg = $self->commit_message;
 			$msg =~ s{"}{\\"}gs;
 			$cmd .= qq{ -m "$msg"};
 		} else {