branch: elpa/isl
commit a893c00fa4156389910a272010b1c7025dbae081
Author: Thierry Volpiatto <[email protected]>
Commit: Thierry Volpiatto <[email protected]>
Add isl-narrow-to-defun
---
isearch-light.el | 7 +++++++
1 file changed, 7 insertions(+)
diff --git a/isearch-light.el b/isearch-light.el
index 1c19e3d97dd..3b031ec14e8 100644
--- a/isearch-light.el
+++ b/isearch-light.el
@@ -174,6 +174,13 @@
isl-initial-pos (point))
(isl-1))
+;;;###autoload
+(defun isl-narrow-to-defun ()
+ (interactive)
+ (save-restriction
+ (narrow-to-defun)
+ (isl)))
+
(provide 'isearch-light)
;;; isearch-light.el ends here
