diff options
Diffstat (limited to 'perl-install/swap.pm')
| -rw-r--r-- | perl-install/swap.pm | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/perl-install/swap.pm b/perl-install/swap.pm index 17033f39f..c3d14e4b7 100644 --- a/perl-install/swap.pm +++ b/perl-install/swap.pm @@ -126,8 +126,10 @@ sub enable($;$) { } sub swapon($) { + log::l("swapon called with $_[0]"); syscall_('swapon', devices::make($_[0]), 0) or die "swapon($_[0]) failed: $!"; } + sub swapoff($) { syscall_('swapoff', devices::make($_[0])) or die "swapoff($_[0]) failed: $!"; } |