(eww-copy-page-url): Add doc string.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 188db7f7a5f51db7531951f13fd53fdcd75027b9..a1d60d158aee090258cf56cb07470fe9b68c67b8 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -2,6 +2,7 @@
 
        * net/eww.el (eww-follow-link): Revert prefix behaviour to
        previous behavior.
+       (eww-copy-page-url): Add doc string.
 
 2014-12-07  Ivan Shmakov  <ivan@siamics.net>
 

diff --git a/lisp/net/eww.el b/lisp/net/eww.el
index 139c0b1372d21f1bbc4f8c51f566ec42aa9ba500..58e0ff36f6af1be2e2c45a3548044add5e977ba2 100644 (file)
--- a/lisp/net/eww.el
+++ b/lisp/net/eww.el
@@ -1346,6 +1346,7 @@ Differences in #targets are ignored."
     (equal (url-recreate-url obj1) (url-recreate-url obj2))))
 
 (defun eww-copy-page-url ()
+  "Copy the URL of the current page into the kill ring."
   (interactive)
   (message "%s" (plist-get eww-data :url))
   (kill-new (plist-get eww-data :url)))