CVS: setedit/mainsrc loadfunc.cc,1.10,1.11

[Salvador E. T. <se...@us...>]

Update of /cvsroot/setedit/setedit/mainsrc
In directory sc8-pr-cvs8.sourceforge.net:/tmp/cvs-serv5854/mainsrc

Modified Files:
	loadfunc.cc 
Log Message:
* Modified: The load file under cursor routine to be smarter when the file
name contains extra characters at the end, if they aren't alphanumeric we
try removing them.


Index: loadfunc.cc
===================================================================
RCS file: /cvsroot/setedit/setedit/mainsrc/loadfunc.cc,v
retrieving revision 1.10
retrieving revision 1.11
diff -C2 -d -r1.10 -r1.11
*** loadfunc.cc	31 May 2007 14:53:15 -0000	1.10
--- loadfunc.cc	13 Mar 2008 16:08:28 -0000	1.11
***************
*** 229,232 ****
--- 229,237 ----
         result=FindFile(name,fullName,reference);
     }
+  while (!result && lname && !TVCodePage::isAlNum(name[lname-1]))
+    {// We failed and the last char isn't alphanumeric
+     name[--lname]=0;
+     result=FindFile(name,fullName,reference);
+    }
   if (result)
     {