diff --git a/scst/include/backport.h b/scst/include/backport.h
index 8bb4f4bfb..480b13e3c 100644
--- a/scst/include/backport.h
+++ b/scst/include/backport.h
@@ -20,7 +20,8 @@
  *  GNU General Public License for more details.
  */
 
-#include <linux/writeback.h> /* sync_page_range() */
+#include <linux/slab.h>		/* kmalloc() */
+#include <linux/writeback.h>	/* sync_page_range() */
 
 /* <asm-generic/barrier.h> */
 
diff --git a/scstadmin/scstadmin.sysfs/Makefile b/scstadmin/scstadmin.sysfs/Makefile
index d6e9ee34c..3a41eeb89 100644
--- a/scstadmin/scstadmin.sysfs/Makefile
+++ b/scstadmin/scstadmin.sysfs/Makefile
@@ -20,7 +20,7 @@ uninstall:
 
 perl-module:
 	@cd ./scst-$(MODULE_VERSION); \
-	perl Makefile.PL;
+	perl Makefile.PL PREFIX=$(PREFIX);
 	$(MAKE) -C scst-$(MODULE_VERSION)
 
 test:
diff --git a/scstadmin/scstadmin.sysfs/scst-0.9.10/lib/SCST/SCST.pm b/scstadmin/scstadmin.sysfs/scst-0.9.10/lib/SCST/SCST.pm
index 9b9e5db2f..4aa497f98 100644
--- a/scstadmin/scstadmin.sysfs/scst-0.9.10/lib/SCST/SCST.pm
+++ b/scstadmin/scstadmin.sysfs/scst-0.9.10/lib/SCST/SCST.pm
@@ -550,7 +550,8 @@ sub drivers {
 
 	if (opendir($dHandle, $_path)) {
 		foreach my $driver (readdir($dHandle)) {
-			next if (($driver eq '.') || ($driver eq '..'));
+			next if ($driver eq '.' || $driver eq '..' ||
+				 $driver eq 'copy_manager');
 
 			if (-d make_path(SCST_TARGETS_DIR(), $driver)) {
 				push @drivers, $driver;
diff --git a/scstadmin/scstadmin.sysfs/scstadmin b/scstadmin/scstadmin.sysfs/scstadmin
index 7c7a7939e..60d609717 100755
--- a/scstadmin/scstadmin.sysfs/scstadmin
+++ b/scstadmin/scstadmin.sysfs/scstadmin
@@ -1423,8 +1423,6 @@ sub writeConfiguration {
 	}
 
 	foreach my $driver (sort keys %{$CURRENT{'assign'}}) {
-		next if $driver eq 'copy_manager';
-
 		my $driver_buff;
 
 		my ($drv_attrs, $errorString) = $SCST->driverAttributes($driver);