diff --git a/docs/changelog/5.x.x.txt b/docs/changelog/5.x.x.txt
index de1c68fcc..f8a8475b6 100644
--- a/docs/changelog/5.x.x.txt
+++ b/docs/changelog/5.x.x.txt
@@ -26,7 +26,7 @@
  - Added a check for malicious mail headers
  - Fixed bug [ 820144 ] Theme problems under Win32
  - Fixed bug [ 834633 ] View Threaded subscriptions fails
-
+ - Fixed bug [ 808704 ] Privilege API missing in Ruling WebGUI 5.4
 
 5.5.0
  - Rewrote the discussion system and added many new features in the process.
diff --git a/lib/WebGUI/Persistent/Query/Delete.pm b/lib/WebGUI/Persistent/Query/Delete.pm
index ac67a5819..3e6f68a75 100644
--- a/lib/WebGUI/Persistent/Query/Delete.pm
+++ b/lib/WebGUI/Persistent/Query/Delete.pm
@@ -22,7 +22,7 @@ our @ISA = qw(WebGUI::Persistent::Query);
 
 =head1 NAME
 
-Package WebGUI::Persistent::Query::Insert
+Package WebGUI::Persistent::Query::Delete
 
 =head1 DESCRIPTION
 
@@ -30,15 +30,9 @@ This class allows reliable dynamic building of Sql delete queries.
 
 =head1 SYNOPSIS
 
- my $query = WebGUI::Persistent::Query::Insert->new(
+ my $query = WebGUI::Persistent::Query::Delete->new(
    table => 'myTable',
-   where => [A => [1,2],[{C => 'hello',B => 1}]],
-   properties => {
-     A => { },
-     B => { },
-     C => { quote => 1 },
-     D => { quote => 1 },
-   }
+   where => [A => [1,2],[{C => 'hello',B => 1}]]
  );
 
  $query->buildQuery();
diff --git a/lib/WebGUI/Persistent/Query/Update.pm b/lib/WebGUI/Persistent/Query/Update.pm
index ffe58dad7..99befec22 100644
--- a/lib/WebGUI/Persistent/Query/Update.pm
+++ b/lib/WebGUI/Persistent/Query/Update.pm
@@ -23,15 +23,15 @@ our @ISA = qw(WebGUI::Persistent::Query);
 
 =head1 NAME
 
-Package WebGUI::Persistent::Query::Insert
+Package WebGUI::Persistent::Query::Update
 
 =head1 DESCRIPTION
 
-This class allows reliable dynamic building of Sql insert queries.
+This class allows reliable dynamic building of Sql update queries.
 
 =head1 SYNOPSIS
 
- my $query = WebGUI::Persistent::Query::Insert->new(
+ my $query = WebGUI::Persistent::Query::Update->new(
    table => 'myTable',
    where => [A => [1,2],[{C => 'hello',B => 1}]],
    data => {