R/normalize.path.R

In eatRest: eatRest

####################################################################################################################
#
# normalize.path      
# macht dasselbe wie "normalizePath"
# nur daß die Funktion sich versionsinvariant verhält 
#
# Version: 	0.1.0
# Imports:
# Published:
# Author:   Sebastian Weirich
# Maintainer:
#
# Change-Log
# 08.08.2011 MH: auf stable gesetzt wegen besserer sourcebarkeit
#
####################################################################################################################

### string     ... Pfadname als "R"-string

normalize.path <- function(string)
                  {string <- gsub("//","/",string)
                   string <- gsub("/","//",string)
                   string <- gsub("//","\\\\",string)
                   return(string)}