diff options
-rw-r--r-- | perl/Git.pm | 8 | ||||
-rw-r--r-- | perl/Git.xs | 4 |
2 files changed, 6 insertions, 6 deletions
diff --git a/perl/Git.pm b/perl/Git.pm index 61730430f..5ec7ef8c2 100644 --- a/perl/Git.pm +++ b/perl/Git.pm @@ -485,13 +485,13 @@ sub wc_chdir { } -=item hash_object ( FILENAME [, TYPE ] ) +=item hash_object ( TYPE, FILENAME ) -=item hash_object ( FILEHANDLE [, TYPE ] ) +=item hash_object ( TYPE, FILEHANDLE ) Compute the SHA1 object id of the given C<FILENAME> (or data waiting in -C<FILEHANDLE>) considering it is of the C<TYPE> object type (C<blob> -(default), C<commit>, C<tree>). +C<FILEHANDLE>) considering it is of the C<TYPE> object type (C<blob>, +C<commit>, C<tree>). In case of C<FILEHANDLE> passed instead of file name, all the data available are read and hashed, and the filehandle is automatically diff --git a/perl/Git.xs b/perl/Git.xs index 8b06ebfae..3030ba9ab 100644 --- a/perl/Git.xs +++ b/perl/Git.xs @@ -104,9 +104,9 @@ CODE: } char * -xs_hash_object(file, type = "blob") - SV *file; +xs_hash_object(type, file) char *type; + SV *file; CODE: { unsigned char sha1[20]; |