From: "Andreas Röhler" <andreas.roehler@easy-emacs.de>
To: help-gnu-emacs@gnu.org
Subject: Re: [emacs-lisp newbie] print-something() -> clipboard?
Date: Sat, 19 May 2012 09:19:36 +0200 [thread overview]
Message-ID: <4FB74988.9000404@easy-emacs.de> (raw)
In-Reply-To: <87r4uhxof8.fsf@pobox.com>
Am 18.05.2012 21:46, schrieb Tom Roche:
>
>> From my init.el I load a file that contains function definitions which
> all have the form
>
>> (defun print-path-and-filename ()
>> "Print the current buffer's file's path at point."
>> (interactive "*") ; abort if buffer is read-only
>> (if buffer-file-name (insert buffer-file-name) nil))
>> (global-set-key "\C-pp" 'print-path-and-filename)
> ...
>> (defun print-buffer-name ()
>> "Print (at point) the current buffer's name."
>> (interactive "*") ; abort if buffer is read-only
>> (insert (buffer-name (window-buffer (minibuffer-selected-window)))))
>> (global-set-key "\C-pb" 'print-buffer-name)
>>
>> (provide 'tlr-print)
>
> Most of the functions are buffer-independent (printing, e.g., current
> time, emacs version) but some (like the above) are not. For the
> latter, I'd like to have the option to "print" the datum to the
> clipboard. How can I (easily :-) do that?
>
> Examples esp appreciated. Feel free to point to doc.
>
> TIA, Tom Roche<Tom_Roche@pobox.com>
>
>
Hi,
the answer might not be a one-liner, as the X-clipboard does not come with Emacs.
This example works at my machine:
(defun yank-date-clipboard ()
"Insert into the kill-ring, at X also into the clipboard."
(interactive)
(kill-new (format-time-string "%Y%m%d")))
HTH,
Andreas
next prev parent reply other threads:[~2012-05-19 7:19 UTC|newest]
Thread overview: 6+ messages / expand[flat|nested] mbox.gz Atom feed top
2012-05-18 19:46 [emacs-lisp newbie] print-something() -> clipboard? Tom Roche
2012-05-19 7:19 ` Andreas Röhler [this message]
2012-05-20 18:57 ` Tom Roche
2012-05-20 19:20 ` Drew Adams
2012-05-20 20:27 ` Tom Roche
2012-05-21 13:24 ` Drew Adams
Reply instructions:
You may reply publicly to this message via plain-text email
using any one of the following methods:
* Save the following mbox file, import it into your mail client,
and reply-to-all from there: mbox
Avoid top-posting and favor interleaved quoting:
https://en.wikipedia.org/wiki/Posting_style#Interleaved_style
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to=4FB74988.9000404@easy-emacs.de \
--to=andreas.roehler@easy-emacs.de \
--cc=help-gnu-emacs@gnu.org \
/path/to/YOUR_REPLY
https://kernel.org/pub/software/scm/git/docs/git-send-email.html
* If your mail client supports setting the In-Reply-To header
via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line
before the message body.
Code repositories for project(s) associated with this external index
https://git.savannah.gnu.org/cgit/emacs.git
https://git.savannah.gnu.org/cgit/emacs/org-mode.git
This is an external index of several public inboxes,
see mirroring instructions on how to clone and mirror
all data and code used by this external index.