Christophe
Weblog
Wiki
Code
Publications
Music
projects
/
swankr.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
use srcfile$wd when going to source for an sldb frame
[swankr.git]
/
swank.R
diff --git
a/swank.R
b/swank.R
index bd7e093703fa4a4d5f9fc5ea7e1ad986853ad7fa..13164853c32efb8a4c0c4086229a7431c6d99516 100644
(file)
--- a/
swank.R
+++ b/
swank.R
@@
-349,9
+349,8
@@
computeRestartsForEmacs <- function (sldbState) {
if(is.null(srcfile)) {
list(quote(`:error`), "no srcfile")
} else {
if(is.null(srcfile)) {
list(quote(`:error`), "no srcfile")
} else {
- filename <- get("filename", srcfile)
list(quote(`:location`),
list(quote(`:location`),
- list(quote(`:file`),
filename
),
+ list(quote(`:file`),
sprintf("%s/%s", srcfile$wd, srcfile$filename)
),
list(quote(`:line`), srcref[[1]], srcref[[2]]-1),
FALSE)
}
list(quote(`:line`), srcref[[1]], srcref[[2]]-1),
FALSE)
}