update packages

lisp/company/company-dabbrev.el

@@ -198,9 +198,11 @@ This variable affects both `company-dabbrev' and `company-dabbrev-code'."
   (company-dabbrev--search (company-dabbrev--make-regexp)
                            company-dabbrev-time-limit
                            (pcase company-dabbrev-other-buffers
-                             (`t (list major-mode))
+                             ('t (list major-mode))
+                             ;; `all' is a function starting with Emacs 31.
+                             ('all 'all)
                              ((pred functionp) (funcall company-dabbrev-other-buffers (current-buffer)))
-                             (`all `all))))
+                             )))
 
 ;;;###autoload
 (defun company-dabbrev (command &optional arg &rest _ignored)

lisp/company/company-files.el

@@ -123,7 +123,7 @@ The values should use the same format as `completion-ignored-extensions'."
 (defun company-files--prefix ()
   (let ((existing (company-files--grab-existing-name)))
     (when existing
-      (list existing (company-grab-suffix "[^ '\"\t\n\r/]*/?")))))
+      (list existing (company-grab-suffix "[^] '\"\t\n\r/]*/?")))))
 
 (defun company-file--keys-match-p (new old)
   (and (equal (cdr old) (cdr new))

lisp/company/company-keywords.el

@@ -292,10 +292,10 @@
      "then" "type" "where")
     (python-mode
      ;; https://docs.python.org/3/reference/lexical_analysis.html#keywords
-     "False" "None" "True" "and" "as" "assert" "break" "class" "continue" "def"
-     "del" "elif" "else" "except" "exec" "finally" "for" "from" "global" "if"
-     "import" "in" "is" "lambda" "nonlocal" "not" "or" "pass" "print" "raise"
-     "return" "try" "while" "with" "yield")
+     "False" "None" "True" "and" "as" "assert" "async" "await" "break" "class"
+     "continue" "def" "del" "elif" "else" "except" "exec" "finally" "for" "from"
+     "global" "if" "import" "in" "is" "lambda" "nonlocal" "not" "or" "pass"
+     "print" "raise" "return" "try" "while" "with" "yield")
     (ruby-mode
      "BEGIN" "END" "alias" "and"  "begin" "break" "case" "class" "def" "defined?"
      "do" "else" "elsif"  "end" "ensure" "false" "for" "if" "in" "module"

lisp/company/company-pkg.el

@@ -1,9 +1,9 @@
 ;; -*- no-byte-compile: t; lexical-binding: nil -*-
-(define-package "company" "20250426.1319"
+(define-package "company" "20251021.2211"
   "Modular text completion framework."
   '((emacs "26.1"))
   :url "http://company-mode.github.io/"
-  :commit "41f07c7d401c1374a76f3004a3448d3d36bdf347"
-  :revdesc "41f07c7d401c"
+  :commit "4ff89f7369227fbb89fe721d1db707f1af74cd0f"
+  :revdesc "4ff89f736922"
   :keywords '("abbrev" "convenience" "matching")
   :maintainers '(("Dmitry Gutov" . "dmitry@gutov.dev")))

lisp/company/company-tng.el

@@ -124,7 +124,12 @@ confirm the selection and finish the completion."
      (when (and company-selection
                 (not (company--company-command-p (this-command-keys))))
        (company--unread-this-command-keys)
-       (setq this-command 'company-complete-selection)))))
+       (setq this-command 'company-complete-selection)))
+    (post-command
+     (when (and (eq this-command 'company-complete-selection)
+             (zerop (length (car (company--boundaries))))
+             (eql (preceding-char) (car unread-command-events)))
+       (delete-char -1)))))
 
 (defvar company-clang-insert-arguments)
 (defvar company-semantic-insert-arguments)

lisp/company/company.el

@@ -5,8 +5,8 @@
 ;; Author: Nikolaj Schumacher
 ;; Maintainer: Dmitry Gutov <dmitry@gutov.dev>
 ;; URL: http://company-mode.github.io/
-;; Package-Version: 20250426.1319
-;; Package-Revision: 41f07c7d401c
+;; Package-Version: 20251021.2211
+;; Package-Revision: 4ff89f736922
 ;; Keywords: abbrev, convenience, matching
 ;; Package-Requires: ((emacs "26.1"))
 
@@ -1436,8 +1436,9 @@ be recomputed when this value changes."
       (let* ((entity (and
                       (not (keywordp backend))
                       (company--force-sync backend '(prefix) backend)))
-             (new-len (company--prefix-len entity)))
+             new-len)
         (when (stringp (company--prefix-str entity))
+          (setq new-len (company--prefix-len entity))
           (or (not backends-after-with)
               (unless (memq backend backends-after-with)
                 (setq backends-after-with nil)))

lisp/company/company.info

@@ -1,4 +1,4 @@
-This is company.info, produced by makeinfo version 7.1.1 from
+This is company.info, produced by makeinfo version 7.2 from
 company.texi.
 
 This user manual is for Company version 1.0.3-snapshot
@@ -82,7 +82,6 @@ Backends
 * Package Backends::
 * Candidates Post-Processing::
 
-
 
 File: company.info,  Node: Overview,  Next: Getting Started,  Prev: Top,  Up: Top
 
@@ -1772,52 +1771,52 @@ Concept Index
 * troubleshoot:                          Troubleshooting.     (line   6)
 * usage:                                 Usage Basics.        (line   6)
 
-
 
 Tag Table:
-Node: Top575
-Node: Overview2002
-Node: Terminology2410
-Node: Structure3713
-Node: Getting Started5203
-Node: Installation5481
-Node: Initial Setup5864
-Node: Usage Basics6712
-Node: Commands7686
-Ref: Commands-Footnote-110082
-Node: Customization10249
-Node: Customization Interface10721
-Node: Configuration File11254
-Ref: company-selection-wrap-around13566
-Node: Frontends16055
-Node: Tooltip Frontends17024
-Ref: Tooltip Frontends-Footnote-127720
-Node: Preview Frontends27957
-Ref: Preview Frontends-Footnote-129215
-Node: Echo Frontends29342
-Node: Candidates Search30871
-Node: Filter Candidates32203
-Node: Quick Access a Candidate32983
-Node: Backends34601
-Node: Backends Usage Basics35631
-Ref: Backends Usage Basics-Footnote-137063
-Node: Grouped Backends37147
-Node: Package Backends38658
-Node: Code Completion39585
-Node: Text Completion45102
-Node: File Name Completion49526
-Node: Template Expansion51072
-Node: Candidates Post-Processing51791
-Node: Troubleshooting54368
-Node: Index56039
-Node: Key Index56202
-Node: Variable Index57701
-Node: Function Index62554
-Node: Concept Index67254
+Node: Top573
+Node: Overview1999
+Node: Terminology2407
+Node: Structure3710
+Node: Getting Started5200
+Node: Installation5478
+Node: Initial Setup5861
+Node: Usage Basics6709
+Node: Commands7683
+Ref: Commands-Footnote-110079
+Node: Customization10246
+Node: Customization Interface10718
+Node: Configuration File11251
+Ref: company-selection-wrap-around13563
+Node: Frontends16052
+Node: Tooltip Frontends17021
+Ref: Tooltip Frontends-Footnote-127717
+Node: Preview Frontends27954
+Ref: Preview Frontends-Footnote-129212
+Node: Echo Frontends29339
+Node: Candidates Search30868
+Node: Filter Candidates32200
+Node: Quick Access a Candidate32980
+Node: Backends34598
+Node: Backends Usage Basics35628
+Ref: Backends Usage Basics-Footnote-137060
+Node: Grouped Backends37144
+Node: Package Backends38655
+Node: Code Completion39582
+Node: Text Completion45099
+Node: File Name Completion49523
+Node: Template Expansion51069
+Node: Candidates Post-Processing51788
+Node: Troubleshooting54365
+Node: Index56036
+Node: Key Index56199
+Node: Variable Index57698
+Node: Function Index62551
+Node: Concept Index67251
 
 End Tag Table
 
 
 Local Variables:
 coding: utf-8
+Info-documentlanguage: en
 End: