... | ... |
@@ -206,7 +206,7 @@ sub blob_content_type { |
206 | 206 |
sub blob_mode { |
207 | 207 |
my ($self, $user, $project, $rev, $file) = @_; |
208 | 208 |
|
209 |
- # Mode |
|
209 |
+ # Blob mode |
|
210 | 210 |
$file =~ s#/+$##; |
211 | 211 |
my @cmd = $self->cmd( |
212 | 212 |
$user, |
... | ... |
@@ -228,7 +228,7 @@ sub blob_mode { |
228 | 228 |
sub blob_raw { |
229 | 229 |
my ($self, $user, $project, $rev, $path) = @_; |
230 | 230 |
|
231 |
- # Get blob raw |
|
231 |
+ # Blob raw |
|
232 | 232 |
my @cmd = $self->cmd($user, $project, 'cat-file', 'blob', "$rev:$path"); |
233 | 233 |
open my $fh, "-|", @cmd |
234 | 234 |
or croak 500, "Open git-cat-file failed"; |
... | ... |
@@ -240,10 +240,10 @@ sub blob_raw { |
240 | 240 |
return $blob_raw; |
241 | 241 |
} |
242 | 242 |
|
243 |
-sub blob_size_kb { |
|
243 |
+sub blob_size { |
|
244 | 244 |
my ($self, $user, $project, $rev, $file) = @_; |
245 | 245 |
|
246 |
- # Command "git diff-tree" |
|
246 |
+ # Blob size(KB) |
|
247 | 247 |
my @cmd = $self->cmd( |
248 | 248 |
$user, |
249 | 249 |
$project, |
... | ... |
@@ -257,14 +257,14 @@ sub blob_size_kb { |
257 | 257 |
chomp $size; |
258 | 258 |
close $fh or croak 'Reading cat-file failed'; |
259 | 259 |
|
260 |
- my $size_kb = sprintf('%.3f', $size / 1000); |
|
261 |
- |
|
262 |
- $size_kb =~ s/0+$//; |
|
260 |
+ # Format |
|
261 |
+ my $size_f = sprintf('%.3f', $size / 1000); |
|
262 |
+ $size_f =~ s/0+$//; |
|
263 | 263 |
|
264 |
- return $size_kb; |
|
264 |
+ return $size_f; |
|
265 | 265 |
} |
266 | 266 |
|
267 |
-sub branch_exists { |
|
267 |
+sub exists_branch { |
|
268 | 268 |
my ($self, $user, $project) = @_; |
269 | 269 |
|
270 | 270 |
my $home = $self->rep_home; |
... | ... |
@@ -21,7 +21,7 @@ |
21 | 21 |
my $lines = $git->blob($user, $project, $rev, $file); |
22 | 22 |
|
23 | 23 |
# File size |
24 |
- my $file_size = $git->blob_size_kb($user, $project, $rev, $file); |
|
24 |
+ my $file_size = $git->blob_size($user, $project, $rev, $file); |
|
25 | 25 |
|
26 | 26 |
# File mode |
27 | 27 |
my $mode = $git->blob_mode($user, $project, $rev, $file); |
... | ... |
@@ -17,9 +17,7 @@ |
17 | 17 |
|
18 | 18 |
# Check exsitence |
19 | 19 |
my $commits_number; |
20 |
- if ($git->branch_exists($user, $project)) { |
|
21 |
- # Directory |
|
22 |
- |
|
20 |
+ if ($git->exists_branch($user, $project)) { |
|
23 | 21 |
# Commit |
24 | 22 |
my $commit = $git->get_commit($user, $project, $rev); |
25 | 23 |
|