[ESS] back/forwardslash incompatability

[tim downie]

> Tim:
> 
> So, you're not entering anything...  That's the part
> I was trying to
> fix in the earlier thread.  How about trying this
> version:

Yes this works fine. 
Thanks for your help and perserverance
Tim

> 
> (defun ess-load-file (filename)
> "Alternate version of `ess-load-file', required with
> S+4.
> This version sends the S-Plus command
>      source(\"filename\")
> to S.  This version does not guarantee to save
> .Last.value
> This version does not offer alternate buffers or
> editing capability."
>      (interactive (list
>            (ess-replace-in-string (or
>             (and (eq major-mode 'ess-mode)
>              (buffer-file-name))
>              (expand-file-name
>              (read-file-name "Load S file: " nil nil
> t))) "[\\]" "/")))
>      (if (equal (ess-get-process-variable
>          ess-current-process-name
> 'inferior-ess-ddeclient)
>         (default-value 'inferior-ess-ddeclient))
>      (ess-load-file-original filename)
>        (ess-load-file-ddeclient filename))
>      (widen))
>