summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--lisp/init-projectile.el5
1 files changed, 5 insertions, 0 deletions
diff --git a/lisp/init-projectile.el b/lisp/init-projectile.el
index 2734425..9b9332a 100644
--- a/lisp/init-projectile.el
+++ b/lisp/init-projectile.el
@@ -38,6 +38,11 @@ Interactive arguments are processed according to
(call-interactively 'projectile-find-file-other-window)
(view-mode 1))
+(defun km/project-filename-at-point ()
+ "Return file name relative to `projectile-project-root'."
+ (file-relative-name (thing-at-point 'filename)
+ (projectile-project-root)))
+
(defun km/dired-copy-project-filename-as-kill ()
"Copy names of marked project files into kill ring.
This is similar to `dired-copy-filename-as-kill', but the leading