From 7d8c8f8b00a34baadfd02dfd098f864591253716 Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Mon, 17 Apr 2000 22:59:53 +0000
Subject: no_comment

---
 perl-install/swap.pm | 2 ++
 1 file changed, 2 insertions(+)

(limited to 'perl-install/swap.pm')

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: $!";
 }
-- 
cgit v1.2.1