current-position.el

(defun copy-current-line-position-to-clipboard (p)
    "Copy current line in file to clipboard as '</path/to/file>:<line-number>'"
    (interactive "sAbsolute path y/n?: ")
    (let ((path-with-line-number) (file-name (buffer-file-name)))
      (when (and (not (string= p "y")) (projectile-project-root))
        (setq file-name (file-relative-name buffer-file-name (projectile-project-root)))
        )
      (setq path-with-line-number (concat file-name ":" (number-to-string (line-number-at-pos))))
      (x-select-text path-with-line-number)
      (message (concat path-with-line-number " copied to clipboard"))))