From mboxrd@z Thu Jan 1 00:00:00 1970 X-Msuck: nntp://news.gmane.io/gmane.emacs.gnus.general/51043 Path: main.gmane.org!not-for-mail From: deskpot@myrealbox.com (Vasily Korytov) Newsgroups: gmane.emacs.gnus.general Subject: [patch] smiley-buffer (was: =?koi8-r?b?zsUg0M/LwdrZ18HA1NPR?= =?koi8-r?b?INPNwcrMycvJKQ==?= Date: Wed, 26 Mar 2003 22:13:19 +0300 Sender: owner-ding@hpc.uh.edu Message-ID: <87llz2djqo.fsf_-___36200.3544149504$1048706007@unix.home> References: <87llz654lt.fsf@mail.kubtelecom.ru> <87el4w6gak.fsf@mail.kubtelecom.ru> <87ptof8ql2.fsf@mail.kubtelecom.ru> <87n0jj5u7w.fsf@mail.kubtelecom.ru> <87n0jj2p2t.fsf@mail.kubtelecom.ru> <87of3z2fmi.fsf@unix.home> <87isu6ign5.fsf@mail.kubtelecom.ru> <87el4upega.fsf@unix.home> NNTP-Posting-Host: main.gmane.org Mime-Version: 1.0 Content-Type: multipart/signed; boundary="==-=-="; micalg=pgp-sha1; protocol="application/pgp-signature" X-Trace: main.gmane.org 1048706007 21916 80.91.224.249 (26 Mar 2003 19:13:27 GMT) X-Complaints-To: usenet@main.gmane.org NNTP-Posting-Date: Wed, 26 Mar 2003 19:13:27 +0000 (UTC) Cc: ding@gnus.org Original-X-From: owner-ding@hpc.uh.edu Wed Mar 26 20:13:25 2003 Return-path: Original-Received: from malifon.math.uh.edu ([129.7.128.13]) by main.gmane.org with esmtp (Exim 3.35 #1 (Debian)) id 18yGKz-0005hD-00 for ; Wed, 26 Mar 2003 20:13:25 +0100 Original-Received: from sina.hpc.uh.edu ([129.7.128.10] ident=lists) by malifon.math.uh.edu with esmtp (Exim 3.20 #1) id 18yGJm-0001sk-00; Wed, 26 Mar 2003 13:12:10 -0600 Original-Received: by sina.hpc.uh.edu (TLB v0.09a (1.20 tibbs 1996/10/09 22:03:07)); Wed, 26 Mar 2003 13:13:12 -0600 (CST) Original-Received: from sclp3.sclp.com (sclp3.sclp.com [66.230.238.2]) by sina.hpc.uh.edu (8.9.3/8.9.3) with SMTP id NAA00197 for ; Wed, 26 Mar 2003 13:12:57 -0600 (CST) Original-Received: (qmail 77290 invoked by alias); 26 Mar 2003 19:11:50 -0000 Original-Received: (qmail 77285 invoked from network); 26 Mar 2003 19:11:50 -0000 Original-Received: from ns1.telekom.ru (HELO smtp.telekom.ru) (root@194.190.198.2) by 66.230.238.6 with SMTP; 26 Mar 2003 19:11:50 -0000 Original-Received: from unix.home (h104.50.elnet.msk.ru [195.58.50.104]) by smtp.telekom.ru (8.12.8/8.12.8) with SMTP id h2QJBBC6008987 for ; Wed, 26 Mar 2003 22:11:12 +0300 Original-Received: (qmail 756 invoked from network); 26 Mar 2003 19:16:18 -0000 Original-Received: from localhost (alias@127.0.0.1) by localhost with QMTP; 26 Mar 2003 19:16:18 -0000 Original-Received: (qmail 700 invoked by uid 1000); 26 Mar 2003 19:13:19 -0000 Original-To: xemacs-users-ru@xemacs.org X-Attribution: VK Mail-Copies-To: never Mail-Followup-To: xemacs-users-ru@xemacs.org, ding@gnus.org In-Reply-To: <87el4upega.fsf@unix.home> (deskpot@myrealbox.com's message of "Wed, 26 Mar 2003 14:14:29 +0300") User-Agent: Gnus/5.090017 (Oort Gnus v0.17) XEmacs/21.4 (Portable Code) Precedence: list X-Majordomo: 1.94.jlt7 Xref: main.gmane.org gmane.emacs.gnus.general:51043 X-Report-Spam: http://spam.gmane.org/gmane.emacs.gnus.general:51043 --==-=-= Content-Type: multipart/mixed; boundary="=-=-=" --=-=-= Content-Transfer-Encoding: quoted-printable On the xemacs-users-ru maling list a smiley-buffer function was requested in Oort (it exists in XEmacs version of smiley.el). I wrote one, but I'm not sure, if it mimics the arglist and return values (this one returns the value of smiley-region). Anyway, attaching the patch. 2003-03-26 Vasily Korytov * smiley.el (smiley-buffer): New. --=-=-= Content-Type: text/x-patch Content-Disposition: attachment; filename=smiley.el.patch Content-Transfer-Encoding: quoted-printable =2D-- smiley.el~ Sun Feb 9 05:47:41 2003 +++ smiley.el Wed Mar 26 22:02:59 2003 @@ -135,6 +135,16 @@ (gnus-put-image image string)))) images)))) =20 +;;;###autoload +(defun smiley-buffer (&optional buffer) + "Run `smiley-region' at the buffer, specified in the argument or +interactively. If there's no argument, do it at the current buffer" + (interactive "bBuffer to run smiley-region: ") + (save-excursion + (if buffer + (set-buffer (get-buffer buffer))) + (smiley-region (point-min) (point-max)))) + (defun smiley-toggle-buffer (&optional arg) "Toggle displaying smiley faces in article buffer. With arg, turn displaying on if and only if arg is positive." --=-=-= Content-Transfer-Encoding: quoted-printable =2D-=20 I accept RFC3156 and RFC1991-compatible encrypted mail. PGP key fingerprint: 123A 7CCE 6E26 6233 0D87 E01A A0F8 3524 FCD8 1841 --=-=-=-- --==-=-= Content-Type: application/pgp-signature -----BEGIN PGP SIGNATURE----- Version: GnuPG v1.2.1 (GNU/Linux) iD8DBQE+gfvPoPg1JPzYGEERAiDYAKCngfPnC9rGb7iG32O0MFPIKK0pUgCfRI75 +kS38bA8Zu6hIEcHq6u2ZEw= =h+3W -----END PGP SIGNATURE----- --==-=-=--