From 59205abbe86a0fe5c9a33784ed1bc04ff6e67159 Mon Sep 17 00:00:00 2001 From: Raimon Grau Date: Tue, 7 Apr 2015 00:33:48 +0100 Subject: [PATCH] Increase max number of results --- helm-dash.el | 10 ++++++---- 1 file changed, 6 insertions(+), 4 deletions(-) diff --git a/helm-dash.el b/helm-dash.el index 5937376..87de18e 100644 --- a/helm-dash.el +++ b/helm-dash.el @@ -246,11 +246,11 @@ The Argument FEED-PATH should be a string with the path of the xml file." (defvar helm-dash-sql-queries '((DASH . ((select . (lambda (pattern) (let ((like (helm-dash-sql-compose-like "t.name" pattern)) - (query "SELECT t.type, t.name, t.path FROM searchIndex t WHERE %s ORDER BY LOWER(t.name) LIMIT 100")) + (query "SELECT t.type, t.name, t.path FROM searchIndex t WHERE %s ORDER BY LOWER(t.name) LIMIT 1000")) (format query like)))))) (ZDASH . ((select . (lambda (pattern) (let ((like (helm-dash-sql-compose-like "t.ZTOKENNAME" pattern)) - (query "SELECT ty.ZTYPENAME, t.ZTOKENNAME, f.ZPATH, m.ZANCHOR FROM ZTOKEN t, ZTOKENTYPE ty, ZFILEPATH f, ZTOKENMETAINFORMATION m WHERE ty.Z_PK = t.ZTOKENTYPE AND f.Z_PK = m.ZFILE AND m.ZTOKEN = t.Z_PK AND %s ORDER BY LOWER(t.ZTOKENNAME) LIMIT 100")) + (query "SELECT ty.ZTYPENAME, t.ZTOKENNAME, f.ZPATH, m.ZANCHOR FROM ZTOKEN t, ZTOKENTYPE ty, ZFILEPATH f, ZTOKENMETAINFORMATION m WHERE ty.Z_PK = t.ZTOKENTYPE AND f.Z_PK = m.ZFILE AND m.ZTOKEN = t.Z_PK AND %s ORDER BY LOWER(t.ZTOKENNAME) LIMIT 1000")) (format query like)))))))) (defun helm-dash-sql-compose-like (column pattern) @@ -354,7 +354,8 @@ Get required params to call `helm-dash-result-url' from SEARCH-RESULT." (helm-dash-create-common-connections) (helm-dash-create-buffer-connections) (helm :sources (list (helm-source-dash-search)) - :buffer "*helm-dash*")) + :buffer "*helm-dash*" + :helm-candidate-number-limit 1000)) ;;;###autoload (defun helm-dash-at-point () @@ -365,7 +366,8 @@ point as prefilled search." (helm-dash-create-buffer-connections) (helm :sources (list (helm-source-dash-search)) :buffer "*helm-dash*" - :input (thing-at-point 'symbol))) + :input (thing-at-point 'symbol) + :helm-candidate-number-limit 1000)) (provide 'helm-dash)