[elpa] externals/corfu 7b6cdc1: README: Update caveats

[Protesilaos Stavrou]

branch: externals/corfu
commit 7b6cdc1a971f77ff0166231e8af2c25661d416d6
Author: Daniel Mendler 
Commit: Daniel Mendler 

README: Update caveats
---
 README.org | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/README.org b/README.org
index 1500ff3..e48f7d3 100644
--- a/README.org
+++ b/README.org
@@ -136,9 +136,10 @@ counterpart of Corfu.
 
 * Caveats
 
-This package is experimental and new. There are a few known technical caveats.
+Corfu works in most scenarios. However there are a few known technical caveats.
 
-- Corfu falls back to the default `completion-in-region-function' on
+- No support for idle completions.
+- Corfu falls back to the default ~completion-in-region-function~ on
   non-graphical displays, since is displayed using child frames.
 - The abort handling could be improved, for example the input could be undone.
 - The ~completion-in-region-mode-predicate~ is ignored in order to

[elpa] externals/vertico updated (1049ae1 -> e6a74f8)

[Protesilaos Stavrou]

protesilaos pushed a change to branch externals/vertico.

  from  1049ae1   Improve orderless support
   new  dfc9c06   vertico--resize-window: Do not grow when height=0
   new  e6a74f8   vertico--recompute-candidates: Determine length after 
candidate processing


Summary of changes:
 vertico.el | 9 +
 1 file changed, 5 insertions(+), 4 deletions(-)

[elpa] externals/vertico dfc9c06 1/2: vertico--resize-window: Do not grow when height=0

[Protesilaos Stavrou]

branch: externals/vertico
commit dfc9c06ef816b28983c587faf854c4316e3a90f6
Author: Daniel Mendler 
Commit: Daniel Mendler 

vertico--resize-window: Do not grow when height=0
---
 vertico.el | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/vertico.el b/vertico.el
index 597b062..e02983a 100644
--- a/vertico.el
+++ b/vertico.el
@@ -397,7 +397,9 @@
(dp (- (max (cdr (window-text-pixel-size))
(* (default-line-height) (1+ (if resize height 
vertico-count
   (window-pixel-height
-  (when (or (> dp 0) (eq resize t)) (window-resize nil dp nil nil 
'pixelwise)
+  (when (and (or (/= height 0) (< dp 0))
+ (or (> dp 0) (eq resize t)))
+(window-resize nil dp nil nil 'pixelwise)
 
 (defun vertico--display-count ()
   "Update count overlay `vertico--count-ov'."

[elpa] externals/vertico e6a74f8 2/2: vertico--recompute-candidates: Determine length after candidate processing

[Protesilaos Stavrou]

branch: externals/vertico
commit e6a74f84e86f3f5f1e1034f9f817a7c1fe59287f
Author: Daniel Mendler 
Commit: Daniel Mendler 

vertico--recompute-candidates: Determine length after candidate processing
---
 vertico.el | 5 ++---
 1 file changed, 2 insertions(+), 3 deletions(-)

diff --git a/vertico.el b/vertico.el
index e02983a..1da1f08 100644
--- a/vertico.el
+++ b/vertico.el
@@ -266,8 +266,7 @@
pt metadata))
  (all (car all-hl))
  (base (or (when-let (z (last all)) (prog1 (cdr z) (setcdr z nil))) 0))
