From: Dobrica Pavlinusic <dpavlin@rot13.org>
Date: Sun, 25 Nov 2007 23:53:21 +0000 (+0000)
Subject:  r284@brr:  dpavlin | 2007-11-26 00:53:03 +0100
X-Git-Url: http://git.rot13.org/?p=perl-cwmp.git;a=commitdiff_plain;h=d9b1966a99f651a3df0ed726e210f131b3f53482

 r284@brr:  dpavlin | 2007-11-26 00:53:03 +0100
 added FactoryReset


git-svn-id: https://perl-cwmp.googlecode.com/svn/trunk@235 836a5e1a-633d-0410-964b-294494ad4392
---

diff --git a/lib/CWMP/Methods.pm b/lib/CWMP/Methods.pm
index 585dceb..f032733 100644
--- a/lib/CWMP/Methods.pm
+++ b/lib/CWMP/Methods.pm
@@ -219,6 +219,20 @@ sub Reboot {
 	});
 }
 
+=head2 FactoryReset
+
+  $method->FactoryReset( $state );
+
+=cut
+
+sub FactoryReset {
+	my ( $self, $state ) = @_;
+	$self->xml( $state, sub {
+		my ( $X, $state ) = @_;
+		$X->FactoryReset();
+	});
+}
+
 
 =head1 Server methods