Fix: :ltag command did not set w:quickfix_title. (Lech Lorens)

diff --git a/src/eval.c b/src/eval.c
index 6d6f9b40cdda8ca2e1f4c25ba926628086cdfda1..fc01006f2ea39be16059221376e518b9c14954b7 100644 (file)
--- a/src/eval.c
+++ b/src/eval.c
@@ -15824,7 +15824,7 @@ set_qf_ll_list(wp, list_arg, action_arg, rettv)
                action = *act;
        }
 
-       if (l != NULL && set_errorlist(wp, l, action) == OK)
+       if (l != NULL && set_errorlist(wp, l, action, NULL) == OK)
            rettv->vval.v_number = 0;
     }
 #endif

diff --git a/src/proto/quickfix.pro b/src/proto/quickfix.pro
index 65ef438db44db48bed493fbae7663afdc2cb5b62..a5c690f646b9cab8b86fbbfb0cc17929c46d1eaa 100644 (file)
--- a/src/proto/quickfix.pro
+++ b/src/proto/quickfix.pro
@@ -23,7 +23,7 @@ void ex_cfile __ARGS((exarg_T *eap));
 void ex_vimgrep __ARGS((exarg_T *eap));
 char_u *skip_vimgrep_pat __ARGS((char_u *p, char_u **s, int *flags));
 int get_errorlist __ARGS((win_T *wp, list_T *list));
-int set_errorlist __ARGS((win_T *wp, list_T *list, int action));
+int set_errorlist __ARGS((win_T *wp, list_T *list, int action, char_u *title));
 void ex_cbuffer __ARGS((exarg_T *eap));
 void ex_cexpr __ARGS((exarg_T *eap));
 void ex_helpgrep __ARGS((exarg_T *eap));

diff --git a/src/quickfix.c b/src/quickfix.c
index 3ecc81c7243a0c7cd565a76824920dc44a767782..c67397a5a3526bfd570013c049c8cfcee083e90e 100644 (file)
--- a/src/quickfix.c
+++ b/src/quickfix.c
@@ -3593,13 +3593,14 @@ get_errorlist(wp, list)
 
 /*
  * Populate the quickfix list with the items supplied in the list
- * of dictionaries.
+ * of dictionaries. "title" will be copied to w:quickfix_title
  */
     int
-set_errorlist(wp, list, action)
+set_errorlist(wp, list, action, title)
     win_T      *wp;
     list_T     *list;
     int                action;
+    char_u     *title;
 {
     listitem_T *li;
     dict_T     *d;
@@ -3623,7 +3624,7 @@ set_errorlist(wp, list, action)
 
     if (action == ' ' || qi->qf_curlist == qi->qf_listcount)
        /* make place for a new list */
-       qf_new_list(qi, NULL);
+       qf_new_list(qi, title);
     else if (action == 'a' && qi->qf_lists[qi->qf_curlist].qf_count > 0)
        /* Adding to existing list, find last entry. */
        for (prevp = qi->qf_lists[qi->qf_curlist].qf_start;

diff --git a/src/tag.c b/src/tag.c
index 949d5d19089994e6a6143a2b7291a6a2d37c1810..d7a9a103721ae654ee554cf5ee3c7d7bf4ef937c 100644 (file)
--- a/src/tag.c
+++ b/src/tag.c
@@ -911,7 +911,8 @@ do_tag(tag, type, count, forceit, verbose)
                        dict_add_nr_str(dict, "pattern", 0L, cmd);
                }
 
-               set_errorlist(curwin, list, ' ');
+               vim_snprintf(IObuff, IOSIZE, "ltag %s", tag);
+               set_errorlist(curwin, list, ' ', IObuff);
 
                list_free(list, TRUE);