[elpa] externals/hyperbole f1ede2a4b7 4/6: Merge pull request #564 from rswgnu/fix-ripgrep-msg-problem
branch: externals/hyperbole commit f1ede2a4b7c91ce39d82b8122e5bb50f4e04e24a Merge: 8fa9e4e198 63eb11702e Author: Robert Weiner Commit: GitHub Merge pull request #564 from rswgnu/fix-ripgrep-msg-problem Add file exist check in ripgrep-msg and a test case --- ChangeLog | 6 ++ hibtypes.el| 7 --- test/hibtypes-tests.el | 28 +++- 3 files changed, 37 insertions(+), 4 deletions(-) diff --git a/ChangeLog b/ChangeLog index 8c5a236c28..5233c20b93 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,3 +1,9 @@ +2024-08-23 Mats Lidell + +* hibtypes.el (ripgrep-msg): Add check of file exist. + +* test/hibtypes-tests.el (ibtypes::ripgrep-msg-test): Test ripgrep-msg. + 2024-08-18 Bob Weiner * hywiki.el (hywiki-maybe-at-wikiword-beginning): Fix to handle word diff --git a/hibtypes.el b/hibtypes.el index faeaac5ea9..677daa95c2 100644 --- a/hibtypes.el +++ b/hibtypes.el @@ -3,7 +3,7 @@ ;; Author: Bob Weiner ;; ;; Orig-Date:19-Sep-91 at 20:45:31 -;; Last-Mod: 18-Aug-24 at 09:14:53 by Mats Lidell +;; Last-Mod: 23-Aug-24 at 21:32:09 by Mats Lidell ;; ;; SPDX-License-Identifier: GPL-3.0-or-later ;; @@ -996,8 +996,9 @@ than a helm completion buffer)." (while (and (= (forward-line -1) 0) (looking-at "[1-9][0-9]*[-:]\\|--$"))) (unless (or (looking-at "[1-9][0-9]*[-:]\\|--$") - (and (setq file (buffer-substring-no-properties (line-beginning-position) (line-end-position))) - (string-empty-p (string-trim file + (and (setq file (string-trim (buffer-substring-no-properties (line-beginning-position) (match-beginning 0 + (or (string-empty-p file) + (not (file-exists-p file) (ibut:label-set (concat file ":" line-num)) (hact 'hib-link-to-file-line file line-num))) diff --git a/test/hibtypes-tests.el b/test/hibtypes-tests.el index 5d0c334f70..acac882990 100644 --- a/test/hibtypes-tests.el +++ b/test/hibtypes-tests.el @@ -3,7 +3,7 @@ ;; Author: Mats Lidell ;; ;; Orig-Date:20-Feb-21 at 23:45:00 -;; Last-Mod: 5-Aug-24 at 17:37:57 by Mats Lidell +;; Last-Mod: 10-Aug-24 at 23:27:05 by Mats Lidell ;; ;; SPDX-License-Identifier: GPL-3.0-or-later ;; @@ -297,7 +297,33 @@ ;; ipython-stack-frame ;; ripgrep-msg +(ert-deftest ibtypes::ripgrep-msg-test () + "Verify `ripgrep-msg'." + ;; Date is picked up as a line number but file existence test before + ;; concluding it is a button save it from being identified as + ;; a ripgrep-msg. + (with-temp-buffer +(insert "one two three\n2024-07-30 line\n") +(goto-line 2) +(should-not (eq (hattr:get (hbut:at-p) 'actype) 'hib-link-to-file-line)) +(should-not (ibtypes::ripgrep-msg))) + ;; Regular ripgrep-msg case. + (with-temp-buffer +(insert "hibtypes.el\n20: line\n") +(goto-line 2) +(mocklet (((hib-link-to-file-line "hibtypes.el" "20") => t) + ((file-exists-p "hibtypes.el") => t)) + (should (eq (hattr:get (hbut:at-p) 'actype) 'hib-link-to-file-line)) + (should (ibtypes::ripgrep-msg + + ;; Regular match but file does not exist case. + (with-temp-buffer +(insert "unknown-file\n20: line\n") +(goto-line 2) +(should-not (eq (hattr:get (hbut:at-p) 'actype) 'hib-link-to-file-line)) +(should-not (ibtypes::ripgrep-msg + ;; grep-msg ;; debugger-source
[elpa] externals/hyperbole a9bc432488 6/6: Merge pull request #579 from rswgnu/rsw
branch: externals/hyperbole commit a9bc432488b5abf27a04a1f259320e8df1f72afc Merge: f1ede2a4b7 4a15dba0ab Author: Robert Weiner Commit: GitHub Merge pull request #579 from rswgnu/rsw Add TagFind to HyWiki and HyRolo menus and more updates --- ChangeLog | 38 ++ HY-ABOUT| 2 +- HY-TALK/HYPERORG.org| 4 +- Makefile| 2 +- README.md | 114 +++--- README.md.html | 125 - README.toc.md | 134 hactypes.el | 16 +++-- hbut.el | 11 +-- hibtypes.el | 179 hpath.el| 15 +++- hui-menu.el | 33 - hui-mini.el | 44 +--- hui-mouse.el| 6 +- hyperbole.el| 8 +-- hyrolo-menu.el | 5 +- man/hyperbole.html | 68 +- man/hyperbole.info | Bin 652687 -> 653988 bytes man/hyperbole.texi | 47 + test/demo-tests.el | 2 +- test/kcell-tests.el | 4 +- test/smart-org-tests.el | 8 +-- 22 files changed, 508 insertions(+), 357 deletions(-) diff --git a/ChangeLog b/ChangeLog index 5233c20b93..c4125fac00 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,9 +1,47 @@ +2024-08-24 Bob Weiner + +* hpath.el (hpath:to-Info-ref): Add. + (hpath:is-p, hpath:at-p): + hactypes.el (link-to-Info-node): + hibtypes.el (Info-node): Add support for Info refs in a regular +pathname format, e.g. "hyperbole.info#Smart Keys". + hibtypes.el (pathname): Exclude Info paths without parens handled +by Info-node, e.g. "emacs.info#Windows". + +2024-08-23 Bob Weiner + +* hibtypes.el (hyp-html-manual): Add new ibtype to display Hyperbole HTML +manual sections using syntax: "hyperbole.html#section". + +* hbut.el (ibut:label-p): Handle when lbl is nil. + +* hyperbole.el: Require Emacs 27.2 minimum. + 2024-08-23 Mats Lidell * hibtypes.el (ripgrep-msg): Add check of file exist. * test/hibtypes-tests.el (ibtypes::ripgrep-msg-test): Test ripgrep-msg. +2024-08-19 Bob Weiner + +* README.md: Add HyWiki description. + +* man/hyperbole.texi (HyRolo Searching, HyRolo Menu): Add TagFind menu item. + +* hyrolo-menu.el: Add "Tag-Find". + hui-menu.el (infodock-hyperbole-menu): + hui-mini.el (hui:menus): In HyWiki> menu, change Toggle to ModeToggle so +can add TagFind item. + (hui:menu-read-from-minibuffer): Add to allow customization +of minibuffer read arguments such as 'initial-content' that minibuffer +menus generate. + (hui:menu-rolo): Add TagFind. + man/hyperbole.texi (HyWiki Menu): Add TagFind menu item doc. + +* hsys-org.el (hsys-org-enable-smart-keys): Change 'buttons option to :buttons +so don't have to quote and works in assq/rassq lookups. + 2024-08-18 Bob Weiner * hywiki.el (hywiki-maybe-at-wikiword-beginning): Fix to handle word diff --git a/HY-ABOUT b/HY-ABOUT index 4e6d130421..da0954216c 100644 --- a/HY-ABOUT +++ b/HY-ABOUT @@ -11,7 +11,7 @@ GNU Hyperbole (pronounced Ga-new Hi-per-bo-lee), or just Hyperbole, is an efficient and programmable hypertextual information management system implemented as a GNU Emacs package. It works well on GNU Emacs -27.1 or above. (See also: "HY-WHY.kotl" for Hyperbole uses). +27.2 or above. (See also: "HY-WHY.kotl" for Hyperbole uses). Hyperbole includes easy-to-use, powerful hypertextual buttons without the need to learn a markup language; a hierarchical, record-based diff --git a/HY-TALK/HYPERORG.org b/HY-TALK/HYPERORG.org index 592133ea1e..a49f594928 100644 --- a/HY-TALK/HYPERORG.org +++ b/HY-TALK/HYPERORG.org @@ -283,11 +283,11 @@ Variable name values can also be displayed. This <> sets the Org mode contexts where Hyperbole's Action/Assist keys are active. By default, these 'Smart Keys' work only on hyperbuttons (Hyperbole's and Org's) when the variable -is set to 'buttons. +is set to :buttons. - + Set this to 't to enable the Smart Keys in all Org contexts (nil to disable): diff --git a/Makefile b/Makefile index e05f7cf8ee..1246a05bb6 100644 --- a/Makefile +++ b/Makefile @@ -79,7 +79,7 @@ # # To interactively run a docker version of Emacs with Hyperbole: # make docker-run - default to running master -# make docker-run version=27.1 - run Emacs V27.1 +# make docker-run version=27.2 - run Emacs V27.2 # # To build and test a dockerized version of Emacs with Hyperbole: # make docker - defaults: version=master targets='clean bin test' diff --git a/README.md b/README.md index f7358550b6..9fb84e7230 100644 --- a/README.md +++ b/README.md @@ -135,7 +135,7 @@ keyboard and mouse-based control of information display within multiple wind
[elpa] externals/hyperbole 81a0619202 3/6: Add TagFind to HyWiki and HyRolo menus and more updates
branch: externals/hyperbole commit 81a0619202fa48f88aa471b897965d69362114ef Author: bw Commit: bw Add TagFind to HyWiki and HyRolo menus and more updates Support "file.info#ref" pathnames for Info references/links. Make "hyperbole.html#Smart Keys" display local Hyperbole manual html section in a web browser. hsys-org.el (hsys-org-enable-smart-keys): Change 'buttons option to :buttons so don't have to quote and works in assq/rassq lookups. hui-mini.el (hui:menus): In HyWiki> menu, change Toggle to ModeToggle so can add TagFind item. hyperbole.el: Require Emacs 27.2 minimum. --- ChangeLog | 38 ++ HY-ABOUT| 2 +- HY-TALK/HYPERORG.org| 4 +- Makefile| 2 +- README.md | 114 +++--- README.md.html | 125 - README.toc.md | 134 hactypes.el | 16 +++-- hbut.el | 11 +-- hibtypes.el | 179 hpath.el| 15 +++- hui-menu.el | 33 - hui-mini.el | 44 +--- hui-mouse.el| 6 +- hyperbole.el| 8 +-- hyrolo-menu.el | 5 +- man/hyperbole.html | 68 +- man/hyperbole.info | Bin 652687 -> 653988 bytes man/hyperbole.texi | 47 + test/demo-tests.el | 2 +- test/kcell-tests.el | 4 +- test/smart-org-tests.el | 8 +-- 22 files changed, 508 insertions(+), 357 deletions(-) diff --git a/ChangeLog b/ChangeLog index 8c5a236c28..e8572ff1d8 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,3 +1,41 @@ +2024-08-24 Bob Weiner + +* hpath.el (hpath:to-Info-ref): Add. + (hpath:is-p, hpath:at-p): + hactypes.el (link-to-Info-node): + hibtypes.el (Info-node): Add support for Info refs in a regular +pathname format, e.g. "hyperbole.info#Smart Keys". + hibtypes.el (pathname): Exclude Info paths without parens handled +by Info-node, e.g. "emacs.info#Windows". + +2024-08-23 Bob Weiner + +* hibtypes.el (hyp-html-manual): Add new ibtype to display Hyperbole HTML +manual sections using syntax: "hyperbole.html#section". + +* hbut.el (ibut:label-p): Handle when lbl is nil. + +* hyperbole.el: Require Emacs 27.2 minimum. + +2024-08-19 Bob Weiner + +* README.md: Add HyWiki description. + +* man/hyperbole.texi (HyRolo Searching, HyRolo Menu): Add TagFind menu item. + +* hyrolo-menu.el: Add "Tag-Find". + hui-menu.el (infodock-hyperbole-menu): + hui-mini.el (hui:menus): In HyWiki> menu, change Toggle to ModeToggle so +can add TagFind item. + (hui:menu-read-from-minibuffer): Add to allow customization +of minibuffer read arguments such as 'initial-content' that minibuffer +menus generate. + (hui:menu-rolo): Add TagFind. + man/hyperbole.texi (HyWiki Menu): Add TagFind menu item doc. + +* hsys-org.el (hsys-org-enable-smart-keys): Change 'buttons option to :buttons +so don't have to quote and works in assq/rassq lookups. + 2024-08-18 Bob Weiner * hywiki.el (hywiki-maybe-at-wikiword-beginning): Fix to handle word diff --git a/HY-ABOUT b/HY-ABOUT index 4e6d130421..da0954216c 100644 --- a/HY-ABOUT +++ b/HY-ABOUT @@ -11,7 +11,7 @@ GNU Hyperbole (pronounced Ga-new Hi-per-bo-lee), or just Hyperbole, is an efficient and programmable hypertextual information management system implemented as a GNU Emacs package. It works well on GNU Emacs -27.1 or above. (See also: "HY-WHY.kotl" for Hyperbole uses). +27.2 or above. (See also: "HY-WHY.kotl" for Hyperbole uses). Hyperbole includes easy-to-use, powerful hypertextual buttons without the need to learn a markup language; a hierarchical, record-based diff --git a/HY-TALK/HYPERORG.org b/HY-TALK/HYPERORG.org index 592133ea1e..a49f594928 100644 --- a/HY-TALK/HYPERORG.org +++ b/HY-TALK/HYPERORG.org @@ -283,11 +283,11 @@ Variable name values can also be displayed. This <> sets the Org mode contexts where Hyperbole's Action/Assist keys are active. By default, these 'Smart Keys' work only on hyperbuttons (Hyperbole's and Org's) when the variable -is set to 'buttons. +is set to :buttons. - + Set this to 't to enable the Smart Keys in all Org contexts (nil to disable): diff --git a/Makefile b/Makefile index e05f7cf8ee..1246a05bb6 100644 --- a/Makefile +++ b/Makefile @@ -79,7 +79,7 @@ # # To interactively run a docker version of Emacs with Hyperbole: # make docker-run - default to running master -# make docker-run version=27.1 - run Emacs V27.1 +# make docker-run version=27.2 - run Emacs V27.2 # # To build and test a dockerized version of Emacs with Hyperbole: # make docker - defaults: version=
[elpa] externals/hyperbole 277dacbf0a 1/6: Add file exist check in ripgrep-msg and a test case
branch: externals/hyperbole commit 277dacbf0a0f56f1966bce32224652ad345ffa97 Author: Mats Lidell Commit: Mats Lidell Add file exist check in ripgrep-msg and a test case --- ChangeLog | 6 ++ hibtypes.el| 5 +++-- test/hibtypes-tests.el | 28 +++- 3 files changed, 36 insertions(+), 3 deletions(-) diff --git a/ChangeLog b/ChangeLog index 8c5a236c28..5233c20b93 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,3 +1,9 @@ +2024-08-23 Mats Lidell + +* hibtypes.el (ripgrep-msg): Add check of file exist. + +* test/hibtypes-tests.el (ibtypes::ripgrep-msg-test): Test ripgrep-msg. + 2024-08-18 Bob Weiner * hywiki.el (hywiki-maybe-at-wikiword-beginning): Fix to handle word diff --git a/hibtypes.el b/hibtypes.el index faeaac5ea9..517cca26d7 100644 --- a/hibtypes.el +++ b/hibtypes.el @@ -3,7 +3,7 @@ ;; Author: Bob Weiner ;; ;; Orig-Date:19-Sep-91 at 20:45:31 -;; Last-Mod: 18-Aug-24 at 09:14:53 by Mats Lidell +;; Last-Mod: 23-Aug-24 at 21:28:35 by Mats Lidell ;; ;; SPDX-License-Identifier: GPL-3.0-or-later ;; @@ -997,7 +997,8 @@ than a helm completion buffer)." (looking-at "[1-9][0-9]*[-:]\\|--$"))) (unless (or (looking-at "[1-9][0-9]*[-:]\\|--$") (and (setq file (buffer-substring-no-properties (line-beginning-position) (line-end-position))) - (string-empty-p (string-trim file + (or (string-empty-p (string-trim file)) + (not (file-exists-p (string-trim file)) (ibut:label-set (concat file ":" line-num)) (hact 'hib-link-to-file-line file line-num))) diff --git a/test/hibtypes-tests.el b/test/hibtypes-tests.el index 5d0c334f70..acac882990 100644 --- a/test/hibtypes-tests.el +++ b/test/hibtypes-tests.el @@ -3,7 +3,7 @@ ;; Author: Mats Lidell ;; ;; Orig-Date:20-Feb-21 at 23:45:00 -;; Last-Mod: 5-Aug-24 at 17:37:57 by Mats Lidell +;; Last-Mod: 10-Aug-24 at 23:27:05 by Mats Lidell ;; ;; SPDX-License-Identifier: GPL-3.0-or-later ;; @@ -297,7 +297,33 @@ ;; ipython-stack-frame ;; ripgrep-msg +(ert-deftest ibtypes::ripgrep-msg-test () + "Verify `ripgrep-msg'." + ;; Date is picked up as a line number but file existence test before + ;; concluding it is a button save it from being identified as + ;; a ripgrep-msg. + (with-temp-buffer +(insert "one two three\n2024-07-30 line\n") +(goto-line 2) +(should-not (eq (hattr:get (hbut:at-p) 'actype) 'hib-link-to-file-line)) +(should-not (ibtypes::ripgrep-msg))) + ;; Regular ripgrep-msg case. + (with-temp-buffer +(insert "hibtypes.el\n20: line\n") +(goto-line 2) +(mocklet (((hib-link-to-file-line "hibtypes.el" "20") => t) + ((file-exists-p "hibtypes.el") => t)) + (should (eq (hattr:get (hbut:at-p) 'actype) 'hib-link-to-file-line)) + (should (ibtypes::ripgrep-msg + + ;; Regular match but file does not exist case. + (with-temp-buffer +(insert "unknown-file\n20: line\n") +(goto-line 2) +(should-not (eq (hattr:get (hbut:at-p) 'actype) 'hib-link-to-file-line)) +(should-not (ibtypes::ripgrep-msg + ;; grep-msg ;; debugger-source
[elpa] externals/hyperbole 63eb11702e 2/6: Update after review
branch: externals/hyperbole commit 63eb11702e6a60aff80cbeaff45c3565d2e08c87 Author: Mats Lidell Commit: Mats Lidell Update after review --- hibtypes.el | 8 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/hibtypes.el b/hibtypes.el index 517cca26d7..677daa95c2 100644 --- a/hibtypes.el +++ b/hibtypes.el @@ -3,7 +3,7 @@ ;; Author: Bob Weiner ;; ;; Orig-Date:19-Sep-91 at 20:45:31 -;; Last-Mod: 23-Aug-24 at 21:28:35 by Mats Lidell +;; Last-Mod: 23-Aug-24 at 21:32:09 by Mats Lidell ;; ;; SPDX-License-Identifier: GPL-3.0-or-later ;; @@ -996,9 +996,9 @@ than a helm completion buffer)." (while (and (= (forward-line -1) 0) (looking-at "[1-9][0-9]*[-:]\\|--$"))) (unless (or (looking-at "[1-9][0-9]*[-:]\\|--$") - (and (setq file (buffer-substring-no-properties (line-beginning-position) (line-end-position))) - (or (string-empty-p (string-trim file)) - (not (file-exists-p (string-trim file)) + (and (setq file (string-trim (buffer-substring-no-properties (line-beginning-position) (match-beginning 0 + (or (string-empty-p file) + (not (file-exists-p file) (ibut:label-set (concat file ":" line-num)) (hact 'hib-link-to-file-line file line-num)))
[elpa] externals/hyperbole updated (8fa9e4e198 -> a9bc432488)
elpasync pushed a change to branch externals/hyperbole. from 8fa9e4e198 Merge pull request #578 from rswgnu/rsw new 81a0619202 Add TagFind to HyWiki and HyRolo menus and more updates new 277dacbf0a Add file exist check in ripgrep-msg and a test case new 63eb11702e Update after review new f1ede2a4b7 Merge pull request #564 from rswgnu/fix-ripgrep-msg-problem new 4a15dba0ab Merge branch 'master' into rsw new a9bc432488 Merge pull request #579 from rswgnu/rsw Summary of changes: ChangeLog | 44 HY-ABOUT| 2 +- HY-TALK/HYPERORG.org| 4 +- Makefile| 2 +- README.md | 114 +++-- README.md.html | 125 README.toc.md | 134 -- hactypes.el | 16 +++-- hbut.el | 11 +-- hibtypes.el | 186 hpath.el| 15 +++- hui-menu.el | 33 - hui-mini.el | 44 +--- hui-mouse.el| 6 +- hyperbole.el| 8 +-- hyrolo-menu.el | 5 +- man/hyperbole.html | 68 +- man/hyperbole.info | Bin 652687 -> 653988 bytes man/hyperbole.texi | 47 test/demo-tests.el | 2 +- test/hibtypes-tests.el | 28 +++- test/kcell-tests.el | 4 +- test/smart-org-tests.el | 8 +-- 23 files changed, 545 insertions(+), 361 deletions(-)
[elpa] externals/hyperbole 4a15dba0ab 5/6: Merge branch 'master' into rsw
branch: externals/hyperbole commit 4a15dba0ab9b90cea502fb00a2d2c754fee75fd0 Merge: 81a0619202 f1ede2a4b7 Author: bw Commit: bw Merge branch 'master' into rsw --- ChangeLog | 6 ++ hibtypes.el| 7 --- test/hibtypes-tests.el | 28 +++- 3 files changed, 37 insertions(+), 4 deletions(-) diff --git a/ChangeLog b/ChangeLog index e8572ff1d8..c4125fac00 100644 --- a/ChangeLog +++ b/ChangeLog @@ -17,6 +17,12 @@ * hyperbole.el: Require Emacs 27.2 minimum. +2024-08-23 Mats Lidell + +* hibtypes.el (ripgrep-msg): Add check of file exist. + +* test/hibtypes-tests.el (ibtypes::ripgrep-msg-test): Test ripgrep-msg. + 2024-08-19 Bob Weiner * README.md: Add HyWiki description. diff --git a/hibtypes.el b/hibtypes.el index 150c6532d7..31058a1619 100644 --- a/hibtypes.el +++ b/hibtypes.el @@ -3,7 +3,7 @@ ;; Author: Bob Weiner ;; ;; Orig-Date:19-Sep-91 at 20:45:31 -;; Last-Mod: 18-Aug-24 at 09:14:53 by Mats Lidell +;; Last-Mod: 23-Aug-24 at 21:32:09 by Mats Lidell ;; ;; SPDX-License-Identifier: GPL-3.0-or-later ;; @@ -1021,8 +1021,9 @@ than a helm completion buffer)." (while (and (= (forward-line -1) 0) (looking-at "[1-9][0-9]*[-:]\\|--$"))) (unless (or (looking-at "[1-9][0-9]*[-:]\\|--$") - (and (setq file (buffer-substring-no-properties (line-beginning-position) (line-end-position))) - (string-empty-p (string-trim file + (and (setq file (string-trim (buffer-substring-no-properties (line-beginning-position) (match-beginning 0 + (or (string-empty-p file) + (not (file-exists-p file) (ibut:label-set (concat file ":" line-num)) (hact 'hib-link-to-file-line file line-num))) diff --git a/test/hibtypes-tests.el b/test/hibtypes-tests.el index 5d0c334f70..acac882990 100644 --- a/test/hibtypes-tests.el +++ b/test/hibtypes-tests.el @@ -3,7 +3,7 @@ ;; Author: Mats Lidell ;; ;; Orig-Date:20-Feb-21 at 23:45:00 -;; Last-Mod: 5-Aug-24 at 17:37:57 by Mats Lidell +;; Last-Mod: 10-Aug-24 at 23:27:05 by Mats Lidell ;; ;; SPDX-License-Identifier: GPL-3.0-or-later ;; @@ -297,7 +297,33 @@ ;; ipython-stack-frame ;; ripgrep-msg +(ert-deftest ibtypes::ripgrep-msg-test () + "Verify `ripgrep-msg'." + ;; Date is picked up as a line number but file existence test before + ;; concluding it is a button save it from being identified as + ;; a ripgrep-msg. + (with-temp-buffer +(insert "one two three\n2024-07-30 line\n") +(goto-line 2) +(should-not (eq (hattr:get (hbut:at-p) 'actype) 'hib-link-to-file-line)) +(should-not (ibtypes::ripgrep-msg))) + ;; Regular ripgrep-msg case. + (with-temp-buffer +(insert "hibtypes.el\n20: line\n") +(goto-line 2) +(mocklet (((hib-link-to-file-line "hibtypes.el" "20") => t) + ((file-exists-p "hibtypes.el") => t)) + (should (eq (hattr:get (hbut:at-p) 'actype) 'hib-link-to-file-line)) + (should (ibtypes::ripgrep-msg + + ;; Regular match but file does not exist case. + (with-temp-buffer +(insert "unknown-file\n20: line\n") +(goto-line 2) +(should-not (eq (hattr:get (hbut:at-p) 'actype) 'hib-link-to-file-line)) +(should-not (ibtypes::ripgrep-msg + ;; grep-msg ;; debugger-source
[nongnu] elpa/helm 4da55b228c 1/5: Delete trailing white spaces
branch: elpa/helm commit 4da55b228c72af7ec8acf229cd5207469b89b0ee Author: Thierry Volpiatto Commit: Thierry Volpiatto Delete trailing white spaces --- .github/FUNDING.yml | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/.github/FUNDING.yml b/.github/FUNDING.yml index 20032d4a37..51a75d4303 100644 --- a/.github/FUNDING.yml +++ b/.github/FUNDING.yml @@ -1,3 +1,3 @@ # These are supported funding model platforms github: emacs-helm -custom: https://www.patreon.com/user?u=86324343 +custom: https://www.patreon.com/user?u=86324343
[nongnu] elpa/helm 73d8d6f79c 4/5: Run popup-info in helm-help-mode-after-hook
branch: elpa/helm commit 73d8d6f79cdbc744505638ff3caf1be3049d1404 Author: Thierry Volpiatto Commit: Thierry Volpiatto Run popup-info in helm-help-mode-after-hook --- helm-utils.el | 2 ++ 1 file changed, 2 insertions(+) diff --git a/helm-utils.el b/helm-utils.el index 481c2978f4..2b00c75899 100644 --- a/helm-utils.el +++ b/helm-utils.el @@ -1069,8 +1069,10 @@ this source to fetch infos on candidate." (if helm-popup-tip-mode (progn (add-hook 'helm-move-selection-after-hook 'helm-maybe-show-help-echo) +(add-hook 'helm-help-mode-after-hook 'helm-maybe-show-help-echo) (add-hook 'helm-cleanup-hook 'helm-cancel-help-echo-timer)) (remove-hook 'helm-move-selection-after-hook 'helm-maybe-show-help-echo) +(remove-hook 'helm-help-mode-after-hook 'helm-maybe-show-help-echo) (remove-hook 'helm-cleanup-hook 'helm-cancel-help-echo-timer))) (defun helm-open-file-with-default-tool (file)
[nongnu] elpa/helm a047e69118 2/5: Update documentation
branch: elpa/helm commit a047e69118928a3b10e9eaacded99db21f65e8a2 Author: Thierry Volpiatto Commit: Thierry Volpiatto Update documentation --- helm-help.el | 9 + 1 file changed, 9 insertions(+) diff --git a/helm-help.el b/helm-help.el index 09678fef03..02c1426c5b 100644 --- a/helm-help.el +++ b/helm-help.el @@ -483,12 +483,21 @@ Use `xdg-open' to open files. *** Toggle auto-completion +Normally auto-completion in helm-find-files is disabled by +default but you can toggle it with `\\[helm-ff-run-toggle-auto-update]'. To enable it on startup by +default, customize `helm-ff-auto-update-initial-value'. + It is useful when trying to create a new file or directory and you don't want Helm to complete what you are writing. Note: On a terminal, the default binding `C-' may not work. In this case use `C-c '. +*** Show infos of files + +To have infos on files like size, permissions etc... hit `\\[helm-ff-properties-persistent]'. +To have automatically brief infos on selected file, turn on `helm-popup-tip-mode'. + *** You can create a new directory and a new file at the same time Simply write the path in the prompt and press `RET', e.g.
[nongnu] elpa/hyperdrive updated (58f15a0d5e -> 28d2960222)
elpasync pushed a change to branch elpa/hyperdrive. from 58f15a0d5e Meta: Add build status badge new 6dc3dc4963 Comment: (h/dir--invalidate-entry) Add NOTE about entry invalidation new 28d2960222 Change: (he/api) Always use :body-type 'binary Summary of changes: hyperdrive-dir.el | 9 - hyperdrive-lib.el | 12 +++- 2 files changed, 15 insertions(+), 6 deletions(-)
[nongnu] elpa/helm 52ed53b37d 3/5: Fix a possible error with helm-window in popup-info
branch: elpa/helm commit 52ed53b37d21f79da8171ac2bf07cb89e11cb4d2 Author: Thierry Volpiatto Commit: Thierry Volpiatto Fix a possible error with helm-window in popup-info --- helm-utils.el | 25 +++-- 1 file changed, 15 insertions(+), 10 deletions(-) diff --git a/helm-utils.el b/helm-utils.el index b116e1c3da..481c2978f4 100644 --- a/helm-utils.el +++ b/helm-utils.el @@ -1042,16 +1042,21 @@ Assume regexp is a pcre based regexp." (run-with-idle-timer 1 nil (lambda () - (save-selected-window - (with-helm-window - ;; Use helm-grep-fname prop instead of help-echo as help-echo - ;; maybe used by mouse overlay after resume. - (let ((pos (save-excursion (end-of-visual-line) (point - (helm-aif (and popup-info-fn -(funcall popup-info-fn (helm-get-selection))) - (helm-tooltip-show -(concat " " it) -pos))) + ;; We may have an error (wrong-type-argument window-live-p nil) + ;; when switching to help window, the error may occur in the + ;; small lap of time where the helm-window is deleted and the + ;; help buffer not already displayed. + (ignore-error wrong-type-argument + (save-selected-window + (with-helm-window + ;; Use helm-grep-fname prop instead of help-echo as help-echo + ;; maybe used by mouse overlay after resume. + (let ((pos (save-excursion (end-of-visual-line) (point + (helm-aif (and popup-info-fn + (funcall popup-info-fn (helm-get-selection))) + (helm-tooltip-show +(concat " " it) +pos ;;;###autoload (define-minor-mode helm-popup-tip-mode
[nongnu] elpa/helm updated (e0d028081f -> 15be79e5da)
elpasync pushed a change to branch elpa/helm. from e0d028081f Bump to 4.0 new 4da55b228c Delete trailing white spaces new a047e69118 Update documentation new 52ed53b37d Fix a possible error with helm-window in popup-info new 73d8d6f79c Run popup-info in helm-help-mode-after-hook new 15be79e5da Fix typo in docstring Summary of changes: .github/FUNDING.yml | 2 +- helm-help.el| 9 + helm-utils.el | 29 ++--- 3 files changed, 28 insertions(+), 12 deletions(-)
[nongnu] elpa/hyperdrive 28d2960222 2/2: Change: (he/api) Always use :body-type 'binary
branch: elpa/hyperdrive commit 28d296022252bf6ab7fdaf8e5a845e0f556c5f4a Author: Joseph Turner Commit: Joseph Turner Change: (he/api) Always use :body-type 'binary :body-type 'binary causes plz to pass the PUT request body to curl with --data-binary as opposed to --data. With --data, curl strips carriage returns and newlines from body content, but with --data-binary, body content is left as-is. This commit does not change any behavior since all PUT requests either already used :body-type 'binary or they had :body `(file FILENAME). --- hyperdrive-dir.el | 2 +- hyperdrive-lib.el | 12 +++- 2 files changed, 8 insertions(+), 6 deletions(-) diff --git a/hyperdrive-dir.el b/hyperdrive-dir.el index a023674bb2..f11458e722 100644 --- a/hyperdrive-dir.el +++ b/hyperdrive-dir.el @@ -390,7 +390,7 @@ see Info node `(elisp)Yanking Media'." (h//entry-directory-p h/current-entry))) (let ((entry (h/read-entry (h//context-hyperdrive :predicate #'h/writablep) :latest-version t))) - (he/api 'put entry :body image :body-type 'binary + (he/api 'put entry :body image ;; TODO: Pass MIME type in a header? hyper-gateway detects it for us. :then (lambda (_res) (h/open entry)) :else (lambda (plz-error) diff --git a/hyperdrive-lib.el b/hyperdrive-lib.el index d811f9492c..d57da517e7 100644 --- a/hyperdrive-lib.el +++ b/hyperdrive-lib.el @@ -210,13 +210,17 @@ to the gateway which do not involve an entry. Otherwise, use (defun he/api (method entry &rest rest) "Make hyperdrive API request by METHOD for ENTRY. REST is passed to `hyperdrive-api', which see. AS keyword should -be nil, because it is always set to `response'. Automatically -calls `hyperdrive-entry--api-then' to update metadata from the -response." +be nil, because it is always set to `response'. BODY-TYPE +keyword should be nil, because it is always set to `binary'. +Automatically calls `hyperdrive-entry--api-then' to update +metadata from the response." (declare (indent defun)) ;; Always use :as 'response (cl-assert (null (plist-get rest :as))) (setf (plist-get rest :as) 'response) + ;; Always use :body-type 'binary so curl leaves carriage returns and newlines. + (cl-assert (null (plist-get rest :body-type))) + (setf (plist-get rest :body-type) 'binary) (unless (map-elt rest :then) (setf (map-elt rest :then) 'sync)) (pcase-let* (((map :then) rest)) (unless (eq 'sync then) @@ -1020,8 +1024,6 @@ Call ELSE if request fails." THEN and ELSE are passed to `hyperdrive-entry-api', which see." (declare (indent defun)) (he/api 'put entry -;; TODO: Investigate whether we should use 'text body type for text buffers. -:body-type 'binary ;; TODO: plz accepts buffer as a body, we should refactor calls to h/write ;; to pass in a buffer instead of a buffer-string. :body body :then then :else else :queue queue))
[nongnu] elpa/hyperdrive 6dc3dc4963 1/2: Comment: (h/dir--invalidate-entry) Add NOTE about entry invalidation
branch: elpa/hyperdrive commit 6dc3dc496396646684bf469f724487a419f971a3 Author: Joseph Turner Commit: Joseph Turner Comment: (h/dir--invalidate-entry) Add NOTE about entry invalidation --- hyperdrive-dir.el | 7 +++ 1 file changed, 7 insertions(+) diff --git a/hyperdrive-dir.el b/hyperdrive-dir.el index ed46eed7f2..a023674bb2 100644 --- a/hyperdrive-dir.el +++ b/hyperdrive-dir.el @@ -95,6 +95,13 @@ Invalidated ewoc node entries will have these slots updated: + BLOCK-LENGTH-DOWNLOADED All other slots in each ewoc node entry data will be reused." + ;; NOTE: It might make sense to update MTIME and SIZE in addition to + ;; BLOCK-LENGTH-DOWNLOADED so that saving changes in an existing entry would + ;; appear to immediately refresh its parent directory. However, to be + ;; consistent, we'd want to also insert ewoc entries when saving entries new + ;; entries which don't yet exist. At that point, it might be better to simply + ;; refresh version-less parent directories each time an entry is saved. + ;; TODO: Invalidate nodes in all buffers showing entry at any version within ;; its version range (where the blob is the same between multiple versions). ;; We don't have the range end for ENTRY, so how can we figure out which
[nongnu] elpa/helm 15be79e5da 5/5: Fix typo in docstring
branch: elpa/helm commit 15be79e5da4732314984ccc0932f96a5a5c50ef7 Author: Thierry Volpiatto Commit: Thierry Volpiatto Fix typo in docstring --- helm-utils.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/helm-utils.el b/helm-utils.el index 2b00c75899..862516cd3b 100644 --- a/helm-utils.el +++ b/helm-utils.el @@ -1062,7 +1062,7 @@ Assume regexp is a pcre based regexp." (define-minor-mode helm-popup-tip-mode "Show additional informations in a popup tip at end of line. -When the mode is enabled, popup showup when the source the source +When the mode is enabled, popup showup when the source has a `popup-info' attribute which define a specific function for this source to fetch infos on candidate." :global t
[nongnu] elpa/helm-core updated (e0d028081f -> 15be79e5da)
elpasync pushed a change to branch elpa/helm-core. from e0d028081f Bump to 4.0 adds 4da55b228c Delete trailing white spaces adds a047e69118 Update documentation adds 52ed53b37d Fix a possible error with helm-window in popup-info adds 73d8d6f79c Run popup-info in helm-help-mode-after-hook adds 15be79e5da Fix typo in docstring No new revisions were added by this update. Summary of changes: .github/FUNDING.yml | 2 +- helm-help.el| 9 + helm-utils.el | 29 ++--- 3 files changed, 28 insertions(+), 12 deletions(-)
[elpa] externals/consult 0c3f53916e 3/3: Revert 3d0fc6a8c6a74b21ca854b8632b3f58e0e513b85
branch: externals/consult commit 0c3f53916ea0db0c472c0a0c620a85cc1b00caf2 Author: Daniel Mendler Commit: Daniel Mendler Revert 3d0fc6a8c6a74b21ca854b8632b3f58e0e513b85 --- consult.el | 7 +++ 1 file changed, 3 insertions(+), 4 deletions(-) diff --git a/consult.el b/consult.el index 699798cf91..e382893f7a 100644 --- a/consult.el +++ b/consult.el @@ -817,10 +817,9 @@ asked for the directories or files to search via (lambda () (setq-local completion-ignore-case ignore-case) (set-syntax-table minibuffer-local-filename-syntax)) -(mapcar #'substitute-in-file-name -(completing-read-multiple "Directories or files: " - #'completion-file-name-table - nil t def 'consult--path-history def) +(completing-read-multiple "Directories or files: " + #'completion-file-name-table + nil t def 'consult--path-history def ((and `(,p) (guard (file-directory-p p))) p) (ps (setq paths (mapcar (lambda (p) (file-relative-name (expand-file-name p)))
[elpa] externals/consult updated (027d1f624e -> 0c3f53916e)
elpasync pushed a change to branch externals/consult. from 027d1f624e README update new 1c561103a2 Partially revert 3d0fc6a8c6a74b21ca854b8632b3f58e0e513b85 new 28175efc73 Update changelog new 0c3f53916e Revert 3d0fc6a8c6a74b21ca854b8632b3f58e0e513b85 Summary of changes: CHANGELOG.org | 2 -- consult.el| 7 +++ 2 files changed, 3 insertions(+), 6 deletions(-)
[elpa] externals/consult 1c561103a2 1/3: Partially revert 3d0fc6a8c6a74b21ca854b8632b3f58e0e513b85
branch: externals/consult commit 1c561103a230417adc5ff6cbb360ad3a4fb43c79 Author: Daniel Mendler Commit: Daniel Mendler Partially revert 3d0fc6a8c6a74b21ca854b8632b3f58e0e513b85 The completion table `read-file-name-internal' cannot handle multiple paths (`completing-read-multiple') properly and throws errors. --- consult.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/consult.el b/consult.el index 07fe2dbfc3..699798cf91 100644 --- a/consult.el +++ b/consult.el @@ -819,7 +819,7 @@ asked for the directories or files to search via (set-syntax-table minibuffer-local-filename-syntax)) (mapcar #'substitute-in-file-name (completing-read-multiple "Directories or files: " - #'read-file-name-internal + #'completion-file-name-table nil t def 'consult--path-history def) ((and `(,p) (guard (file-directory-p p))) p) (ps (setq paths (mapcar (lambda (p)
[elpa] externals/consult 28175efc73 2/3: Update changelog
branch: externals/consult commit 28175efc735aa7761888e2dca5a66a458ed1638e Author: Daniel Mendler Commit: Daniel Mendler Update changelog --- CHANGELOG.org | 2 -- 1 file changed, 2 deletions(-) diff --git a/CHANGELOG.org b/CHANGELOG.org index 6e31ad7ac3..613bc69b32 100644 --- a/CHANGELOG.org +++ b/CHANGELOG.org @@ -6,8 +6,6 @@ - ~consult-grep~, ~consult-find~ and similar commands: Ask for project first, when invoked with double prefix argument ~C-u C-u~. -- ~consult-grep~, ~consult-find~ and similar commands: Support shadowed paths when - querying for search directory. * Version 1.8 (2024-07-25)
[elpa] externals/jinx 7d1b27f732 3/4: README wording
branch: externals/jinx commit 7d1b27f732c541d1dc78a4a5af49645f6ae44ea6 Author: Daniel Mendler Commit: Daniel Mendler README wording --- README.org | 8 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/README.org b/README.org index fb6e0f5f42..a11b310585 100644 --- a/README.org +++ b/README.org @@ -166,7 +166,7 @@ locations, e.g., =~/.aspell.LANG.pws= or =~/.config/enchant/LANG.dic=. It is possible to symlink different personal dictionaries such that they are shared by different spell checkers. See the [[https://rrthomas.github.io/enchant/lib/enchant.html][Enchant manual]] for details. -* Alternative spell-checking packages +* Alternatives There exist multiple alternative spell-checking packages for Emacs, most famously the builtin ispell.el and flyspell.el packages. The main advantages of @@ -174,9 +174,9 @@ Jinx are its automatic checking of the visible text, its sharp focus on performance and the ability to easily use multiple dictionaries at once. The following three alternative packages come closest to the behavior of Jinx. -- [[https://github.com/astoff/jit-spell][jit-spell]]: Jinx UI borrows ideas from Augusto Stoffel's Jit-spell. Jit-spell - uses the less efficient Ispell process communication instead of Jinx's calling - a native API. Since Jit-spell does not restrict spell checking to the visible +- [[https://github.com/astoff/jit-spell][jit-spell]]: Jinx borrows ideas from Augusto Stoffel's Jit-spell. Jit-spell uses + the less efficient Ispell process communication instead of Jinx's calling a + native API. Since Jit-spell does not restrict spell checking to the visible text only, it may enqueue the entire buffer too eagerly for checking. This happens when scrolling around or when stealth font locking is enabled. For this reason, Jit-spell affected load and latency in my tests ([[https://github.com/astoff/jit-spell/issues/9][issue on Github]]).
[elpa] externals/jinx fd81bb8ce3 1/4: Update links
branch: externals/jinx commit fd81bb8ce328c18c288878ba2e20b6e367e55cbd Author: Daniel Mendler Commit: Daniel Mendler Update links --- README.org | 12 ++-- jinx-mod.c | 2 +- jinx.el| 4 ++-- 3 files changed, 9 insertions(+), 9 deletions(-) diff --git a/README.org b/README.org index b4eb5c4c4a..614aff496d 100644 --- a/README.org +++ b/README.org @@ -24,11 +24,11 @@ intervention. Jinx can be used completely on its own, but can also safely co-exist with Emacs's built-in spell-checker Ispell. Jinx's high performance and low resource usage comes from directly calling the -widely-used API of the Enchant library (see [[https://abiword.github.io/enchant/][libenchant]]). Jinx automatically -compiles =jinx-mod.c= and loads the dynamic module at startup. By binding directly -to the native Enchant API, Jinx avoids the slower backend process communication -with Aspell. Enchant is widely used by other text editors and supports [[https://nuspell.github.io/][Nuspell]], -[[http://hunspell.github.io/][Hunspell]], [[http://aspell.net/][Aspell]] and a few language-specific backends. +widely-used API of the [[https://rrthomas.github.io/enchant/][Enchant library]]. Jinx automatically compiles =jinx-mod.c= +and loads the dynamic module at startup. By binding directly to the native +Enchant API, Jinx avoids the slower backend process communication with Aspell. +Enchant is widely used by other text editors and supports [[https://nuspell.github.io/][Nuspell]], [[http://hunspell.github.io/][Hunspell]], +[[http://aspell.net/][Aspell]] and a few language-specific backends. Jinx supports spell-checking multiple languages in the same buffer. See the =jinx-languages= variable to customize for multiple languages. Jinx can flexibly @@ -164,7 +164,7 @@ system spell-checker. Depending on the backend the personal dictionary will be taken from different locations, e.g., =~/.aspell.LANG.pws= or =~/.config/enchant/LANG.dic=. It is possible to symlink different personal dictionaries such that they are shared by -different spell checkers. See the [[https://abiword.github.io/enchant/lib/enchant.html][Enchant manual]] for details. +different spell checkers. See the [[https://rrthomas.github.io/enchant/lib/enchant.html][Enchant manual]] for details. * Alternative spell-checking packages diff --git a/jinx-mod.c b/jinx-mod.c index 4c1c42f624..9af48eb869 100644 --- a/jinx-mod.c +++ b/jinx-mod.c @@ -149,7 +149,7 @@ static emacs_value jinx_wordchars(emacs_env* env, ptrdiff_t jinx_unused(nargs), EnchantDict* dict = env->get_user_ptr(env, args[0]); if (dict) { // Enchant older than 2.3.1 sometimes does not return UTF-8 -// See https://github.com/AbiWord/enchant/blob/master/NEWS +// See https://github.com/rrthomas/enchant/blob/master/NEWS emacs_value str = jinx_str(env, enchant_dict_get_extra_word_characters(dict)); if (env->non_local_exit_check(env) == emacs_funcall_exit_return) return str; diff --git a/jinx.el b/jinx.el index f44192d69e..c260a70e60 100644 --- a/jinx.el +++ b/jinx.el @@ -41,8 +41,8 @@ ;; also safely co-exist with Emacs's built-in spell-checker Ispell. ;; Jinx's high performance and low resource usage comes from directly -;; calling the widely-used API of the Enchant library (see -;; https://abiword.github.io/enchant/). Jinx automatically compiles +;; calling the widely-used API of the Enchant library, see +;; https://rrthomas.github.io/enchant/. Jinx automatically compiles ;; jinx-mod.c and loads the dynamic module at startup. By binding ;; directly to the native Enchant API, Jinx avoids the slower backend ;; process communication with Aspell.
[elpa] externals/jinx cd827ee199 4/4: README wording
branch: externals/jinx commit cd827ee199efedc8f5e094001d90206e698f91e8 Author: Daniel Mendler Commit: Daniel Mendler README wording --- README.org | 5 ++--- 1 file changed, 2 insertions(+), 3 deletions(-) diff --git a/README.org b/README.org index a11b310585..f998965e5a 100644 --- a/README.org +++ b/README.org @@ -156,10 +156,9 @@ Enchant uses different backends for different languages. The backends are ordered as specified in the personal configuration file =~/.config/enchant/enchant.ordering= and the system-wide configuration file =/usr/share/enchant-2/enchant.ordering=. Enchant uses Hunspell as default backend -for most languages. There are a few exceptions. For English Enchant prefers +for most languages barring a few exceptions. For English Enchant prefers Aspell and for Finnish and Turkish special backends called Voikko and Zemberek -are used. On some operating systems Enchant may also integrate with the -system spell-checker. +are used. Depending on the backend the personal dictionary will be taken from different locations, e.g., =~/.aspell.LANG.pws= or =~/.config/enchant/LANG.dic=. It is
[elpa] externals/jinx updated (4c89699db3 -> cd827ee199)
elpasync pushed a change to branch externals/jinx. from 4c89699db3 Bump version new fd81bb8ce3 Update links new 46908903a2 README wording new 7d1b27f732 README wording new cd827ee199 README wording Summary of changes: README.org | 29 ++--- jinx-mod.c | 2 +- jinx.el| 4 ++-- 3 files changed, 17 insertions(+), 18 deletions(-)
[elpa] externals/jinx 46908903a2 2/4: README wording
branch: externals/jinx commit 46908903a2ee7af457abc5e1803b765708da1bd0 Author: Daniel Mendler Commit: Daniel Mendler README wording --- README.org | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/README.org b/README.org index 614aff496d..fb6e0f5f42 100644 --- a/README.org +++ b/README.org @@ -45,8 +45,8 @@ Ruby or Rust are listed in =jinx-camel-modes=. For these modes composite words i Jinx can be installed from GNU ELPA or MELPA directly with =package-install=. Jinx requires =libenchant=. Enchant library is a required dependency for Jinx to -compile its module at install time. If =pkgconf= or =pkg-config= is available when -installing Jinx, Jinx will use it to locate =libenchant=. Depending on your BSD or +compile its module at install time. If =pkgconf= or =pkg-config= is available, Jinx +will use it to locate =libenchant= during installation. Depending on your BSD or Linux distribution you have to install different packages: - Debian, Ubuntu: =libenchant-2-dev=, =pkgconf=
[nongnu] elpa/projectile 8cc2ee8937 2/2: Add support for xmake build utility (#1899)
branch: elpa/projectile commit 8cc2ee8937b89f1639304cbd2526e85b17135372 Author: Ben Hutchinson <38333275+hutchy...@users.noreply.github.com> Commit: GitHub Add support for xmake build utility (#1899) --- CHANGELOG.md | 1 + doc/modules/ROOT/pages/projects.adoc | 3 +++ projectile.el| 6 ++ 3 files changed, 10 insertions(+) diff --git a/CHANGELOG.md b/CHANGELOG.md index 5d573bc915..5b6b666961 100644 --- a/CHANGELOG.md +++ b/CHANGELOG.md @@ -11,6 +11,7 @@ * [#1877](https://github.com/bbatsov/projectile/pull/1877): Add custom variable `projectile-cmd-hist-ignoredups`. * Add support for Eask projects. * [#1892](https://github.com/bbatsov/projectile/pull/1892): Add category metadata to `completing-read`. (it's used by packages like `marginalia` and `embark`) +* [#1899](https://github.com/bbatsov/projectile/pull/1899): Add support for xmake build utility. * [#1895](https://github.com/bbatsov/projectile/pull/1895): Modify projectile-mode to add a hook to `buffer-list-update-hook` such that any change in the buffer list will update the selected project. ### Bugs fixed diff --git a/doc/modules/ROOT/pages/projects.adoc b/doc/modules/ROOT/pages/projects.adoc index e974560c47..ff96ca4c79 100644 --- a/doc/modules/ROOT/pages/projects.adoc +++ b/doc/modules/ROOT/pages/projects.adoc @@ -140,6 +140,9 @@ are the configuration files of various build tools. Out of the box the following | debian/control | Debian package dpkg control file + +| xmake.lua +| xmake project |=== There's also Projectile's own `.projectile` which serves both as a project marker diff --git a/projectile.el b/projectile.el index 31a970d3fa..83bfe895f0 100644 --- a/projectile.el +++ b/projectile.el @@ -3287,6 +3287,12 @@ a manual COMMAND-TYPE command is created with ;; File-based detection project types ;; Universal +(projectile-register-project-type 'xmake '("xmake.lua") + :project-file "xmake.lua" + :compile "xmake build" + :test "xmake test" + :run "xmake run" + :install "xmake install") (projectile-register-project-type 'scons '("SConstruct") :project-file "SConstruct" :compile "scons"
[nongnu] elpa/projectile 3c92d28c05 1/2: Add #'projectile-track-known-projects-find-file-hook to 'buffer-list-update-hook
branch: elpa/projectile commit 3c92d28c056c3553f83a513a35502b4547d29319 Author: Jules Tamagnan Commit: Bozhidar Batsov Add #'projectile-track-known-projects-find-file-hook to 'buffer-list-update-hook --- CHANGELOG.md| 1 + projectile.el | 16 +--- test/projectile-test.el | 34 ++ 3 files changed, 48 insertions(+), 3 deletions(-) diff --git a/CHANGELOG.md b/CHANGELOG.md index de67a8ab5e..5d573bc915 100644 --- a/CHANGELOG.md +++ b/CHANGELOG.md @@ -11,6 +11,7 @@ * [#1877](https://github.com/bbatsov/projectile/pull/1877): Add custom variable `projectile-cmd-hist-ignoredups`. * Add support for Eask projects. * [#1892](https://github.com/bbatsov/projectile/pull/1892): Add category metadata to `completing-read`. (it's used by packages like `marginalia` and `embark`) +* [#1895](https://github.com/bbatsov/projectile/pull/1895): Modify projectile-mode to add a hook to `buffer-list-update-hook` such that any change in the buffer list will update the selected project. ### Bugs fixed diff --git a/projectile.el b/projectile.el index f581fc6c55..31a970d3fa 100644 --- a/projectile.el +++ b/projectile.el @@ -6284,14 +6284,24 @@ Otherwise behave as if called interactively. (projectile-discover-projects-in-search-path)) (add-hook 'project-find-functions #'project-projectile) (add-hook 'find-file-hook 'projectile-find-file-hook-function) -(add-hook 'projectile-find-dir-hook #'projectile-track-known-projects-find-file-hook t) -(add-hook 'dired-before-readin-hook #'projectile-track-known-projects-find-file-hook t t) +;; Add hooks to track which buffer is currently active. +;; Note - In Emacs 28.1 `buffer-list-update-hook' was modified to no +;; longer run on temporary buffers, this allows us to use it to track +;; changes to the active buffer instead of relying on more specific hooks +;; such as `dired-before-readin-hook'. +(if (version<= "28.1" emacs-version) +(add-hook 'buffer-list-update-hook #'projectile-track-known-projects-find-file-hook t) + (add-hook 'projectile-find-dir-hook #'projectile-track-known-projects-find-file-hook t) + (add-hook 'dired-before-readin-hook #'projectile-track-known-projects-find-file-hook t t)) + (advice-add 'compilation-find-file :around #'compilation-find-file-projectile-find-compilation-buffer) (advice-add 'delete-file :before #'delete-file-projectile-remove-from-cache)) (t (remove-hook 'project-find-functions #'project-projectile) (remove-hook 'find-file-hook #'projectile-find-file-hook-function) -(remove-hook 'dired-before-readin-hook #'projectile-track-known-projects-find-file-hook t) +(if (version<= "28.1" emacs-version) +(remove-hook 'buffer-list-update-hook #'projectile-track-known-projects-find-file-hook) + (remove-hook 'dired-before-readin-hook #'projectile-track-known-projects-find-file-hook t)) (advice-remove 'compilation-find-file #'compilation-find-file-projectile-find-compilation-buffer) (advice-remove 'delete-file #'delete-file-projectile-remove-from-cache diff --git a/test/projectile-test.el b/test/projectile-test.el index 1ae331d604..c108413565 100644 --- a/test/projectile-test.el +++ b/test/projectile-test.el @@ -1957,6 +1957,40 @@ projectile-process-current-project-buffers-current to have similar behaviour" (with-current-buffer (find-file-noselect "foo" t)) (expect (length (projectile-project-buffers)) :to-equal 1) +(describe "projectile-mode buffer-list-update-hook" + (it "check that the hooks properly update the known projects when changing files or windows" + (projectile-test-with-sandbox + (projectile-test-with-files +("project1/" + "project1/.projectile" + "project1/foo" + "project2/" + "project2/.projectile" + "project2/bar") +(find-file "project1/") +(projectile-mode 1) + +;; Check that opening a file leads to the known-projects being updated +(find-file "project1/foo") +(expect (mapcar (lambda (x) (file-name-base (directory-file-name x))) projectile-known-projects) +:to-equal '("project1")) + +;; Check that opening a file in a different project leads to the known-projects being updated +(find-file-other-window "../../project2/bar") +(expect (mapcar (lambda (x) (file-name-base (directory-file-name x))) projectile-known-projects) +:to-equal '("project2" "project1")) + +;; Check that selecting a different buffer also updates the known-projects +(other-window 1) +(expect (mapcar (lambda (x) (file-name-base (directory-file-name x))) projectile-known
[nongnu] elpa/projectile updated (01fb6a5ef0 -> 8cc2ee8937)
elpasync pushed a change to branch elpa/projectile. from 01fb6a5ef0 Touch up the previous commit new 3c92d28c05 Add #'projectile-track-known-projects-find-file-hook to 'buffer-list-update-hook new 8cc2ee8937 Add support for xmake build utility (#1899) Summary of changes: CHANGELOG.md | 2 ++ doc/modules/ROOT/pages/projects.adoc | 3 +++ projectile.el| 22 +++--- test/projectile-test.el | 34 ++ 4 files changed, 58 insertions(+), 3 deletions(-)
[elpa] branch new-version created (now 73b99396c3)
ahyatt pushed a change to branch new-version. at 73b99396c3 Change version to 0.17.2 This branch includes the following new commits: new 73b99396c3 Change version to 0.17.2
[elpa] new-version 73b99396c3: Change version to 0.17.2
branch: new-version commit 73b99396c3e6f08d82d0e751203a7ebd364f9559 Author: Andrew Hyatt Commit: Andrew Hyatt Change version to 0.17.2 --- NEWS.org | 2 +- llm.el | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/NEWS.org b/NEWS.org index 274523e8b2..6f99293a00 100644 --- a/NEWS.org +++ b/NEWS.org @@ -4,7 +4,7 @@ - Fix Claude function calling conversations - Fix issue in Open AI streaming function calling. - Update Open AI and Claude default chat models to the later models. - Version 0.17.1 +* Version 0.17.1 - Support Ollama function calling, for models which support it. - Make sure every model, even unknown models, return some value for ~llm-chat-token-limit~. - Add token count for llama3.1 model. diff --git a/llm.el b/llm.el index 86a5e0dfd9..5f5c1a3799 100644 --- a/llm.el +++ b/llm.el @@ -5,7 +5,7 @@ ;; Author: Andrew Hyatt ;; Homepage: https://github.com/ahyatt/llm ;; Package-Requires: ((emacs "28.1") (plz "0.8")) -;; Package-Version: 0.17.1 +;; Package-Version: 0.17.2 ;; SPDX-License-Identifier: GPL-3.0-or-later ;; ;; This program is free software; you can redistribute it and/or
[elpa] branch new-version deleted (was 73b99396c3)
ahyatt pushed a change to branch new-version. was 73b99396c3 Change version to 0.17.2 This change permanently discards the following revisions: discards 73b99396c3 Change version to 0.17.2
[elpa] externals/hyperbole aa34cc4341: Control abbreviation of backtrace (#580)
branch: externals/hyperbole commit aa34cc43418dc52ef4eaf9f694f69cab71ee00f0 Author: Mats Lidell Commit: GitHub Control abbreviation of backtrace (#580) Change settings of backtrace vars to get a full backtrace when "FULL_BT=" is set on the make command line. --- ChangeLog | 4 Makefile | 8 2 files changed, 8 insertions(+), 4 deletions(-) diff --git a/ChangeLog b/ChangeLog index c4125fac00..83d94cf943 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,3 +1,7 @@ +2024-08-24 Mats Lidell + +* Makefile (HYPB_ERT_BATCH_BT): Control abbreviation of backtrace. + 2024-08-24 Bob Weiner * hpath.el (hpath:to-Info-ref): Add. diff --git a/Makefile b/Makefile index 1246a05bb6..2dcac9dcfb 100644 --- a/Makefile +++ b/Makefile @@ -3,7 +3,7 @@ # Author: Bob Weiner # # Orig-Date:15-Jun-94 at 03:42:38 -# Last-Mod: 15-Aug-24 at 00:32:27 by Bob Weiner +# Last-Mod: 24-Aug-24 at 10:41:04 by Mats Lidell # # Copyright (C) 1994-2023 Free Software Foundation, Inc. # See the file HY-COPY for license information. @@ -512,9 +512,9 @@ endif # For full backtrace run make test FULL_BT= ifeq ($(origin FULL_BT), command line) -HYPB_ERT_BATCH_BT = (ert-batch-backtrace-line-length nil) +HYPB_ERT_BATCH_BT = (ert-batch-backtrace-line-length t) (backtrace-line-length nil) else -HYPB_ERT_BATCH_BT = (ert-batch-backtrace-line-length 256) +HYPB_ERT_BATCH_BT = (ert-batch-backtrace-line-length 256) (backtrace-line-length 5000) endif # Run non-interactive tests in batch mode @@ -522,7 +522,7 @@ test-ert: @echo "# Tests: $(TEST_ERT_FILES)" $(EMACS_BATCH) --eval "(load-file \"test/hy-test-dependencies.el\")" \ --eval "(let ((auto-save-default) (ert-batch-print-level 10) \ - (ert-batch-print-length nil) (backtrace-line-length 5000) \ + (ert-batch-print-length nil) \ $(HYPB_ERT_BATCH_BT) (ert-batch-backtrace-right-margin 2048)) \ $(LOAD_TEST_ERT_FILES) $(HYPB_ERT_BATCH))"
[elpa] externals/llm dc98688271: Change version to 0.17.2 (#69)
branch: externals/llm commit dc98688271afa11e1645744240573592b9d8c38a Author: Andrew Hyatt Commit: GitHub Change version to 0.17.2 (#69) --- NEWS.org | 2 +- llm.el | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/NEWS.org b/NEWS.org index 274523e8b2..6f99293a00 100644 --- a/NEWS.org +++ b/NEWS.org @@ -4,7 +4,7 @@ - Fix Claude function calling conversations - Fix issue in Open AI streaming function calling. - Update Open AI and Claude default chat models to the later models. - Version 0.17.1 +* Version 0.17.1 - Support Ollama function calling, for models which support it. - Make sure every model, even unknown models, return some value for ~llm-chat-token-limit~. - Add token count for llama3.1 model. diff --git a/llm.el b/llm.el index 86a5e0dfd9..5f5c1a3799 100644 --- a/llm.el +++ b/llm.el @@ -5,7 +5,7 @@ ;; Author: Andrew Hyatt ;; Homepage: https://github.com/ahyatt/llm ;; Package-Requires: ((emacs "28.1") (plz "0.8")) -;; Package-Version: 0.17.1 +;; Package-Version: 0.17.2 ;; SPDX-License-Identifier: GPL-3.0-or-later ;; ;; This program is free software; you can redistribute it and/or
[elpa] externals/auctex 8c3c7a611c 1/2: * NEWS.org (Removed): Document last change about `unload-feature'.
branch: externals/auctex commit 8c3c7a611c042df01b49a3a8b7ae60a32eae19bc Author: Arash Esbati Commit: Arash Esbati * NEWS.org (Removed): Document last change about `unload-feature'. --- NEWS.org | 8 1 file changed, 8 insertions(+) diff --git a/NEWS.org b/NEWS.org index 4391b8b524..d904a66fa9 100644 --- a/NEWS.org +++ b/NEWS.org @@ -36,6 +36,14 @@ For users who tracked the master branch: Do =git switch main= to switch to the main branch where development takes place nowadays. +** Removed + +- Remove the possibility to disable the side-wide installation with: + #+begin_src emacs-lisp +(unload-feature 'tex-site) + #+end_src + Using this form when installed from ELPA will throw an error. + * [14.0.6] - 2024-06-30 ** Added
[elpa] externals/auctex ef1961483c 2/2: NEWS.org: Add LINK for ELPA.
branch: externals/auctex commit ef1961483cbdd7ee6d1ccc1e1933f3fd22d50a99 Author: Arash Esbati Commit: Arash Esbati NEWS.org: Add LINK for ELPA. --- NEWS.org | 10 ++ 1 file changed, 6 insertions(+), 4 deletions(-) diff --git a/NEWS.org b/NEWS.org index d904a66fa9..c06c186aff 100644 --- a/NEWS.org +++ b/NEWS.org @@ -2,6 +2,7 @@ #+AUTHOR: AUCTeX Maintenance Team #+LANGUAGE: en #+OPTIONS: num:nil toc:nil +#+LINK: ELPA https://elpa.gnu.org/packages/%s # Copyright (C) 2024 Free Software Foundation, Inc. # License: GNU General Public License 3 # The format is based on [[https://keepachangelog.com/en/1.1.0/][Keep a Changelog]] @@ -23,8 +24,8 @@ - AUCTeX 13.3 marks the last standalone tarball release. From now on, AUCTeX releases are made available through the - [[https://elpa.gnu.org/packages/auctex.html][Emacs Lisp Package - Archive (ELPA)]]. Distro packagers are encouraged to use the ELPA + [[ELPA:auctex.html][Emacs Lisp Package Archive (ELPA)]]. Distro + packagers are encouraged to use the [[ELPA:auctex.html][ELPA]] packages as-is and install them under one of the new Emacs locations for system-wide packages, see ~package-directory-list~. @@ -42,7 +43,8 @@ #+begin_src emacs-lisp (unload-feature 'tex-site) #+end_src - Using this form when installed from ELPA will throw an error. + Using this form when installed from [[ELPA:auctex.html][ELPA]] will + throw an error. * [14.0.6] - 2024-06-30 @@ -164,7 +166,7 @@ ** Fixed -- Fix ELPA releases. +- Fix [[ELPA:auctex.html][ELPA]] releases. * [14.0.1] - 2024-02-08
[elpa] externals/auctex updated (c77c97ab6b -> ef1961483c)
elpasync pushed a change to branch externals/auctex. from c77c97ab6b Add supplementary explanation to documentation new 8c3c7a611c * NEWS.org (Removed): Document last change about `unload-feature'. new ef1961483c NEWS.org: Add LINK for ELPA. Summary of changes: NEWS.org | 16 +--- 1 file changed, 13 insertions(+), 3 deletions(-)
[elpa] externals/hyperbole a7527d1d30 2/2: Remove useless @indent in texi (#582)
branch: externals/hyperbole commit a7527d1d30ce275b0c453f8220309db867e30901 Author: Mats Lidell Commit: GitHub Remove useless @indent in texi (#582) --- ChangeLog | 2 ++ man/hyperbole.texi | 6 +- 2 files changed, 3 insertions(+), 5 deletions(-) diff --git a/ChangeLog b/ChangeLog index 83d94cf943..364722c1ed 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,5 +1,7 @@ 2024-08-24 Mats Lidell +* man/hyperbole.texi: Remove not useful @indent. + * Makefile (HYPB_ERT_BATCH_BT): Control abbreviation of backtrace. 2024-08-24 Bob Weiner diff --git a/man/hyperbole.texi b/man/hyperbole.texi index 1cd2b9db86..37d8b8b34c 100644 --- a/man/hyperbole.texi +++ b/man/hyperbole.texi @@ -7,7 +7,7 @@ @c Author: Bob Weiner @c @c Orig-Date: 6-Nov-91 at 11:18:03 -@c Last-Mod: 6-Jul-24 at 00:42:11 by Bob Weiner +@c Last-Mod: 24-Aug-24 at 11:56:43 by Mats Lidell @c %**start of header (This is for running Texinfo on a region.) @setfilename hyperbole.info @@ -4512,19 +4512,15 @@ loading Hyperbole's HyWiki code. @vindex hywiki-org-publishing-directory @cindex HyWiki publishing directory HyWiki html files are saved in: -@indent @code{(hywiki-org-get-publish-property :publishing-directory)} Customize this directory with: -@indent @bkbd{M-x customize-variable @key{RET} hywiki-org-publishing-directory @key{RET}} @vindex hywiki-org-publishing-function @cindex HyWiki publishing function HyWiki html files are generated by the function given by: -@indent @code{(hywiki-org-get-publish-property :publishing-function)} Customize the value of this function if necessary with: -@indent @bkbd{M-x customize-variable @key{RET} hywiki-org-publishing-function @key{RET}} @node HyWiki Menu, , Publish HyWiki, HyWiki
[elpa] externals/hyperbole updated (aa34cc4341 -> a7527d1d30)
elpasync pushed a change to branch externals/hyperbole. from aa34cc4341 Control abbreviation of backtrace (#580) new 1f5448bc38 correcting recent warnings (#581) new a7527d1d30 Remove useless @indent in texi (#582) Summary of changes: ChangeLog | 2 ++ hbut.el| 4 ++-- hibtypes.el| 4 ++-- hywiki.el | 6 +++--- man/hyperbole.texi | 6 +- 5 files changed, 10 insertions(+), 12 deletions(-)
[elpa] externals/hyperbole 1f5448bc38 1/2: correcting recent warnings (#581)
branch: externals/hyperbole commit 1f5448bc38523aee040783aa960f6c17827eeaf7 Author: Mats Lidell Commit: GitHub correcting recent warnings (#581) * end-delim is not used and not needed since it is nil * hywiki-word-at is undefined var, should be a function call * Bad quote in docstring * Shorten too long docstring --- hbut.el | 4 ++-- hibtypes.el | 4 ++-- hywiki.el | 6 +++--- 3 files changed, 7 insertions(+), 7 deletions(-) diff --git a/hbut.el b/hbut.el index 7f342f87ff..18b789dbe4 100644 --- a/hbut.el +++ b/hbut.el @@ -3,7 +3,7 @@ ;; Author: Bob Weiner ;; ;; Orig-Date:18-Sep-91 at 02:57:09 -;; Last-Mod: 23-Aug-24 at 21:38:08 by Bob Weiner +;; Last-Mod: 24-Aug-24 at 11:40:56 by Mats Lidell ;; ;; SPDX-License-Identifier: GPL-3.0-or-later ;; @@ -1565,7 +1565,7 @@ include delimiters when INCLUDE-DELIMS is non-nil)." (error "(hbut:map-type): `start-delim' must be a string, not '%s'" start-delim)) (unless end-delim -(error "(hbut:map-type): `end-delim' must be non-nil" end-delim)) +(error "(hbut:map-type): `end-delim' must be non-nil")) (let* ((match-to-start-delim (when end-delim (symbolp end-delim))) (end-char (unless match-to-start-delim diff --git a/hibtypes.el b/hibtypes.el index 31058a1619..3377d72c12 100644 --- a/hibtypes.el +++ b/hibtypes.el @@ -3,7 +3,7 @@ ;; Author: Bob Weiner ;; ;; Orig-Date:19-Sep-91 at 20:45:31 -;; Last-Mod: 23-Aug-24 at 21:32:09 by Mats Lidell +;; Last-Mod: 24-Aug-24 at 11:32:31 by Mats Lidell ;; ;; SPDX-License-Identifier: GPL-3.0-or-later ;; @@ -1669,7 +1669,7 @@ If a boolean function or variable, display its value." ;;; (defib hywiki-existing-word () - "When on a HyWiki word with an existing page, display its page and optional section." + "On a HyWiki word with an existing page, display its page and optional section." (cl-destructuring-bind (page-name start end) (hywiki-page-exists-p 'range) (when page-name diff --git a/hywiki.el b/hywiki.el index 1d58c2ed91..9c322df851 100644 --- a/hywiki.el +++ b/hywiki.el @@ -3,7 +3,7 @@ ;; Author: Bob Weiner ;; ;; Orig-Date:21-Apr-24 at 22:41:13 -;; Last-Mod: 18-Aug-24 at 18:02:28 by Bob Weiner +;; Last-Mod: 24-Aug-24 at 11:36:20 by Mats Lidell ;; ;; SPDX-License-Identifier: GPL-3.0-or-later ;; @@ -669,7 +669,7 @@ If found, return the full path of the page. If not on a wiki word and optional prefix ARG is null, emulate an Action Key press; with a prefix ARG, emulate an Assist Key press." (interactive "P") - (let ((word hywiki-word-at)) + (let ((word (hywiki-word-at))) (if word (hywiki-find-page word) (hkey-either arg @@ -1297,7 +1297,7 @@ variables." Word may be of form: HyWikiWord#section with an optional #section. If no such page exists, return nil. -If WORD is the symbol, 'range, rather than a string, and there is a +If WORD is the symbol, \\='range, rather than a string, and there is a HyWikiWord at point with an existing page, then return the tuple of values: (word word-start word-end).