[ESS] rdired stopped working

[Henning Redestig]

Hi,
when I do ess-rdired I get: 

Error in parse(file, n, text, prompt) : Parsing error 

until recently rdired worked just fine for me so I am
having a very hard time understanding how this could have happened. I
havent made any changes recently to my system. I upgraded ESS to
5.2.10 but that did not solve the problem. Also a problem that arose
about the same, making me thinking they are related, is that when I do
ess-load-file it doesnt load as usually but prints out some seemingly
random snippet of the file, e.g. this what it could look like in my
R-buffer when I try to load a file with 297 lines:


> 
> maxEucDist <- function(x, map, amount = 3, ...) {
    scores <- NULL
    dumpGene <- NULL
    for (i in 1:nrow(x)) {
        if (any(is.na(x[i, ]))) 
 .... [TRUNCATED] 
curr.fun: symbol <-
 .. after ‘expression(maxEucDist <- function(x, map, amount = 3, ...) {’‘    scores <- NULL’‘    dumpGene <- NULL’‘    for (i in 1:nrow(x)) {’‘        if (any(is.na(x[i, ]))) ’‘            dumpGene <- c(dumpGene, i)’‘    }’‘    x <- x[-dumpGene, ]’‘    rnames <- names(map)’‘    for (i in 1:length(map)) {’‘        genes <- unique(map[[i]])’‘        genes <- match(genes, rownames(x))’‘        genes <- genes[which(!is.na(genes))]’‘        geneCount <- length(genes)’‘        if (geneCount < 3) {’‘            rnames[i] <- "skip"’‘            next’‘        }’‘        scores <- c(scores, dist(t(x[genes, ]), ...)/sqrt(geneCount))’‘    }’‘    names(scores) <- rnames[which(rnames != "skip")]’‘    if (!is.null(amount)) ’‘        return(sort(scores, decreasing = F)[1:amount])’‘    else return(scores)’‘})’
> > 

Which is the last function in that buffer. ess-eval-buffer works find
on the other hand.


Would love some help on this issue.

Thanks

Henning Redestig
redestig at mpimp-golm.mpg.de

Emacs  : GNU Emacs 21.3.1 (i386-redhat-linux-gnu, X toolkit, Xaw3d scroll bars)
 of 2005-02-04 on bugs.build.redhat.com
Package: ess-mode 5.2.10

current state:
==============
(setq
 ess-language "S"
 ess-dialect "R"
 ess-ask-for-ess-directory t
 ess-ask-about-transfile nil
 ess-directory nil
 ess-keep-dump-files "always"
 ess-source-directory "/tmp/"
 )
[ess-site.el]: ess-customize-alist=nil 
[ess-site.el _2_]: ess-customize-alist=nil 
(R): ess-r-versions-create making M-x defuns for 
(R): ess-dialect=nil, buf=*R*, start-arg=nil
 current-prefix-arg=nil
(inferior-ess 0): ess-start-args=--no-readline  
ess-setq-vars-default 0: ess-language=Initial, -dialect=nil, buf=nil, comint..echoes=nil, comint..sender=comint-simple-send
ess-setq-vars-default 1: ess-language=S, -dialect=R, buf=nil, comint..echoes=nil, comint..sender=comint-simple-send
(inf-ess 1): lang=S, dialect=R, tmp-dialect=R, buf=*R*
(inf-ess 1.1): procname=R temp-dialect=R, buf-name=*R* 
(inferior-ess) Method #2 buf=*R*
(ess-setq-vars-LOCAL): language=S, dialect=R, buf=nil, comint..echoes=nil, comint..sender=comint-simple-send
(inf-ess 2.1): ess-language=S, ess-dialect=R buf=*R* 
(inf-ess 2.2): start args = --no-readline , inf-ess-start-args=--no-readline  
(inf-ess finish [S(R), R(nil,nil)]
(ess-multi 0):  inf-ess-start-args=--no-readline , comint-..echoes=nil
(i-ess 1): buf=*R*, lang=S, comint..echo=nil, comint..sender=comint-simple-send,
(i-ess 2): buf=*R*, lang=S, comint..echo=t, comint..sender=inferior-R-input-sender,
(ess-setq-vars-LOCAL): language=S, dialect=R, buf=nil, comint..echoes=t, comint..sender=inferior-R-input-sender
(i-ess 3): curr-buf=*R*, comint..echo=t, comint..sender=inferior-R-input-sender,
(ess-multi post inf-ess: start-args=--no-readline , comint-echoes=t
(ess-multi 1):  start-args=--no-readline  
Making Process...Buf *R*, Proc R, Prog R
 Start File=nil, Args= --no-readline .
(ess-setq-vars-LOCAL): language=S, dialect=R, buf=*R dired*, comint..echoes=nil, comint..sender=comint-simple-send
(ess-setq-vars-LOCAL): language=S, dialect=R, buf=*R dired*, comint..echoes=nil, comint..sender=comint-simple-send