Bläddra i källkod

Merge branch 'ian'

Ian Martins 4 år sedan
förälder
incheckning
3a2db67597
1 ändrade filer med 6 tillägg och 2 borttagningar
  1. 6 2
      lisp/ob-java.el

+ 6 - 2
lisp/ob-java.el

@@ -175,8 +175,12 @@ replaced in this string.")
                           (file-name-base fullclassname)))
          ;; the base dir that contains the top level package dir
          (basedir (file-name-as-directory (if run-from-temp
-                                              org-babel-temporary-directory
-                                            ".")))
+                                              (if (file-remote-p default-directory)
+                                                  (concat
+                                                   (file-remote-p default-directory)
+                                                   org-babel-remote-temporary-directory)
+                                                org-babel-temporary-directory)
+                                            default-directory)))
          ;; the dir to write the source file
          (packagedir (if (and (not run-from-temp) packagename)
                          (file-name-as-directory