Skip to content
GitLab
Projects
Groups
Snippets
Help
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Open sidebar
emacs
emacs
Commits
20e192c0
Commit
20e192c0
authored
Oct 23, 2007
by
Juanma Barranquero
Browse files
(ibuffer-switch-to-saved-filters, ibuffer-switch-to-saved-filter-groups):
Doc fixes.
parent
657e8332
Changes
1
Hide whitespace changes
Inline
Side-by-side
Showing
1 changed file
with
6 additions
and
10 deletions
+6
-10
lisp/ibuf-ext.el
lisp/ibuf-ext.el
+6
-10
No files found.
lisp/ibuf-ext.el
View file @
20e192c0
...
...
@@ -565,7 +565,7 @@ To evaluate a form without viewing the buffer, see `ibuffer-do-eval'."
(
cons
(
format
"%s"
mode
)
`
((
mode
.
,
mode
))))
(
let
((
modes
(
ibuffer-remove-duplicates
(
mapcar
(
lambda
(
buf
)
(
mapcar
(
lambda
(
buf
)
(
with-current-buffer
buf
major-mode
))
(
buffer-list
)))))
(
if
ibuffer-view-ibuffer
...
...
@@ -604,7 +604,7 @@ To evaluate a form without viewing the buffer, see `ibuffer-do-eval'."
;;;###autoload
(
defun
ibuffer-decompose-filter-group
(
group
)
"Decompose the filter group GROUP into active filters."
(
interactive
(
interactive
(
list
(
ibuffer-read-filter-group-name
"Decompose filter group: "
t
)))
(
let
((
data
(
cdr
(
assoc
group
ibuffer-filter-groups
))))
(
setq
ibuffer-filter-groups
(
ibuffer-delete-alist
...
...
@@ -639,7 +639,7 @@ To evaluate a form without viewing the buffer, see `ibuffer-do-eval'."
;;;###autoload
(
defun
ibuffer-jump-to-filter-group
(
name
)
"Move point to the filter group whose name is NAME."
(
interactive
(
interactive
(
list
(
ibuffer-read-filter-group-name
"Jump to filter group: "
)))
(
ibuffer-aif
(
assoc
name
(
ibuffer-current-filter-groups-with-position
))
(
goto-char
(
cdr
it
))
...
...
@@ -753,9 +753,7 @@ They are removed from `ibuffer-saved-filter-groups'."
;;;###autoload
(
defun
ibuffer-switch-to-saved-filter-groups
(
name
)
"Set this buffer's filter groups to saved version with NAME.
The value from `ibuffer-saved-filters' is used.
If prefix argument ADD is non-nil, then add the saved filters instead
of replacing the current filters."
The value from `ibuffer-saved-filter-groups' is used."
(
interactive
(
list
(
if
(
null
ibuffer-saved-filter-groups
)
...
...
@@ -863,7 +861,7 @@ filter into parts."
(
not
(
eq
'or
(
caar
ibuffer-filtering-qualifiers
))))
(
error
"Top filter is not an OR"
))
(
let
((
lim
(
pop
ibuffer-filtering-qualifiers
)))
(
setq
ibuffer-filtering-qualifiers
(
setq
ibuffer-filtering-qualifiers
(
nconc
(
cdr
lim
)
ibuffer-filtering-qualifiers
))))
(
when
(
<
(
length
ibuffer-filtering-qualifiers
)
2
)
(
error
"Need two filters to OR"
))
...
...
@@ -931,9 +929,7 @@ Interactively, prompt for NAME, and use the current filters."
;;;###autoload
(
defun
ibuffer-switch-to-saved-filters
(
name
)
"Set this buffer's filters to filters with NAME from `ibuffer-saved-filters'.
If prefix argument ADD is non-nil, then add the saved filters instead
of replacing the current filters."
"Set this buffer's filters to filters with NAME from `ibuffer-saved-filters'."
(
interactive
(
list
(
if
(
null
ibuffer-saved-filters
)
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment