From 3fd950e823dff5ac1ab670d1a713fd2a06fc544c Mon Sep 17 00:00:00 2001 From: Jamie Strandboge Date: Mon, 11 Jan 2010 20:54:54 -0600 Subject: [PATCH] libraries/libapparmor/swig/perl/examples/example.pl: fix so it works again --- libraries/libapparmor/swig/perl/examples/example.pl | 10 +++++----- 1 file changed, 5 insertions(+), 5 deletions(-) diff --git a/libraries/libapparmor/swig/perl/examples/example.pl b/libraries/libapparmor/swig/perl/examples/example.pl index 2a7b4997d..8a571bb53 100644 --- a/libraries/libapparmor/swig/perl/examples/example.pl +++ b/libraries/libapparmor/swig/perl/examples/example.pl @@ -2,14 +2,14 @@ require LibAppArmor; $msg = "type=APPARMOR msg=audit(1168662182.495:58): PERMITTING r access to /home/matt/projects/change_hat_test/test (test_hat(27871) profile /home/matt/projects/change_hat_test/test_hat active null-complain-profile)"; -my($test) = AppArmorLogRecordParser::parse_record($msg); +my($test) = LibAppArmorc::parse_record($msg); -if (AppArmorLogRecordParser::aa_log_record::swig_event_get($test) == $AppArmorLogRecordParser::AA_RECORD_ALLOWED ) +if (LibAppArmor::aa_log_record::swig_event_get($test) == $AppArmorLogRecordParser::AA_RECORD_ALLOWED ) { print "AA_RECORD_ALLOWED\n"; } -print "Audit ID: " . AppArmorLogRecordParser::aa_log_record::swig_audit_id_get($test) . "\n"; -print "PID: " . AppArmorLogRecordParser::aa_log_record::swig_pid_get($test) . "\n"; +print "Audit ID: " . LibAppArmor::aa_log_record::swig_audit_id_get($test) . "\n"; +print "PID: " . LibAppArmor::aa_log_record::swig_pid_get($test) . "\n"; -AppArmorLogRecordParser::free_record($test); +LibAppArmorc::free_record($test);