Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
Browse files

setup-myfiles: replace multiple dired with mapc.

  • Loading branch information...
commit 5ba48eecdcf2f166e917088108199d467bfa2afe 1 parent e72e78c
@tiagosab authored
Showing with 2 additions and 5 deletions.
  1. +2 −5 ts-goodies/setup-myfiles.el
View
7 ts-goodies/setup-myfiles.el
@@ -37,11 +37,8 @@ Implemented on 2011-04-18."
(py-shell)
(dired "/home/tiago/src/paudearara/repo")
(with-current-buffer "repo\\paudearara\\src"
- (dired-maybe-insert-subdir "qt_design")
- (dired-maybe-insert-subdir "sabase")
- (dired-maybe-insert-subdir "docdac/ui")
- (dired-maybe-insert-subdir "docdac")
- (dired-maybe-insert-subdir "docs"))
+ (mapc 'dired-maybe-insert-subdir
+ '"qt_design" "sabase" "docdac/ui" "docdac" "docs"))
(find-file "/home/tiago/src/paudearara/repo/docs/devel.org"))
(defun ts-sabase-test ()
Please sign in to comment.
Something went wrong with that request. Please try again.