- (def (or (car-safe minibuffer-default) minibuffer-default))
- (total (length all)))
+ (def (or (car-safe minibuffer-default) minibuffer-default)))
 (setq all (if-let (sort (completion-metadata-get metadata 
'display-sort-function))
   (funcall sort all)
 (vertico--sort (substring content 0 base) all)))
@@ -279,7 +278,7 @@
 (setq all (vertico--move-to-front field all))
 (when-let (title-fun (completion-metadata-get metadata 'x-title-function))
   (setq all (vertico--group-by title-fun all)))
-(list base total all (cdr all-hl
+(list base (length all) all (cdr all-hl
 
 (defun vertico--group-by (fun elems)
   "Group ELEMS by FUN."

[elpa] externals/org updated (981f250 -> 9a72074)

[ELPA Syncer]

elpasync pushed a change to branch externals/org.

  from  981f250   ox-md: Use TeX-style $ math wrapping
   new  6107c2b   Revert "agenda: Fix "org-duration-to-minutes: Invalid 
duration format" error"
   new  9a72074   Merge branch 'maint'


Summary of changes:
 lisp/org-agenda.el | 9 -
 1 file changed, 4 insertions(+), 5 deletions(-)

[elpa] externals/org 9a72074: Merge branch 'maint'

[ELPA Syncer]

branch: externals/org
commit 9a7207404cc68be413acfe8f7d60dd1280bb1d16
Merge: 981f250 6107c2b
Author: Nicolas Goaziou 
Commit: Nicolas Goaziou 

Merge branch 'maint'
---
 lisp/org-agenda.el | 9 -
 1 file changed, 4 insertions(+), 5 deletions(-)

diff --git a/lisp/org-agenda.el b/lisp/org-agenda.el
index 3477fba..85e2010 100644
--- a/lisp/org-agenda.el
+++ b/lisp/org-agenda.el
@@ -6739,6 +6739,9 @@ Any match of REMOVE-RE will be removed from TXT."
   (= (match-beginning 0) 0)
 t))
  (setq txt (replace-match "" nil nil txt
+ ;; Normalize the time(s) to 24 hour
+ (when s1 (setq s1 (org-get-time-of-day s1 'string t)))
+ (when s2 (setq s2 (org-get-time-of-day s2 'string t)))
 
  ;; Try to set s2 if s1 and
  ;; `org-agenda-default-appointment-duration' are set
@@ -6752,11 +6755,7 @@ Any match of REMOVE-RE will be removed from TXT."
  ;; Compute the duration
  (when s2
(setq duration (- (org-duration-to-minutes s2)
- (org-duration-to-minutes s1
-
-  ;; Normalize the time(s) to 24 hour
- (when s1 (setq s1 (org-get-time-of-day s1 'string t)))
- (when s2 (setq s2 (org-get-time-of-day s2 'string t
+ (org-duration-to-minutes s1)
 
(when (string-match org-tag-group-re txt)
  ;; Tags are in the string

[elpa] externals-release/org 6107c2b: Revert "agenda: Fix "org-duration-to-minutes: Invalid duration format" error"

[ELPA Syncer]

branch: externals-release/org
commit 6107c2b15bf19ab5300c2861db365a3dc310adc6
Author: Nicolas Goaziou 
Commit: Nicolas Goaziou 

Revert "agenda: Fix "org-duration-to-minutes: Invalid duration format" 
error"

This reverts commit bc857bfc62ba94e04fb338bfb35f4b612c114d0c.

The "fix" breaks elsewhere, as reported below.

Reported-by: Daniel Ortmann 

---
 lisp/org-agenda.el | 9 -
 1 file changed, 4 insertions(+), 5 deletions(-)

diff --git a/lisp/org-agenda.el b/lisp/org-agenda.el
index f215b55..b91bf3a 100644
--- a/lisp/org-agenda.el
+++ b/lisp/org-agenda.el
@@ -6656,6 +6656,9 @@ Any match of REMOVE-RE will be removed from TXT."
   (= (match-beginning 0) 0)
 t))
  (setq txt (replace-match "" nil nil txt
+ ;; Normalize the time(s) to 24 hour
+ (when s1 (setq s1 (org-get-time-of-day s1 'string t)))
+ (when s2 (setq s2 (org-get-time-of-day s2 'string t)))
 
  ;; Try to set s2 if s1 and
  ;; `org-agenda-default-appointment-duration' are set
@@ -6669,11 +6672,7 @@ Any match of REMOVE-RE will be removed from TXT."
  ;; Compute the duration
  (when s2
(setq duration (- (org-duration-to-minutes s2)
- (org-duration-to-minutes s1
-
-  ;; Normalize the time(s) to 24 hour
- (when s1 (setq s1 (org-get-time-of-day s1 'string t)))
- (when s2 (setq s2 (org-get-time-of-day s2 'string t
+ (org-duration-to-minutes s1)
 
(when (string-match org-tag-group-re txt)
  ;; Tags are in the string

[elpa] externals/company e7552ee: company-dot-icons-format: Append one space

[ELPA Syncer]

branch: externals/company
commit e7552ee379c346670e843af98d495ab03fd357e3
Author: Dmitry Gutov 
Commit: Dmitry Gutov 

company-dot-icons-format: Append one space

#1088
---
 company.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/company.el b/company.el
index cdd9320..e61e29d 100644
--- a/company.el
+++ b/company.el
@@ -1621,7 +1621,7 @@ PROPERTY return nil."
 (color-name-to-rgb fg-color)
 10))
 
-(defcustom company-dot-icons-format "●"
+(defcustom company-dot-icons-format "● "
   "Format string for `company-dot-icons-margin'."
   :type 'string)
 

[elpa] externals/hyperbole 18a1769 3/3: Merge branch 'master' of hyperbole

[ELPA Syncer]

branch: externals/hyperbole
commit 18a1769fb4f246fe965993632ba4d7152899327d
Merge: a227270 ec296fc
Author: Bob Weiner 
Commit: Bob Weiner 

Merge branch 'master' of hyperbole
---
 Makefile | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/Makefile b/Makefile
index 48a8759..fd0a92b 100644
--- a/Makefile
+++ b/Makefile
@@ -337,10 +337,10 @@ ftp: package $(pkg_dir)/hyperbole-$(HYPB_VERSION).tar.gz
 autoloads: hyperbole-autoloads.el kotl/kotl-autoloads.el
 
 hyperbole-autoloads.el: $(EL_COMPILE)
-   $(EMACS) $(BATCHFLAGS) --debug n-eval "(progn (setq 
generated-autoload-file (expand-file-name \"hyperbole-autoloads.el\") 
backup-inhibited t) (make-directory-autoloads \".\"))"
+   $(EMACS) $(BATCHFLAGS) --debug --eval "(progn (setq 
generated-autoload-file (expand-file-name \"hyperbole-autoloads.el\") 
backup-inhibited t) (update-directory-autoloads \".\"))"
 
 kotl/kotl-autoloads.el: $(EL_KOTL)
-   $(EMACS) $(BATCHFLAGS) -eval "(progn (setq generated-autoload-file 
(expand-file-name \"kotl/kotl-autoloads.el\") backup-inhibited t) 
(update-directory-autoloads \"kotl/\"))"
+   $(EMACS) $(BATCHFLAGS) --eval "(progn (setq generated-autoload-file 
(expand-file-name \"kotl/kotl-autoloads.el\") backup-inhibited t) 
(update-directory-autoloads \"kotl/\"))"
 
 # Used for ftp.gnu.org tarball distributions.
 $(pkg_dir)/hyperbole-$(HYPB_VERSION).tar.gz:

[elpa] externals/hyperbole ec296fc 1/3: Typo in Makefile update (#80)

[ELPA Syncer]

branch: externals/hyperbole
commit ec296fc3f1300a4c2e48de12d47bd231c8c4eef5
Author: Mats Lidell 
Commit: GitHub 

Typo in Makefile update (#80)
---
 Makefile | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/Makefile b/Makefile
index 48a8759..fd0a92b 100644
--- a/Makefile
+++ b/Makefile
@@ -337,10 +337,10 @@ ftp: package $(pkg_dir)/hyperbole-$(HYPB_VERSION).tar.gz
 autoloads: hyperbole-autoloads.el kotl/kotl-autoloads.el
 
 hyperbole-autoloads.el: $(EL_COMPILE)
-   $(EMACS) $(BATCHFLAGS) --debug n-eval "(progn (setq 
generated-autoload-file (expand-file-name \"hyperbole-autoloads.el\") 
backup-inhibited t) (make-directory-autoloads \".\"))"
+   $(EMACS) $(BATCHFLAGS) --debug --eval "(progn (setq 
generated-autoload-file (expand-file-name \"hyperbole-autoloads.el\") 
backup-inhibited t) (update-directory-autoloads \".\"))"
 
 kotl/kotl-autoloads.el: $(EL_KOTL)
-   $(EMACS) $(BATCHFLAGS) -eval "(progn (setq generated-autoload-file 
(expand-file-name \"kotl/kotl-autoloads.el\") backup-inhibited t) 
(update-directory-autoloads \"kotl/\"))"
+   $(EMACS) $(BATCHFLAGS) --eval "(progn (setq generated-autoload-file 
(expand-file-name \"kotl/kotl-autoloads.el\") backup-inhibited t) 
(update-directory-autoloads \"kotl/\"))"
 
 # Used for ftp.gnu.org tarball distributions.
 $(pkg_dir)/hyperbole-$(HYPB_VERSION).tar.gz:

[elpa] externals/hyperbole a227270 2/3: Change kotl-mode:mail-tree binding from {C-c @} to {C-c C-@}

[ELPA Syncer]

tional _)
diff --git a/hyperbole.el b/hyperbole.el
index e02102c..f7f6209 100644
--- a/hyperbole.el
+++ b/hyperbole.el
@@ -410,8 +410,9 @@ frame, those functions by default still return the prior 
frame."
 ;;; 
 
 ;; New autoload generation function defined only in Emacs 28
-(unless (fboundp #'make-directory-autoloads)
-  (defalias 'make-directory-autoloads 'update-directory-autoloads))
+;; (unless (fboundp #'make-directory-autoloads)
+;;  ;; Don't use defalias on next line; causes a failure
+;;  (fset 'make-directory-autoloads 'update-directory-autoloads))
 
 ;; Koutliner autoloads in the kotl/ subdirectory are generated by 'make pkg'.
 ;; This next line ensures they are loaded by hyperbole-autoloads whenever
@@ -450,7 +451,7 @@ frame, those functions by default still return the prior 
frame."
 ;;  (backup-inhibited t)
 ;;  (version-control 'never))
 ;; (package-autoload-ensure-default-file generated-autoload-file)
-;; (apply #'make-directory-autoloads pkg-dir
+;; (apply #'update-directory-autoloads pkg-dir
 ;;(delq nil (mapcar (lambda (f) (and (file-directory-p f)
 ;;   (not (file-symlink-p f))
 ;;   f))
@@ -661,11 +662,17 @@ This is used only when running from git source and not a 
package release."
 (defun hyperb:generate-autoloads ()
   "Renerate Hyperbole *-autoload.el files whether they already exist or not."
   (let* ((default-directory hyperb:dir)
-(generated-autoload-file (expand-file-name "hyperbole-autoloads.el"))
-(backup-inhibited t))
-(make-directory-autoloads ".")
-(setq generated-autoload-file (expand-file-name "kotl/kotl-autoloads.el"))
-(make-directory-autoloads "kotl/"))
+(backup-inhibited t)
+(al-file (expand-file-name "hyperbole-autoloads.el"))
+(generated-autoload-file))
+;; (make-local-variable 'generated-autoload-file)
+(with-current-buffer (find-file-noselect al-file)
+  (setq generated-autoload-file al-file)
+  (update-directory-autoloads "."))
+(setq al-file (expand-file-name "kotl/kotl-autoloads.el"))
+(with-current-buffer (find-file-noselect al-file)
+  (setq generated-autoload-file al-file)
+  (update-directory-autoloads "kotl/")))
   (unless (hyperb:autoloads-exist-p)
 (error (format "Hyperbole failed to generate autoload files; try running 
'make src' in a shell in %s" hyperb:dir
 
diff --git a/kotl/EXAMPLE.kotl b/kotl/EXAMPLE.kotl
index 8447400..df1efe6 100644
--- a/kotl/EXAMPLE.kotl
+++ b/kotl/EXAMPLE.kotl
@@ -102,7 +102,7 @@
don't use them to move trees across different outline files.  You
can, however, copy an outline tree to a non-outline buffer with:
 {C-c M-c} - Copy a koutline tree to a non-koutline buffer.
-{C-c @}   - Copy a koutline tree to an outgoing mail message.
+{C-c C-@} - Copy a koutline tree to an outgoing mail message.

 {C-c c}   - Copy  to follow as sibling of .
 {C-u C-c c}   - Copy  to follow as first child of .
@@ -369,7 +369,7 @@ alpha ;; label-type
 
 ;; depth-first kcell attributes
 [[0
-  (creator "r...@gnu.org" create-time "20170928:19:50:05" id-counter 77 file 
"/Users/bk/sw-dev/emacs/hyperbole/kotl/EXAMPLE.kotl")]
+  (creator "r...@gnu.org" create-time "20210510:04:09:59" id-counter 77 file 
"/Users/bk/Dropbox/emacs/hyperbole/kotl/EXAMPLE.kotl")]
  [20
   (creator "r...@gnu.org" create-time "19940104:17:38:28" no-fill t)]
  [75
diff --git a/kotl/kotl-autoloads.el b/kotl/kotl-autoloads.el
index f33cfa6..28348d1 100644
--- a/kotl/kotl-autoloads.el
+++ b/kotl/kotl-autoloads.el
@@ -37,7 +37,9 @@ Return the new kview.
 \(fn FILE-NAME)" t nil)
 
 (autoload 'kfile:is-p "kfile" "\
-Iff current buffer contains an unformatted or formatted koutline, return file 
format version string, else nil." nil nil)
+Iff current buffer contains an unformatted or formatted koutline, return file 
format version string, else nil.
+
+\(fn)" nil nil)
 
 (autoload 'kfile:view "kfile" "\
 View an existing kotl version-2 file FILE-NAME in a read-only mode.
@@ -194,10 +196,14 @@ See documentation for `kcell:ref-to-id' for valid 
cell-ref formats.
 (autoload 'kotl-mode "kotl-mode" "\
 The major mode used to edit and view koutlines.
 It provides the following keys:
-\\{kotl-mode-map}" t nil)
+\\{kotl-mode-map}
+
+\(fn)" t nil)
 
 (autoload 'kotl-mode:example "kotl-mode" "\
-Display the Koutliner example file

[elpa] externals/hyperbole updated (c501027 -> 18a1769)

[ELPA Syncer]

elpasync pushed a change to branch externals/hyperbole.

  from  c501027   Fix set-buffer byte-compiler warnings; remove outdated 
references
   new  a227270   Change kotl-mode:mail-tree binding from {C-c @} to {C-c 
C-@}
   new  ec296fc   Typo in Makefile update (#80)
   new  18a1769   Merge branch 'master' of hyperbole


Summary of changes:
 ChangeLog  |  10 ++
 DEMO   |   2 +-
 HY-NEWS|   6 ++
 Makefile   |   4 ++--
 hsys-org.el|  39 ++-
 hyperbole.el   |  23 +++
 kotl/EXAMPLE.kotl  |   4 ++--
 kotl/kotl-autoloads.el |  20 ++--
 kotl/kotl-mode.el  |  15 +++
 kotl/kview.el  |   4 ++--
 man/hyperbole.html |  14 +++---
 man/hyperbole.info | Bin 554837 -> 554841 bytes
 man/hyperbole.pdf  | Bin 1309400 -> 1309421 bytes
 man/hyperbole.texi |   4 ++--
 14 files changed, 94 insertions(+), 51 deletions(-)

[elpa] externals/pyim ffa7f0f: Revert "* pyim.el (pyim-select-word:xingma): sort char candidates when use xingma." #398

[ELPA Syncer]

branch: externals/pyim
commit ffa7f0f1638f82d500db3a9db17b983f5410a093
Author: Feng Shu 
Commit: Feng Shu 

Revert "* pyim.el (pyim-select-word:xingma): sort char candidates when use 
xingma." #398

This reverts commit 289860e1061fbd9ce706b6509ab5552a74b10dce.
---
 pyim.el | 8 +---
 1 file changed, 5 insertions(+), 3 deletions(-)

diff --git a/pyim.el b/pyim.el
index 9915c1f..08d25f8 100644
--- a/pyim.el
+++ b/pyim.el
@@ -691,9 +691,11 @@ FILE 的格式与 `pyim-dcache-export' 生成的文件格式相同，
   ;; 字符串里面剪掉。
   (delete-region (point-min) (point)))
 (pyim-entered-refresh))
-(if (member (pyim-outcome-get) pyim-candidates)
-(pyim-create-pyim-word (pyim-outcome-get) t)
-  (pyim-create-pyim-word (pyim-outcome-get)))
+;; 型码输入法，只考虑将词条保存到个人词库，用于调整词频，单字不保存。
+(when (> (length (pyim-outcome-get)) 1)
+  (if (member (pyim-outcome-get) pyim-candidates)
+  (pyim-create-pyim-word (pyim-outcome-get) t)
+(pyim-create-pyim-word (pyim-outcome-get
 (pyim-terminate-translation)
 ;; pyim 使用这个 hook 来处理联想词。
 (run-hooks 'pyim-select-finish-hook)))

[nongnu] main afc5d93: elpa-packages (org-contrib): New package

[Bastien Guerry]

branch: main
commit afc5d93ba94d454c6fe27767e2f21441bd9ac4c8
Author: Bastien 
Commit: Bastien 

elpa-packages (org-contrib): New package
---
 elpa-packages | 5 +
 1 file changed, 5 insertions(+)

diff --git a/elpa-packages b/elpa-packages
index 4589e00..b495e00 100644
--- a/elpa-packages
+++ b/elpa-packages
@@ -26,6 +26,11 @@
  ("request":url "https://github.com/tkf/emacs-request";
   :ignored-files ("tests" "doc" "COPYING"))
 
+ ("org-contrib":url "https://git.sr.ht/~bzg/org-contrib";
+  :lisp-dir "lisp"
+  :readme "README.org"
+  :ignored-files ("README.md"))
+
  ("sly":url "https://github.com/joaotavora/sly";
   :texinfo "doc/sly.texi"
   ;; Not needed any more: