From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.org!.POSTED!not-for-mail From: Alex Kost Newsgroups: gmane.emacs.help Subject: Re: how to set button action Date: Sun, 16 Oct 2016 16:43:40 +0300 Message-ID: <87oa2kpfxv.fsf@gmail.com> References: <87r37hkojz.fsf@jupiter.lan> NNTP-Posting-Host: blaine.gmane.org Mime-Version: 1.0 Content-Type: text/plain X-Trace: blaine.gmane.org 1476625461 5751 195.159.176.226 (16 Oct 2016 13:44:21 GMT) X-Complaints-To: usenet@blaine.gmane.org NNTP-Posting-Date: Sun, 16 Oct 2016 13:44:21 +0000 (UTC) User-Agent: Gnus/5.13 (Gnus v5.13) Emacs/25.0.95 (gnu/linux) Cc: help-gnu-emacs@gnu.org To: Stefan Huchler Original-X-From: help-gnu-emacs-bounces+geh-help-gnu-emacs=m.gmane.org@gnu.org Sun Oct 16 15:44:17 2016 Return-path: Envelope-to: geh-help-gnu-emacs@m.gmane.org Original-Received: from lists.gnu.org ([208.118.235.17]) by blaine.gmane.org with esmtp (Exim 4.84_2) (envelope-from ) id 1bvljV-0008O8-TS for geh-help-gnu-emacs@m.gmane.org; Sun, 16 Oct 2016 15:44:10 +0200 Original-Received: from localhost ([::1]:56409 helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1bvljX-00064H-Ij for geh-help-gnu-emacs@m.gmane.org; Sun, 16 Oct 2016 09:44:11 -0400 Original-Received: from eggs.gnu.org ([2001:4830:134:3::10]:53583) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1bvlj8-000641-WB for help-gnu-emacs@gnu.org; Sun, 16 Oct 2016 09:43:47 -0400 Original-Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1bvlj5-0000qk-Uf for help-gnu-emacs@gnu.org; Sun, 16 Oct 2016 09:43:47 -0400 Original-Received: from mail-lf0-x22b.google.com ([2a00:1450:4010:c07::22b]:35249) by eggs.gnu.org with esmtps (TLS1.0:RSA_AES_128_CBC_SHA1:16) (Exim 4.71) (envelope-from ) id 1bvlj5-0000q5-Ky for help-gnu-emacs@gnu.org; Sun, 16 Oct 2016 09:43:43 -0400 Original-Received: by mail-lf0-x22b.google.com with SMTP id l131so192234485lfl.2 for ; Sun, 16 Oct 2016 06:43:43 -0700 (PDT) DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=gmail.com; s=20120113; h=from:to:cc:subject:references:date:in-reply-to:message-id :user-agent:mime-version; bh=bV3EA5EMu48IAqb85H7HRazAuVCiE2xga0Dlirt6GGg=; b=vTjva5oD2sy3rnD7U6G634RgUM5rfnOc+cJTorECI/QissJSgoqyC4L9iCvvZsjuAd 2pMiW9Nv7xUfGjNHfOy7Zx+UukKny+M6fXjNJeKkpEmI2d9e/Dr5abp0VKustu2q2Xwu Z9mufH1TYoDloi5u09Ndq2j4p6ikq0aJvQB1m3iXEjTLoyi3ZMbgFaRTK7U4DB2+fLty 2VJl+raK578chw7+XUD6JopY5kBOpQHXf83KIPjaIEa3/74YweKHXTFbCKEibBlP5/5a bluEwsRYYJ987sj8lXGsFPhjS765VhZeTNAIQrx30oOjR2+JhGk23eJeW+4TjA6UrNbg b0XA== X-Google-DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=1e100.net; s=20130820; h=x-gm-message-state:from:to:cc:subject:references:date:in-reply-to :message-id:user-agent:mime-version; bh=bV3EA5EMu48IAqb85H7HRazAuVCiE2xga0Dlirt6GGg=; b=WqstXFv9VUVE/g1KWpTCRiNh/ZDq+ooy2JzpN7lhbT9s4skE7sn77QBnD4rL95EAMX 9zNPRtN8lXJ0DQNnRJZ4tEqzXqki5zwtnv0Jtsw4Pl2/edeln749r/jNzvB3X8bXtitY ENbHbq1r+tc1JH/ZALi76lg4yy7FieOIt4eifl1gDF60BtITYjMydqyAJfQ58uTOPEyU TGOo0FSkwFh87qgYBn6Z7+aEdJX9UiY7T7cyw8Oz9f+L07Wh9MyrCj6SgCqTm6VE5fd+ /wcR1UPaDwaLm/b3dO6UgZdypt2TVGQNcHXZtX4qKBLorTwhaMzt0BM7WTMEU0Gyc0Pp lEBA== X-Gm-Message-State: AA6/9RlTa0vHmT+6s2GoUdxNW6JASKo+ZMA8nU4zg9l0DxQcIFlDLvKbhYlJENHhU2rqIg== X-Received: by 10.25.150.15 with SMTP id y15mr3281029lfd.58.1476625419728; Sun, 16 Oct 2016 06:43:39 -0700 (PDT) Original-Received: from leviafan ([217.107.192.156]) by smtp.gmail.com with ESMTPSA id 102sm6630718lft.33.2016.10.16.06.43.38 (version=TLS1_2 cipher=ECDHE-RSA-AES128-GCM-SHA256 bits=128/128); Sun, 16 Oct 2016 06:43:39 -0700 (PDT) In-Reply-To: <87r37hkojz.fsf@jupiter.lan> (Stefan Huchler's message of "Sun, 16 Oct 2016 04:36:32 +0200") X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.2.x-3.x [generic] X-Received-From: 2a00:1450:4010:c07::22b X-BeenThere: help-gnu-emacs@gnu.org X-Mailman-Version: 2.1.21 Precedence: list List-Id: Users list for the GNU Emacs text editor List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: help-gnu-emacs-bounces+geh-help-gnu-emacs=m.gmane.org@gnu.org Original-Sender: "help-gnu-emacs" Xref: news.gmane.org gmane.emacs.help:111535 Archived-At: Stefan Huchler (2016-10-16 04:36 +0200) wrote: > Hi, > > I am trying to get buttons working in a tabulated-list mode but when I > press enter on that link it does not execute the print. > > also tried it without lambda and the funcions name. Is there a trick I > am missing? > > > (define-derived-mode test-foo-mode tabulated-list-mode "test-foo" > (setq tabulated-list-format [("Series" 10 t)]) > (setq tabulated-list-entries '((nil [("test" . ('action (lambda (btn) > (print "action"))))]))) The foollowing works for me: (setq tabulated-list-entries '((nil [("test" action (lambda (btn) (print "action")))]))) > (tabulated-list-init-header) > (tabulated-list-print) > ) > > (defun test-foo () > (interactive) > (let* ((name "*test-foo*") > (buffer (or (get-buffer name) > (generate-new-buffer name)))) > (unless (eq buffer (current-buffer)) > (with-current-buffer buffer > (unless (eq major-mode 'test-foo-mode) > (condition-case e > (progn > (test-foo-mode) > ) > (error > (kill-buffer buffer) > (signal (car e) (cdr e)))))) > (switch-to-buffer-other-window buffer)))) -- Alex