Additional functionality and bug fixes

csdms-contrib · Jun 21, 2017 · 9469227 · 9469227
1 parent 6b0f2fe
commit 9469227
Showing 1 changed file with 7 additions and 2 deletions.
diff --git a/nounder.m b/nounder.m
@@ -3,8 +3,13 @@
 %
 % Changes underscores to dashes (or selse) in a string
 %
-% Last modified by fjsimons-at-alum.mit.edu, 03/18/2013
+% Last modified by fjsimons-at-alum.mit.edu, 03/03/2016
 
 defval('selse','-')
-sin(find(abs(sin)==95))=selse;
+
+if length(selse)>1 && strcmp(selse,'\_')
+  sin=insert(sin,92,find(abs(sin)==95));
+else
+  sin(find(abs(sin)==95))=selse;
+end