Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
Browse files

Some comments

  • Loading branch information...
commit 654b1fe497deff2ead44d303a710b705783c7838 1 parent f9dedcb
myfreeweb authored
Showing with 3 additions and 2 deletions.
  1. +3 −2 startproject.el
View
5 startproject.el
@@ -34,7 +34,7 @@
(defvar vc-systems
'("bzr" "hg" "git" "none"))
-(defvar sp-open-vc-dir t)
+(defvar sp-open-vc-dir t) ; maybe some users think it's annoying.
(puthash "anything" "mkdir" project-starters)
(puthash "django" "django-admin.py startproject" project-starters)
@@ -46,7 +46,8 @@
(defun really-start-project (type vcs name)
(shell-command (concat "cd " projects-dir " && "
(gethash type project-starters) " " name))
- (if (equal vcs "none") ()
+ (if (equal vcs "none")
+ () ; this is "else", lol. Lisp <3
(shell-command (concat "cd " projects-dir "/" name " && " vcs " init")))
(dired (concat projects-dir name))
(if (equal sp-open-vc-dir t)
Please sign in to comment.
Something went wrong with that request. Please try again.