[elpa] externals/vlf 2f201c5 061/310: Add jump to chunk command.

[Stefan Monnier]

branch: externals/vlf
commit 2f201c56d56226c61b609d5e65c7c7bd7ebc08b7
Author: Andrey Kotlarski <m00naticus@gmail.com>
Commit: Andrey Kotlarski <m00naticus@gmail.com>

    Add jump to chunk command.
---
 vlfi.el | 6 ++++++
 1 file changed, 6 insertions(+)

diff --git a/vlfi.el b/vlfi.el
index aa95854..8013d3a 100644
--- a/vlfi.el
+++ b/vlfi.el
@@ -65,6 +65,7 @@
     (define-key map "[" 'vlfi-beginning-of-file)
     (define-key map "]" 'vlfi-end-of-file)
     (define-key map "e" 'vlfi-edit-mode)
+    (define-key map "j" 'vlfi-jump-to-chunk)
     map)
   "Keymap for `vlfi-mode'.")
 
@@ -203,6 +204,11 @@ With FROM-END prefix, start from the back."
   (ignore args)
   (vlfi-move-to-chunk vlfi-start-pos vlfi-end-pos))
 
+(defun vlfi-jump-to-chunk (n)
+  "Go to to chunk N."
+  (interactive "nGoto to chunk: ")
+  (vlfi-move-to-batch (* (1- n) vlfi-batch-size)))
+
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 ;;; batch movement