From 7cbd1bbdd5e613561ea7227081f7ddd666b98ee0 Mon Sep 17 00:00:00 2001 From: Richard Jones Date: Wed, 29 Jul 2009 10:15:06 +0100 Subject: [PATCH] Lib: Document the $ro parameter for mount_operating_system properly. --- perl/lib/Sys/Guestfs/Lib.pm | 9 +++++---- 1 file changed, 5 insertions(+), 4 deletions(-) diff --git a/perl/lib/Sys/Guestfs/Lib.pm b/perl/lib/Sys/Guestfs/Lib.pm index 4020c24..bc8be9d 100644 --- a/perl/lib/Sys/Guestfs/Lib.pm +++ b/perl/lib/Sys/Guestfs/Lib.pm @@ -1049,13 +1049,14 @@ sub _find_filesystem =head2 mount_operating_system - mount_operating_system ($g, \%os); + mount_operating_system ($g, \%os, [$ro]); This function mounts the operating system described in the C<%os> hash according to the C table in that hash (see C). -The partitions are mounted read-only. +The partitions are mounted read-only unless the third parameter +is specified as zero explicitly. To reverse the effect of this call, use the standard libguestfs API call C<$g-Eumount_all ()>. @@ -1067,9 +1068,9 @@ sub mount_operating_system local $_; my $g = shift; my $os = shift; - my $ro = shift; # Read-only? + my $ro = shift; # Read-only? - $ro = 1 unless(defined($ro)); # ro defaults to 1 if unspecified + $ro = 1 unless defined $ro; # ro defaults to 1 if unspecified my $mounts = $os->{mounts}; -- 1.8.3.1