@@ -1755,21 +1755,23 @@ sub unique_email_list {
1755
1755
sub validate_patch {
1756
1756
my $fn = shift ;
1757
1757
1758
- my $validate_hook = catfile(catdir($repo -> repo_path(), ' hooks' ),
1759
- ' sendemail-validate' );
1760
- my $hook_error ;
1761
- if (-x $validate_hook ) {
1762
- my $target = abs_path($fn );
1763
- # The hook needs a correct cwd and GIT_DIR.
1764
- my $cwd_save = cwd();
1765
- chdir ($repo -> wc_path() or $repo -> repo_path())
1766
- or die (" chdir: $! " );
1767
- local $ENV {" GIT_DIR" } = $repo -> repo_path();
1768
- $hook_error = " rejected by sendemail-validate hook"
1769
- if system ($validate_hook , $target );
1770
- chdir ($cwd_save ) or die (" chdir: $! " );
1771
- }
1772
- return $hook_error if $hook_error ;
1758
+ if ($repo ) {
1759
+ my $validate_hook = catfile(catdir($repo -> repo_path(), ' hooks' ),
1760
+ ' sendemail-validate' );
1761
+ my $hook_error ;
1762
+ if (-x $validate_hook ) {
1763
+ my $target = abs_path($fn );
1764
+ # The hook needs a correct cwd and GIT_DIR.
1765
+ my $cwd_save = cwd();
1766
+ chdir ($repo -> wc_path() or $repo -> repo_path())
1767
+ or die (" chdir: $! " );
1768
+ local $ENV {" GIT_DIR" } = $repo -> repo_path();
1769
+ $hook_error = " rejected by sendemail-validate hook"
1770
+ if system ($validate_hook , $target );
1771
+ chdir ($cwd_save ) or die (" chdir: $! " );
1772
+ }
1773
+ return $hook_error if $hook_error ;
1774
+ }
1773
1775
1774
1776
open (my $fh , ' <' , $fn )
1775
1777
or die sprintf (__(" unable to open %s : %s \n " ), $fn , $! );
0 commit comments