[webkit-dev] New tool for Xcode (Emacs?) users: Copy WebKit Permalink
Daniel Bates
dbates at webkit.org
Mon Aug 14 16:54:11 PDT 2017
Hi Charlie,
Thanks for the script! File a bugs.webkit.org bug, CC'ing me, and upload a
patch.
We still need Vim and Textmate plugins :D
Dan
On Mon, Aug 14, 2017 at 4:52 PM, Daniel Bates <dbates at intudata.com> wrote:
> Hi Charlie,
>
> Thanks for the script! File a bugs.webkit.org bug, CC'ing me, and upload
> a patch.
>
> We still need Vim and Textmate plugins :D
>
> Dan
>
> On Mon, Aug 14, 2017 at 4:33 PM, Charlie Turner <cturner at igalia.com>
> wrote:
>
>> Hi,
>>
>> Thanks for sharing that, thought it was useful so made an Emacs version
>> of it. Only works for the Git mirror and requires Magit as well, but
>> maybe of use to someone else with Emacs.
>>
>> -----------------------8<----------------------------
>> (defun webkit-trac-url ()
>> (interactive)
>> (let ((git-svn-id-line
>> (car (--filter (string-match-p "svn.webkit.org" it)
>> (magit-git-lines "log" "--format=%b" "-n 1"
>> "HEAD")))))
>> (if (string-match "\\([A-z]+\\)@\\([[:digit:]]+\\)" git-svn-id-line)
>> (let ((branch (match-string 1 git-svn-id-line))
>> (revision (match-string 2 git-svn-id-line))
>> (path (magit-file-relative-name)))
>> (kill-new (concat "https://trac.webkit.org/browser/" branch
>> "/" path
>> "?" revision
>> (if current-prefix-arg
>> "&annotate=blame" "")
>> "#L" (format-mode-line "%l")))
>> (message "On your clipboard!")))))
>> ----------------------->8----------------------------
>>
>> That goes in your init.el.
>>
>> DISCLAIMER: Not an Emacs expert!
>>
>> ~Charlie.
>> _______________________________________________
>> webkit-dev mailing list
>> webkit-dev at lists.webkit.org
>> https://lists.webkit.org/mailman/listinfo/webkit-dev
>>
>
>
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.webkit.org/pipermail/webkit-dev/attachments/20170814/e76125fd/attachment.html>
More information about the webkit-dev
mailing list