Changeset 20090
- Timestamp:
- Oct 13, 2008, 10:09:38 AM (18 years ago)
- File:
-
- 1 edited
-
trunk/Nebulous-Server/lib/Nebulous/Server.pm (modified) (9 diffs)
Legend:
- Unmodified
- Added
- Removed
-
trunk/Nebulous-Server/lib/Nebulous/Server.pm
r20057 r20090 1 1 # Copyright (c) 2004-2008 Joshua Hoblitt 2 2 # 3 # $Id: Server.pm,v 1.9 1 2008-10-11 01:24:21jhoblitt Exp $3 # $Id: Server.pm,v 1.92 2008-10-13 20:09:38 jhoblitt Exp $ 4 4 5 5 package Nebulous::Server; … … 31 31 use constant NFS_RETRIES => 100; 32 32 33 sub new { 33 sub new 34 { 34 35 my $class = shift; 35 36 … … 58 59 } 59 60 60 sub db { 61 62 sub db 63 { 61 64 my $self = shift; 62 65 … … 235 238 } 236 239 240 237 241 sub rename_object 238 242 { … … 419 423 } 420 424 425 421 426 sub lock_object 422 427 { … … 520 525 return 1; 521 526 } 527 522 528 523 529 sub unlock_object … … 1325 1331 } 1326 1332 1333 1327 1334 sub _create_empty_instance_file 1328 1335 { … … 1427 1434 return File::Spec->catdir($vol_path, @path); 1428 1435 } 1436 1429 1437 1430 1438 sub _retry … … 1472 1480 } 1473 1481 1482 1474 1483 1; 1475 1484
Note:
See TracChangeset
for help on using the changeset viewer.
