changing baseprogram location to user emacs dir

zot · Dec 28, 2020 · cc217dc · cc217dc
1 parent f38bc50
commit cc217dc
Showing 1 changed file with 2 additions and 3 deletions.
diff --git a/elisp/org-fts.el b/elisp/org-fts.el
@@ -33,9 +33,8 @@
     (windows-nt . "microfts.exe")))
 
 (defconst org-fts/baseprogram
-  (let ((entry (cadr (assoc 'org-fts package-alist)))
-        (name (cdr (assoc system-type org-fts/baseprogram-alist))))
-    (and entry (format "%s/%s" (package-desc-dir entry) name))))
+  (let ((name (cdr (assoc system-type org-fts/baseprogram-alist))))
+    (format "%s%s" user-emacs-directory name)))
 
 (defcustom org-fts/program nil
   "Name or path for microfts program"