diff --git a/libs/ardour/midi_region.cc b/libs/ardour/midi_region.cc
index 1bcbae8c57..518413e2de 100644
--- a/libs/ardour/midi_region.cc
+++ b/libs/ardour/midi_region.cc
@@ -27,7 +27,7 @@
 #include <glibmm/thread.h>
 
 #include "pbd/xml++.h"
-#include "pbd/filesystem.h"
+#include "pbd/basename.h"
 
 #include "ardour/automation_control.h"
 #include "ardour/midi_model.h"
@@ -135,7 +135,7 @@ MidiRegion::clone (string path) const
 
 	PropertyList plist;
 
-	plist.add (Properties::name, sys::basename (ms->name()));
+	plist.add (Properties::name, PBD::basename_nosuffix (ms->name()));
 	plist.add (Properties::whole_file, true);
 	plist.add (Properties::start, _start);
 	plist.add (Properties::start_beats, _start_beats);