diff --git a/src/get_directory_description.m b/src/get_directory_description.m
index 4e321c7ae0734a89fbe3c4be02c44ea5b833cde2..5eb253c536bac4756cab900330a3ffdba2f1320b 100644
--- a/src/get_directory_description.m
+++ b/src/get_directory_description.m
@@ -41,7 +41,8 @@ for f=1:length(dd)
             flist = { flist{:} r{:} };
         else
             % Filter out files without m extension.
-            if isequal(dd(f).name(end-1:end),'.m')
+            [make, my, ext] = fileparts(dd(f).name);
+            if isequal(ext, '.m')
                 flist{length(flist)+1} = [basedir filesep dd(f).name];
             end
         end