fixes to exception_dev component

1 files changed, 2 insertions, 1 deletions

diff --git a/components/exception_dev b/components/exception_dev
index d62f462..49b7f45 100644
--- a/components/exception_dev
+++ b/components/exception_dev
@@ -21,13 +21,13 @@
 %%var int line_number = -1;
 %%var const exception* exception_caught;
 <%code>
  __SCIF->headers.clear();
  __SCIF->out->seekp(0);
  int magic = _magic;
- va_list va = _args;
+ va_list va; va_copy(va,_args);
  switch(magic) {
   case sitecing::__magic_compile_error:
    message = va_arg(va,const char*);
    root_source = va_arg(va,const char*);
    root_intermediate = va_arg(va,const char*);
    root_so = va_arg(va,const char*);
@@ -323,12 +323,13 @@
  try{
   return sitecing::strip_prefix(np,root_source);
  }catch(sitecing::utility_no_prefix& e){ }
  try{
   return sitecing::strip_prefix(np,root_intermediate);
  }catch(sitecing::utility_no_prefix& e){ }
+ return np;
 </%codemethod>
 <%codemethod string remove_roots(const string& str) %>
  string rv = str;
  string::size_type rp;
  string::size_type rl = root_source.length();
  while((rp=rv.find(root_source))!=string::npos) {