;+ ; Contains the delpath function ; ; :Author: ; Gaëlle Boisnard ; ; :History: ; 2004/12/03: Created ; ; 2004/12/03: Last Edit ;- ; ; enleve le path devant un nom de fichier ;+ ; delpath is a function that <behavior desc here> ; ; :Returns: ; <return desc here> ; ; :Params: ; str: in, required, type=sometype ; A parameter named str ;- Function DELPATH, str if float(!version.release) ge 5.6 then $ p = max([strpos(str,'/',/reverse_search),strpos(str,':',/reverse_search)]) $ else $ p = max([rstrpos(str,'/'),rstrpos(str,':')]) ; print, strmid(str,p+1,strlen(str)-p) return,strmid(str,p+1,strlen(str)-p) end