Removed some obsolete Perl binding.

Added Version Index "version" method.
Implemented automatic selection of default_print_profile and
default_filament_profile, when the print / filament profiles are
not compatible with the selected printer profile.
Fixed selection of a printer profile, if the currently selected
printer profile becomes invisible.

xs/src/slic3r/Config/Version.cpp

@@ -141,6 +141,15 @@ size_t Index::load(const boost::filesystem::path &path)
     return m_configs.size();
 }
 
+Semver Index::version() const
+{
+    Semver ver = Semver::zero();
+    for (const Version &cv : m_configs)
+        if (cv.config_version >= ver)
+            ver = cv.config_version;
+    return ver;
+}
+
 Index::const_iterator Index::find(const Semver &ver)
 { 
 	Version key;

xs/src/slic3r/Config/Version.hpp

@@ -59,6 +59,9 @@ public:
 	size_t						load(const boost::filesystem::path &path);
 
 	const std::string&			vendor() const { return m_vendor; }
+	// Returns version of the index as the highest version of all the configs.
+	// If there is no config, Semver::zero() is returned.
+	Semver						version() const;
 
 	const_iterator				begin()   const { return m_configs.begin(); }
 	const_iterator				end()     const { return m_configs.end(); }