diff --git a/TODO b/TODO
index 9699b39..06d26d4 100644
--- a/TODO
+++ b/TODO
@@ -1,5 +1,6 @@
 * Remove unkown filetypes from filelist in load-dir
 * Add some option for user to choose between liceenses
 * Review license templates
-* build the debian folder nad required files for deb packages
-* escape project name for a unix name "shell-quote-argument"
\ No newline at end of file
+* Build the debian folder nad required files for deb packages
+* Escape project name for a unix name "shell-quote-argument"
+* Add a config file for user to put his/her configuration there
\ No newline at end of file
diff --git a/src/lib/project.el b/src/lib/project.el
index efd6ce0..ed1ef60 100644
--- a/src/lib/project.el
+++ b/src/lib/project.el
@@ -72,5 +72,8 @@
 	(setq license-data (replace-regexp-in-string "::year::" (format-time-string "%Y") license-data))
 	(identity license-data)
 	)
+    (let (license-data)
+      (setq license-data "Put you GOD DAMN, FUCKing license here")
+      )
     )
 )
\ No newline at end of file
diff --git a/src/plugins/cproject.el b/src/plugins/cproject.el
index 0e534f1..78e6680 100644
--- a/src/plugins/cproject.el
+++ b/src/plugins/cproject.el
@@ -48,10 +48,12 @@
 (defun generic-c () "Create a generic type C project"
   (interactive)
   (c-new-project)
-  (let (current-template-file license-data)
+  (let (current-template-file license-data filelist)
     (setq current-template-file (concat TEMPLATESPATH "c/generic_c/main.c.tmpl"))
+    (setq filelist (file-expand-wildcards load-elc))
+    ;; add the license header
     (setq license-data (insert-license))
-    (log license-data)
+    
     )
 )
 (init-menus)
\ No newline at end of file
diff --git a/src/shit-ide.el b/src/shit-ide.el
index a6106e1..2f135cf 100644
--- a/src/shit-ide.el
+++ b/src/shit-ide.el
@@ -22,11 +22,14 @@
 (setq TEMPLATESPATH nil)
 
 (defun strip-el-ext (STR) "strinp the lastest elist extension suffix"
+  (let (ext)
   (setq ext (replace-regexp-in-string "\.el$" "" STR))
   (setq ext (replace-regexp-in-string "\.elc$" "" ext))
+  )
 )
 
 (defun load-dir (path) "Load entire directory"
+  (let (load-elc load-el filelist tmp)
   (setq load-elc (concat path "*.elc"))
   (setq load-el (concat path "*.el"))
   (setq filelist (file-expand-wildcards load-elc))
@@ -36,10 +39,12 @@
   ;; TODO: delete unkown filetypes from filelist 
   (setq filelist (mapcar 'strip-el-ext filelist))
   (mapcar 'load filelist)
+  )
 )
 
 (defun init-shit () "Inittialize Shit IDE environment"
   (log "initializing SHIT . . .")
+  (let (cur-path-list)
   (setq cur-path-list (split-string load-file-name "/"))
   (nbutlast cur-path-list)
   (setq ROOTPATH (concat (mapconcat 'identity cur-path-list "/") "/"))
@@ -50,6 +55,7 @@
   (log (format "lib : %s" LIBPATH))
   (log (format "plugins : %s" PLUGINPATH))
   (log (format "templates : %s" TEMPLATESPATH))
+  )
   
 )