Changeset 193

Timestamp:

Nov 17, 2004, 10:20:26 PM (20 years ago)

Author:

joergs

Message:

cleanup

File:

• trunk/dasscm/dasscm (modified) (3 diffs)

trunk/dasscm/dasscm

@@ -174 +174 @@
 }
 
+
+sub blame(@)
+{
+        check_parameter(@_,1);
+        check_env();
+        
+        (my $basename, my $dirname_prod, my $dirname_repo, my $filename_prod, my $filename_repo) = get_filenames($_[0]);
+
+        system( "$SVN blame --username $DASSCM_USER $subversion_options $filename_repo" );
+}
+
+
+
 sub commit(@)
 {
@@ -190 +203 @@
 
         # commit calls $EDITOR. uses "system" here, to display output
-        system( "$SVN commit --username $DASSCM_USER $subversion_options $DASSCM_REPO" );
+        system( "$SVN commit --username $DASSCM_USER $subversion_options $filename_repo" );
         # TODO: commit (-m)
 }
@@ -232 +245 @@
         } elsif (m/add/i) {
                 add(@ARGV);
+        } elsif (m/blame/i) {
+                blame(@ARGV);                   
         } elsif (m/commit/i) {
                 commit(@ARGV);