[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/objed 1f09072 064/216: Improve file object
From: |
Stefan Monnier |
Subject: |
[elpa] externals/objed 1f09072 064/216: Improve file object |
Date: |
Tue, 8 Jan 2019 12:29:12 -0500 (EST) |
branch: externals/objed
commit 1f09072048eccaabaf6eeb39f65a31b0d38169dd
Author: Clemera <address@hidden>
Commit: Clemera <address@hidden>
Improve file object
---
objed-objects.el | 11 +++++++----
1 file changed, 7 insertions(+), 4 deletions(-)
diff --git a/objed-objects.el b/objed-objects.el
index b761712..bcc07c1 100644
--- a/objed-objects.el
+++ b/objed-objects.el
@@ -1371,14 +1371,17 @@ Ignores simple structured expressions like words or
symbols."
(objed-define-object nil file
:atp
- (looking-at "\\<")
+ (looking-at "/\\|\\\\")
:get-obj
;; TODO: inner bounds without extension
- (bounds-of-thing-at-point 'filename)
+ (let* ((bounds (bounds-of-thing-at-point 'filename))
+ (file (and bounds (buffer-substring (car bounds) (cdr bounds)))))
+ (when (and file (string-match "/\\|\\\\" file))
+ bounds))
:try-next
- (re-search-forward "\\<." nil t)
+ (re-search-forward "/\\|\\\\" nil t)
:try-prev
- (re-search-backward ".\\>" nil t))
+ (re-search-backward "/\\|\\\\" nil t))
(objed-define-object nil defun
:get-obj
- [elpa] externals/objed 61bb3eb 031/216: Fixup bindings and docs, (continued)
- [elpa] externals/objed 61bb3eb 031/216: Fixup bindings and docs, Stefan Monnier, 2019/01/08
- [elpa] externals/objed ca32294 038/216: Ensure value for cursor color, #5, Stefan Monnier, 2019/01/08
- [elpa] externals/objed 430d858 037/216: Add more command to move objects around and change bindings for them, Stefan Monnier, 2019/01/08
- [elpa] externals/objed 64dc38b 035/216: More on indent/move commands, Stefan Monnier, 2019/01/08
- [elpa] externals/objed d5dd1d0 045/216: Fix function name, Stefan Monnier, 2019/01/08
- [elpa] externals/objed f33147d 043/216: Add syntax object adjusted from laishulu/evil-textobj-syntax, Stefan Monnier, 2019/01/08
- [elpa] externals/objed 8c3ba86 040/216: Add note about changing bindings, Stefan Monnier, 2019/01/08
- [elpa] externals/objed 95503ca 046/216: Fix syntax object, Stefan Monnier, 2019/01/08
- [elpa] externals/objed 7ad08e2 052/216: Set C-h to work as usual, Stefan Monnier, 2019/01/08
- [elpa] externals/objed dc8c569 033/216: Improve surround op, Stefan Monnier, 2019/01/08
- [elpa] externals/objed 1f09072 064/216: Improve file object,
Stefan Monnier <=
- [elpa] externals/objed 96c6b8f 065/216: Add DEL key for in buffer replacement, fixes #6, Stefan Monnier, 2019/01/08
- [elpa] externals/objed 41be963 054/216: Adjust textblock and block object order, Stefan Monnier, 2019/01/08
- [elpa] externals/objed 843d843 059/216: Remove textblock from context objects, Stefan Monnier, 2019/01/08
- [elpa] externals/objed de241e3 048/216: Start to support mc, Stefan Monnier, 2019/01/08
- [elpa] externals/objed ebad1ac 061/216: Fix face object, Stefan Monnier, 2019/01/08
- [elpa] externals/objed 042c3bb 051/216: Change some bindings, Stefan Monnier, 2019/01/08
- [elpa] externals/objed f605604 057/216: Rename syntax object to face object, Stefan Monnier, 2019/01/08
- [elpa] externals/objed e94dc45 049/216: Remove :get-inner, Stefan Monnier, 2019/01/08
- [elpa] externals/objed ad88f19 074/216: Fix markup!!!, Stefan Monnier, 2019/01/08
- [elpa] externals/objed 37449f5 063/216: Update link, Stefan Monnier, 2019/01/08