From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.io!.POSTED.blaine.gmane.org!not-for-mail From: Luis Felipe Newsgroups: gmane.lisp.guile.user Subject: guile-gi: Using Gtk.show_uri and application:get-active-window Date: Fri, 11 Mar 2022 23:59:55 +0000 Message-ID: Reply-To: Luis Felipe Mime-Version: 1.0 Content-Type: multipart/signed; protocol="application/pgp-signature"; micalg=pgp-sha256; boundary="------4b205668fa2ad14f84a4767b04f68a23b3a1352d80c2491bdb68de8aaa2c3bd5"; charset=utf-8 Injection-Info: ciao.gmane.io; posting-host="blaine.gmane.org:116.202.254.214"; logging-data="587"; mail-complaints-to="usenet@ciao.gmane.io" To: "guile-user@gnu.org" Original-X-From: guile-user-bounces+guile-user=m.gmane-mx.org@gnu.org Sat Mar 12 01:00:27 2022 Return-path: Envelope-to: guile-user@m.gmane-mx.org Original-Received: from lists.gnu.org ([209.51.188.17]) by ciao.gmane.io with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.92) (envelope-from ) id 1nSpBK-000AUN-Vd for guile-user@m.gmane-mx.org; Sat, 12 Mar 2022 01:00:27 +0100 Original-Received: from localhost ([::1]:36410 helo=lists1p.gnu.org) by lists.gnu.org with esmtp (Exim 4.90_1) (envelope-from ) id 1nSpBJ-0005dV-EP for guile-user@m.gmane-mx.org; Fri, 11 Mar 2022 19:00:25 -0500 Original-Received: from eggs.gnu.org ([209.51.188.92]:49010) by lists.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.90_1) (envelope-from ) id 1nSpAw-0005bn-Q5 for guile-user@gnu.org; Fri, 11 Mar 2022 19:00:02 -0500 Original-Received: from mail-40132.protonmail.ch ([185.70.40.132]:46562) by eggs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.90_1) (envelope-from ) id 1nSpAu-000305-8z for guile-user@gnu.org; Fri, 11 Mar 2022 19:00:02 -0500 DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=protonmail.com; s=protonmail3; t=1647043196; bh=Rj42q7qHW5wIQRRzZDQvuYgRACmQ8W3hrCEPJl9Zs/U=; h=Date:To:From:Reply-To:Subject:Message-ID:From:To:Cc:Date:Subject: Reply-To:Feedback-ID:Message-ID; b=TONunKnYYn8R+50eAqYohPd3jAn8otreDEEZWA/RYbo8RHYn2Jy+xLMEYH8kSoEzp wz1FhPsItY4jXB9rOp8Hg0fw61Ysng8sjIypjU7DUeKfMkRrtEdTjrRX3Q4yX2EECh K9fiVfTrBn14y4iXzd+5soVvgZzlLUNcp+YXEKlXwbuYf3z5q5WKpBvcQQihjPG17e VO8CrlY21MDFLQLgRfFNqNqhYQHYq0gQQcHyMdZpPn2xV+s7uIHkSDmtL1cX65vSLj sKvBwkSC9U+1Jm8f1AQ7yZF8xfxJYLbyIukSvP0HzWSbRPPK79i9YlxBuCaPUXterH jWuG7DDfcAsJg== Received-SPF: pass client-ip=185.70.40.132; envelope-from=luis.felipe.la@protonmail.com; helo=mail-40132.protonmail.ch X-Spam_score_int: 9 X-Spam_score: 0.9 X-Spam_bar: / X-Spam_report: (0.9 / 5.0 requ) AC_FROM_MANY_DOTS=2.996, BAYES_00=-1.9, DKIM_SIGNED=0.1, DKIM_VALID=-0.1, DKIM_VALID_AU=-0.1, DKIM_VALID_EF=-0.1, FREEMAIL_FROM=0.001, RCVD_IN_MSPIKE_H2=-0.001, SPF_HELO_PASS=-0.001, SPF_PASS=-0.001, T_SCC_BODY_TEXT_LINE=-0.01 autolearn=no autolearn_force=no X-Spam_action: no action X-BeenThere: guile-user@gnu.org X-Mailman-Version: 2.1.29 Precedence: list List-Id: General Guile related discussions List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: guile-user-bounces+guile-user=m.gmane-mx.org@gnu.org Original-Sender: "guile-user" Xref: news.gmane.io gmane.lisp.guile.user:18198 Archived-At: This is an OpenPGP/MIME signed message (RFC 4880 and 3156) --------4b205668fa2ad14f84a4767b04f68a23b3a1352d80c2491bdb68de8aaa2c3bd5 Content-Type: multipart/mixed;boundary=---------------------7e6ea7bc0d4e61c895756e08e9f7f532 -----------------------7e6ea7bc0d4e61c895756e08e9f7f532 Content-Transfer-Encoding: quoted-printable Content-Type: text/plain;charset=utf-8 Hi, I want to display the help of an application on Yelp when users click = on "MenuButton =E2=86=92 Help" or when they press F1. I already have the r= elevant actions connected to a procedure that looks like this: (define (on-help action app) #| Show application manual in Yelp. |# (let [(window (get-active-window app))] (show-uri window "help:geteka" CURRENT_TIME))) This fails, however, because there is "No applicable method for generic ge= t-active-window", even though I have required GTK 4 and loaded GtkApplicat= ion by name.=C2=B9 Like so: (require "Gtk" "4.0") (load-by-name "Gtk" "Application") This is the backtrace: #+begin_example Backtrace: In ice-9/boot-9.scm: 1752:10 10 (with-exception-handler _ _ #:unwind? _ # _) In unknown file: 9 (apply-smob/0 #) In ice-9/boot-9.scm: 724:2 8 (call-with-prompt _ _ #) In ice-9/eval.scm: 619:8 7 (_ #(#(#))) In ice-9/boot-9.scm: 2835:4 6 (save-module-excursion _) 4380:12 5 (_) In geteka.scm: 21:8 4 (_) In unknown file: 3 (application:run #< 7f881910d780> ("ge=E2=80=A6= ")) In geteka/views.scm: 79:16 2 (on-help _ _) In oop/goops.scm: 1567:11 1 (cache-miss #f) 1585:2 0 (_ _ _) oop/goops.scm:1585:2: No applicable method for #< get-active-wind= ow (1)> in call (get-active-window #f) #+end_example = Also, I don't know whether I'm using the CURRENT_TIME constant correctly. = It is part of GDK 4 (GDK_CURRENT_TIME),=C2=B2 which I also required in my = module. For what it's worth, here's the complete code: https://gitlab.com/luis-fel= ipe/geteka 1. https://docs.gtk.org/gtk4/method.Application.get_active_window.html 2. https://docs.gtk.org/gdk4/const.CURRENT_TIME.html --- Luis Felipe L=C3=B3pez Acevedo https://luis-felipe.gitlab.io/ -----------------------7e6ea7bc0d4e61c895756e08e9f7f532 Content-Type: application/pgp-keys; filename="publickey - luis.felipe.la@protonmail.com - 0x12DE1598.asc"; name="publickey - luis.felipe.la@protonmail.com - 0x12DE1598.asc" Content-Transfer-Encoding: base64 Content-Disposition: attachment; filename="publickey - luis.felipe.la@protonmail.com - 0x12DE1598.asc"; name="publickey - luis.felipe.la@protonmail.com - 0x12DE1598.asc" LS0tLS1CRUdJTiBQR1AgUFVCTElDIEtFWSBCTE9DSy0tLS0tDQpWZXJzaW9uOiBPcGVuUEdQLmpz IHY0LjEwLjEwDQpDb21tZW50OiBodHRwczovL29wZW5wZ3Bqcy5vcmcNCg0KeHNCTkJGOFpwVWdC Q0FETGpoMnVtMkpkbDlCUUtrZ01TZ25ISitzSGg3S3ovdlA5c3dxN0hZTEVuRmc2DQpIQjRLa3Vv V0lxTXlFSnJOYzRrNVJQSGJ4azlxQTB6a0Exd0E4eHYzakErMlVsaVFra1pSMCs0cjlLK3gNCmZZ RGx4ZHd2Sk1VRVJaUk5kb3QvZnFCaGtTYmhpVElTU3pvRUs2ZjNreHdiN3NyME9jSkx2aU5wQ0tv aw0KWVo1Rnc0UXp3Q0Y5V1hja0VmOXNFeGNGYzZDTkdLL0pCVlZaZlZocVZNa3hqUU42YnF1WW56 a3E4WVNoDQo5Z1lTOVgxdmxiZFJBeWVLUmFxNHVqSXV0aVM2djAybDRSRTZ1RjVqaXI4eC9UeDc3 NEZualBCNmdDdWwNCk5TeDZCZmhVTndZeWJ5UFB4SVhYOUpPNHZrT3ZXNE9NZVdjcW1BK1VnQ3c5 Vmk5dnJDN3lISlRGQUJFQg0KQUFITlBXeDFhWE11Wm1Wc2FYQmxMbXhoUUhCeWIzUnZibTFoYVd3 dVkyOXRJRHhzZFdsekxtWmxiR2x3DQpaUzVzWVVCd2NtOTBiMjV0WVdsc0xtTnZiVDdDd0hZRUVB RUlBQ0FGQWw4WnBVZ0dDd2tIQ0FNQ0JCVUkNCkNnSUVGZ0lCQUFJWkFRSWJBd0llQVFBS0NSQTU0 TWRqZWpuR3FWVWFCLzk3UC9WSEtwK0FiRWJMemVkNg0KUEloSHI2NGQ4ek5PN21ibG5Gd056NDlo azdKbVJZTDV2UDJWL21DMDNXSUpmU2ppdllHU2lIbkxSZURFDQpubG1VQ01mM20rMU45OGVBaXFI TkVnNmVpaTMyYXFWUWJheHYveis1OVJHZUtIMkFsdGFkcHNUQWdLVXMNCjFrL2Z0ZEJXVlplYitC QXJHYWlsREU3OHVlYiszWE15Z3ZDV2oyMWZleS81VXZiakhxUjlMNEpZVGlTbQ0Kd1l6N0hmWm8r REU3WUlzY3ptVmVoOE0xVnpDbC8xaWFoazlVRUxqQVAvalArcnVNVDlxRVd1ajJRbGxBDQpNZVBH UnpRYnFpRGhWUzhMRmRqQkhOb0tMeHlobmJERUZqSEYvNHhOcThqbFFMZkdKWjVoS2V0dForYlUN ClNXYUVYRjNoano5V1dVOGE1Sy8yTS9Ib3pzQk5CRjhacFVnQkNBREtVblJJOXl6NFJ2TnV2U09J RmxKdg0Ka2ZvSGVaci9CTGNTR1ZjU0JreDVsc0tkVnpNeDkrVWFhZUtqV3BJTyt4ZkVOc3o3YitC Vm9CTDBXcnY5DQo0aGx3V21HNXEwQWRFeVUxL2ZRc1JSN201TzFlYTZVVDNmdVVnMVZzakZaK1Iz alN5bEF0eXpJWk0wTFUNCmJXNUY2NzNLNEF1U2NGcE44TkxHVGdScjBXUWwvQm5Id2gyWFExeHFo YzZHQk92d2l3VkJqYWY1MFNIRQ0KVGlVUHBlM0pqUXl5QlpwKzhGS20rc25ScUNHWG4wSkc4bzBG WHk5V2N4dHZmUUZNTUpwOUJPMnl0Z3hIDQp6UUlwWWNKcEpadWNjbkZvcXFIOWorMXFYWE5TYTMv cU8zenU5bFN2WFR4eDZrZGgwRldUbllDeDhNZjgNCkJZL1BXL2JCT095aExDb1RrSHFsQUJFQkFB SEN3RjhFR0FFSUFBa0ZBbDhacFVnQ0d3d0FDZ2tRT2VESA0KWTNvNXhxa2VLUWYrSk1sY2JSbHdl aC9GQTFudzh6RkN4YUY1OFBOREVPOGxIOTIveHR6bndHZEF1bHpUDQpoWjQwakdURWlweWdzbnFI VjdXSFVmNDRuZVhuMkExY3ZDWis3M0tjcGFRTmg5TXA4eVduR0taWVVHa0cNCjZPZjFoRVU3OTJY WkV4a3lBODJQZ0xCTlkrVnpOWFhLQ0g3Tlh4WlFRV1Y1blhjYlVGQ1p5Slp1ZFNnUQ0KeGsxOXNR ZjRzOXZKWDZQQzY4cXdpN2FKMTduVmZyYmNNYXlScG0yT0dKWGQrdDkxVi9Mbk5wQ1JndGwzDQpq TllzQ0JGS0RDMFl4ZEEvTkNkRWsxZ2Z1akZ6bDBiQnM3KzVKYmQzelJhRTVBZmRWUXRJbG1FWERr VzYNCjB1eUVpM050Y3E1b2RYQTFubFIrZTA0NEtGdmVaekZ1Tk5lVGdzekFCcjVIaVU3MC9FbHlz dz09DQo9ejZlNw0KLS0tLS1FTkQgUEdQIFBVQkxJQyBLRVkgQkxPQ0stLS0tLQ0K -----------------------7e6ea7bc0d4e61c895756e08e9f7f532-- --------4b205668fa2ad14f84a4767b04f68a23b3a1352d80c2491bdb68de8aaa2c3bd5 Content-Type: application/pgp-signature; name="signature.asc" Content-Description: OpenPGP digital signature Content-Disposition: attachment; filename="signature.asc" -----BEGIN PGP SIGNATURE----- Version: ProtonMail wsBzBAEBCAAGBQJiK+JtACEJEDngx2N6OcapFiEEEt4VmH0cRaQ093DvOeDH Y3o5xqmiVggAwcQ6EnEl7+z/9l/wx6RdkX8xy85puBdCOynlJnus/f4V5bxa bD8lhxGenQiq6ZBgZa4ZDmJQVmJMadhf/viGN9T/RMbZuYFHKHG7xbkrWOvR r3V+GoJ7gM7+oc6q6KA8I0fwm6ZEQv8cdzqEPUJv3SyXi4oNfsiHeulyIe6Y KL8x2CLSeoecGQ3Xxo2ZWFmTxUaVVA+RzAFrlyL90BymPRAF5CscsW2p9wsZ 2jUOU58uR9SS5R7+J4Zpcnqoox0Aabl4rlLkLtZJOgzliEflluYQ+aR4SBe8 rmaYxgEKxkmoyedg0In7RXPdG/kVunh19mNGvO4Rq/jy8yZm3U02MQ== =z9yX -----END PGP SIGNATURE----- --------4b205668fa2ad14f84a4767b04f68a23b3a1352d80c2491bdb68de8aaa2c3bd5--