Fixed naming scheme for folder archives

Change-Id: Ic39837a2ab268822a70aa233d413d872ec86900c
diff --git a/script/korapxml2krill b/script/korapxml2krill
index d00ba9e..5ed8c7f 100644
--- a/script/korapxml2krill
+++ b/script/korapxml2krill
@@ -70,6 +70,9 @@
 # 2016/10/24
 # - Improved Windows support
 #
+# 2016/10/24
+# - Added support for document extraction
+#
 # ----------------------------------------------------------
 
 our $LAST_CHANGE = '2016/10/24';
@@ -258,6 +261,7 @@
   $file =~ s/^?\/?$i//;
   $file =~ tr/\//-/;
   $file =~ s{^-+}{};
+  $file =~ s/^.*?-(.+?-.+?-.+?)$/$1/;
   return $file;
 };