mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-15 10:30:25 -08:00
Code Issues Projects Releases Wiki Activity

* lisp/eshell/em-unix.el (eshell/mkdir): Handle "--parents".

Browse source 
Fixes: debbugs:12897
This commit is contained in:
Jürgen Hötzel 2012-11-16 13:18:07 -05:00 • committed by Stefan Monnier
parent dd0c5bbb36
commit 60c4ee6682
2 changed files with 6 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

4
lisp/ChangeLog
View file

@ -1,3 +1,7 @@
2012-11-16 Jürgen Hötzel <juergen@archlinux.org> (tiny change)
* eshell/em-unix.el (eshell/mkdir): Handle "--parents" (bug#12897).
2012-11-16 Stefan Monnier <monnier@iro.umontreal.ca>
* emacs-lisp/advice.el (ad-make-advised-definition): Improve last fix.

3
lisp/eshell/em-unix.el
View file

@ -306,12 +306,13 @@ Remove (unlink) the FILE(s).")
(eshell-eval-using-options
"mkdir" args
'((?h "help" nil nil "show this usage screen")
(?p "parents" nil em-parents "make parent directories as needed")
:external "mkdir"
:show-usage
:usage "[OPTION] DIRECTORY...
Create the DIRECTORY(ies), if they do not already exist.")
(while args
(eshell-funcalln 'make-directory (car args))
(eshell-funcalln 'make-directory (car args) em-parents)
(setq args (cdr args)))
nil))