1 |
jpp |
1.1 |
diff -Nur --no-dereference smeserver-git-1.2.0.old/root/usr/share/perl5/vendor_perl/esmith/FormMagick/Panel/git.pm smeserver-git-1.2.0/root/usr/share/perl5/vendor_perl/esmith/FormMagick/Panel/git.pm |
2 |
|
|
--- smeserver-git-1.2.0.old/root/usr/share/perl5/vendor_perl/esmith/FormMagick/Panel/git.pm 2013-02-09 21:49:54.000000000 -0500 |
3 |
|
|
+++ smeserver-git-1.2.0/root/usr/share/perl5/vendor_perl/esmith/FormMagick/Panel/git.pm 2023-03-24 23:05:20.429000000 -0400 |
4 |
|
|
@@ -830,7 +830,7 @@ |
5 |
|
|
sub git_repository_validate_name |
6 |
|
|
{ |
7 |
|
|
my( $self, $repositoryName ) = @_; |
8 |
|
|
- unless( $repositoryName =~ /^([A-Za-z][\_\-A-Za-z0-9]*)$/ ) { |
9 |
|
|
+ unless( $repositoryName =~ /^([A-Za-z][.\_\-A-Za-z0-9]*)$/ ) { |
10 |
|
|
return $self->localise('GIT_ERROR_NAME_HAS_INVALID_CHARS', |
11 |
|
|
{repositoryName => $repositoryName}); |
12 |
|
|
} |