--- deliantra/server/ext/item-slag-ex.ext	2007/07/19 18:08:13	1.1
+++ deliantra/server/ext/item-slag-ex.ext	2011/03/12 22:28:21	1.6
@@ -5,8 +5,8 @@
 # be cleaned (all items in it will be removed)
 
 cf::object->attach (
-   type     => cf::POTION,
-   subtype  => 11, # just a random number
+   type     => cf::MISC_OBJECT,
+   subtype  => 1,
    on_apply => sub {
       my ($self, $who) = @_;
 
@@ -15,9 +15,9 @@
             $who->map->at ($who->x, $who->y);
 
       if ($caul) {
-         $_->destroy (1) for @$caul;
+         $_->destroy for $caul->inv;
          $self->handle_apply_yield;
-         $self->decrease_ob_nr (1);
+         $self->decrease;
          $who->message ("You cleaned the " . $caul->name, cf::NDI_UNIQUE);
 
       } else {
@@ -27,3 +27,4 @@
       cf::override 1;
    },
 );
+