Easy way to open very large file at point

FlorentinGarnier · Jan 4, 2018 · d14d468 · d14d468
1 parent 083c174
commit d14d468
Showing 1 changed file with 13 additions and 0 deletions.
diff --git a/lisp/init-editing-utils.el b/lisp/init-editing-utils.el
@@ -39,7 +39,20 @@
 (when (maybe-require-package 'dynamic-spaces)
   (dynamic-spaces-global-mode))
 
+
  ;;; A simple visible bell which works in all terminal types
+;; Huge files
+
+(require-package 'vlf)
+
+(defun ffap-vlf ()
+  "Find file at point with VLF."
+  (interactive)
+  (let ((file (ffap-file-at-point)))
+    (unless (file-exists-p file)
+      (error "File does not exist: %s" file))
+    (vlf file)))
+
 
 (defun sanityinc/flash-mode-line ()
   (invert-face 'mode-line)