The idea is NOT to use subroutine prototypes to create new syntax;
prototypes are to be purely informational and optional. Subroutine
prototypes are meant in gitweb to mark untypical parameters, like
having hash as an argument, or using hash for last parameter to pass
extra options to subroutine.
(Truth to be told this change was caused by the fact that CPerl mode,
Perl mode for GNU Emacs, got confused in presence of "sub name($) {"
prototype...)
Signed-off-by: Jakub Narebski <jnareb@xxxxxxxxx>
---
gitweb/gitweb.perl | 10 +++++-----
1 files changed, 5 insertions(+), 5 deletions(-)
diff --git a/gitweb/gitweb.perl b/gitweb/gitweb.perl
index ec73cb1..ee5cbd6 100755
--- a/gitweb/gitweb.perl
+++ b/gitweb/gitweb.perl
@@ -587,7 +587,7 @@ exit;
## ======================================================================
## action links
-sub href(%) {
+sub href (%) {
my %params = @_;
# default is to use -absolute url() i.e. $my_uri
my $href = $params{-full} ? $my_url : $my_uri;
@@ -740,7 +740,7 @@ sub esc_html ($;%) {
}
# quote control characters and escape filename to HTML
-sub esc_path {
+sub esc_path ($;%) {
my $str = shift;
my %opts = @_;
@@ -754,7 +754,7 @@ sub esc_path {
}
# Make control characters "printable", using character escape codes (CEC)
-sub quot_cec {
+sub quot_cec ($;%) {
my $cntrl = shift;
my %opts = @_;
my %es = ( # character escape codes, aka escape sequences
@@ -780,7 +780,7 @@ sub quot_cec {
# Alternatively use unicode control pictures codepoints,
# Unicode "printable representation" (PR)
-sub quot_upr {
+sub quot_upr ($;%) {
my $cntrl = shift;
my %opts = @_;
@@ -982,7 +982,7 @@ use constant {
};
# submodule/subproject, a commit object reference
-sub S_ISGITLINK($) {
+sub S_ISGITLINK {
my $mode = shift;
return (($mode & S_IFMT) == S_IFGITLINK)
--
1.5.4.4
--
To unsubscribe from this list: send the line "unsubscribe git" in
the body of a message to majordomo@xxxxxxxxxxxxxxx
More majordomo info at http://vger.kernel.org/majordomo-info.html
