*** lib/moodlelib.php.orig      Wed Apr 25 19:16:55 2007
--- lib/moodlelib.php   Wed Apr 25 19:17:37 2007
***************
*** 4108,4113 ****
--- 4108,4114 ----
      }
      $string = preg_replace("/_+/", '_', $string);
      $string = preg_replace("/\.\.+/", '.', $string);
+     $string = preg_replace('/^-/', '_', $string);
      return $string;
  }