From 6f120d5f670694a0d1bd8d9dd2a972c295e5daeb Mon Sep 17 00:00:00 2001
From: Boris Kolpackov <boris@codesynthesis.com>
Date: Mon, 30 Jul 2018 11:15:58 +0200
Subject: Extend project_name::base() to optionally restrict extension

---
 libbutl/project-name.cxx | 8 +++++++-
 1 file changed, 7 insertions(+), 1 deletion(-)

(limited to 'libbutl/project-name.cxx')

diff --git a/libbutl/project-name.cxx b/libbutl/project-name.cxx
index 5f94ea0..76a68b9 100644
--- a/libbutl/project-name.cxx
+++ b/libbutl/project-name.cxx
@@ -81,11 +81,17 @@ namespace butl
   }
 
   string project_name::
-  base () const
+  base (const char* e) const
   {
     using std::string;
 
     size_t p (path::traits::find_extension (value_));
+
+    if (e != nullptr                            &&
+        p != string::npos                       &&
+        casecmp (value_.c_str () + p + 1, e) != 0)
+      p = string::npos;
+
     return string (value_, 0, p);
   }
 
-- 
cgit v1.1