From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.io!.POSTED.blaine.gmane.org!not-for-mail From: Alex Newsgroups: gmane.emacs.help Subject: Re: EWW func add url under point as bookmark Date: Mon, 18 Apr 2022 22:29:21 +0200 Message-ID: <87wnfmqgny.fsf@gnu.org> References: <87ilrb4gdu.fsf@gnu.org> <87pmli1n3t.fsf@gnu.org> <878rs6a0s2.fsf@zoho.eu> <87zgklumer.fsf@gnu.org> <87wnfooo8y.fsf@zoho.eu> Mime-Version: 1.0 Content-Type: text/plain Injection-Info: ciao.gmane.io; posting-host="blaine.gmane.org:116.202.254.214"; logging-data="20628"; mail-complaints-to="usenet@ciao.gmane.io" To: help-gnu-emacs@gnu.org Original-X-From: help-gnu-emacs-bounces+geh-help-gnu-emacs=m.gmane-mx.org@gnu.org Mon Apr 18 22:30:06 2022 Return-path: Envelope-to: geh-help-gnu-emacs@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 1ngY0c-00057f-11 for geh-help-gnu-emacs@m.gmane-mx.org; Mon, 18 Apr 2022 22:30:06 +0200 Original-Received: from localhost ([::1]:56402 helo=lists1p.gnu.org) by lists.gnu.org with esmtp (Exim 4.90_1) (envelope-from ) id 1ngY0a-0000VD-TX for geh-help-gnu-emacs@m.gmane-mx.org; Mon, 18 Apr 2022 16:30:04 -0400 Original-Received: from eggs.gnu.org ([2001:470:142:3::10]:52596) by lists.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.90_1) (envelope-from ) id 1ngY04-0000SO-Be for help-gnu-emacs@gnu.org; Mon, 18 Apr 2022 16:29:32 -0400 Original-Received: from mta763.solicitae.com ([89.35.150.78]:40506 helo=smtp.gnuhacker.org) by eggs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.90_1) (envelope-from ) id 1ngY00-000622-V3 for help-gnu-emacs@gnu.org; Mon, 18 Apr 2022 16:29:31 -0400 Original-Received: from cyberlab.gnu.org (localhost [127.0.0.1]) by smtp.gnuhacker.org (Postfix) with ESMTP id 87711602E7B for ; Mon, 18 Apr 2022 22:29:21 +0200 (CEST) In-Reply-To: <87wnfooo8y.fsf@zoho.eu> (Emanuel Berg via Users list for the's message of "Sat, 16 Apr 2022 20:51:41 +0200") Received-SPF: none client-ip=89.35.150.78; envelope-from=project@gnuhacker.org; helo=smtp.gnuhacker.org X-Spam_score_int: -16 X-Spam_score: -1.7 X-Spam_bar: - X-Spam_report: (-1.7 / 5.0 requ) BAYES_00=-1.9, KHOP_HELO_FCRDNS=0.187, SPF_HELO_NONE=0.001, SPF_NONE=0.001, T_SCC_BODY_TEXT_LINE=-0.01 autolearn=no autolearn_force=no X-Spam_action: no action X-BeenThere: help-gnu-emacs@gnu.org X-Mailman-Version: 2.1.29 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-mx.org@gnu.org Original-Sender: "help-gnu-emacs" Xref: news.gmane.io gmane.emacs.help:136946 Archived-At: Emanuel Berg via Users list for the GNU Emacs text editor writes: > OK, good, but then better yet you could remove the interface/wrapper > function and instead make eww-bookmark-add interactive (as well as > non-interactive from Lisp), and for interactive use it'll read the URL > from point. new version: #+begin_src elisp ;; Copyright 2022 Alex ;; under GPLv3-or-later License (defun eww-bookmark-add (url title) "Bookmark `URL' as `TITLE'." (interactive (list (thing-at-point 'url) (read-string "Title: "))) (unless (stringp url) (user-error "invalid url string required")) (unless (stringp title) (user-error "invalid title string required")) (eww-read-bookmarks) (dolist (bookmark eww-bookmarks) (when (equal url (plist-get bookmark :url)) (user-error "Already bookmarked"))) (push (list :url url :title title :time (current-time-string)) eww-bookmarks) (eww-write-bookmarks) (message "Bookmarked %s (%s)" url title)) #+end_src > Ironically then you have to get the title the way you initially did! right lol -- Alex Emacs Lover. FSF Member. Free/Libre Software supporter. stallmansupport.org - Disinformation succeeds because so many people care deeply about injustice but do not take the time to check the facts.