FG42
/
FG42
1
0
Fork 1
Code Issues Pull Requests 1 Packages Projects Releases Wiki Activity

project library cleaned

This commit is contained in:
Sameer Rahmani 2011-01-03 09:16:42 +03:30
parent 216a8669f5
commit 070e83e668
2 changed files with 4 additions and 23 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
src/lib/project.el
View File

@ -1,4 +1,4 @@
;; Shit - My personal emacs IDE configuration
;; Kuso - My personal emacs IDE
;; Copyright (C) 2010 Sameer Rahmani <lxsameer@gnu.org>
;;
;; This program is free software: you can redistribute it and/or modify
@ -14,7 +14,7 @@
;; You should have received a copy of the GNU General Public License
;; along with this program. If not, see <http://www.gnu.org/licenses/>.
;; project.el - Shit providen API for projects
;; project.el - Kuso providen API for projects
;; Some of the context variable that template render
;; enginge will render are:
@ -38,9 +38,9 @@
;; Project name
(setq project-name (read-string "Project Name: "))
(if (string= project-name "") (error "Project name must not be emty"))
;; Shit IDE use unix-project-name for dealing with project OS activity stuffs
;; Kuso IDE use unix-project-name for dealing with project OS activity stuffs
(setq unix-project-name (downcase (replace-regexp-in-string " " "_" project-name)))
;; if specified directory does not exists, shit will make it
;; if specified directory does not exists, Kuso will make it
(setq project-path (read-directory-name "Project Path: " nil nil nil unix-project-name))
(if (not (file-exists-p project-path))
@ -55,14 +55,12 @@
(progn
(setq project-license nil)
(setq project-author nil)
(setq project-home-page nil)
(setq project-author-email nil)
(setq project-desc nil)
)
(progn
(setq project-author (read-string "Project Author: "))
(setq project-author-email (read-string "Project Author Email: "))
(setq project-home-page (read-string "Home Page: "))
(setq project-desc (read-string "Description: "))
)
)

17
src/lib/template.el
View File

@ -1,17 +0,0 @@
;; Shit - My personal emacs IDE configuration
;; Copyright (C) 2010 Sameer Rahmani <lxsameer@gnu.org>
;;
;; This program is free software: you can redistribute it and/or modify
;; it under the terms of the GNU General Public License as published by
;; the Free Software Foundation, either version 3 of the License, or
;; any later version.
;;
;; This program is distributed in the hope that it will be useful,
;; but WITHOUT ANY WARRANTY; without even the implied warranty of
;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
;; GNU General Public License for more details.
;;
;; You should have received a copy of the GNU General Public License
;; along with this program. If not, see <http://www.gnu.org/licenses/>.
;; Template library