Remove unecessary function call file-name-directory

Why: It is called inside of the `idris-ipkg-buffer-src-dir` function.
keram · Jul 13, 2024 · 30333a6 · 30333a6
1 parent 8392dda
commit 30333a6
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/idris-ipkg-mode.el b/idris-ipkg-mode.el
@@ -135,7 +135,7 @@
   "Make all modules with existing files clickable, where clicking opens them."
   (interactive)
   (idris-clear-file-link-overlays 'idris-ipkg-mode)
-  (let ((src-dir (idris-ipkg-buffer-src-dir (file-name-directory (buffer-file-name)))))
+  (let ((src-dir (idris-ipkg-buffer-src-dir (buffer-file-name))))
     ;; Make the sourcedir clickable
     (when (and (file-exists-p src-dir)
                (file-directory-p src-dir)