master a4473afefe1: Fix case-sensitivity in 'complete-tag'

[Eli Zaretskii]

branch: master
commit a4473afefe1a0f171ac6e811853836dd675f93d2
Author: Eli Zaretskii <eliz@gnu.org>
Commit: Eli Zaretskii <eliz@gnu.org>

    Fix case-sensitivity in 'complete-tag'
    
    * lisp/progmodes/etags.el (complete-tag): Bind
    'completion-ignore-case', so that 'completion-in-region' is
    affected by it.  This fixes a bug made in 30 Apr 2010, when this
    function was refactored to use
    'tags-completion-at-point-function'.  Reported by Morgan Willcock
    <morgan@ice9.digital>.
---
 lisp/progmodes/etags.el | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/lisp/progmodes/etags.el b/lisp/progmodes/etags.el
index 476037eb8bd..597612196fd 100644
--- a/lisp/progmodes/etags.el
+++ b/lisp/progmodes/etags.el
@@ -2065,7 +2065,8 @@ for \\[find-tag] (which see)."
       (user-error "%s"
                   (substitute-command-keys
                    "No tags table loaded; try \\[visit-tags-table]")))
-  (let ((comp-data (tags-completion-at-point-function)))
+  (let ((comp-data (tags-completion-at-point-function))
+        (completion-ignore-case (find-tag--completion-ignore-case)))
     (if (null comp-data)
        (user-error "Nothing to complete")
       (completion-in-region (car comp-data) (cadr comp-data)