several minor bugs fixed

lib/extensions/editor/about.el

@@ -1,4 +1,4 @@
-
+;; Vars -------------------------------
 (defvar about_fg42_msg "
 FG42 %%VERSION%% Copyright © 2010-2015 Sameer Rahmani <lxsameer@gnu.org>
 FG42 release under the term of GPLv2.
@@ -15,7 +15,7 @@ Credits:
   "About FG42")
 
 
-
+;; Functions ---------------------------
 (defun about/get_string ()
   "Get the about message string"
   (let (msg)
@@ -33,10 +33,8 @@ Credits:
     (view-buffer buf)))
 
 (define-key-after global-map
-                  [menu-bar help-menu about-kuso]
+                  [menu-bar help-menu about-fg42]
 		  '("About FG42" . about-fg42-f)
 		  'about-emacs)
-;(define-key-after global-map [menu-bar help-menu kuso-update-everything] '("Update FG42 (everything)" . el-get-update-all) 'getting-new-versions)
-;(define-key-after global-map [menu-bar help-menu kuso-update] '("Update FG42" . el-get-update) 'fg42-update-everything)
 
 (provide 'extensions/editor/about)

lib/extensions/editor/init.el

@@ -1,3 +1,10 @@
+;; Functions -------------------------------------------------
+
+(defun fg42-reload ()
+  "Reload the entire FG42."
+  (interactive)
+  (load-file (concat (getenv "FG42_HOME") "/fg42-config.el")))
+
 ;;;###autoload
 (defun extension/editor-initialize ()
   "Base plugin initialization."
@@ -10,7 +17,7 @@
   (setq initial-scratch-message nil)
 
 
-  ;; Tramp configuration ---------------------------------------------
+  ;; Tramp configuration -------------------------------------
   (setq tramp-default-method "ssh")
 
   ;; replace strings
@@ -54,6 +61,9 @@
   (global-set-key (kbd "C-<") 'mc/mark-previous-like-this)
   (global-set-key (kbd "C-c C-SPC ") 'mc/mark-all-like-this)
 
+  ;; Reload FG42
+  (define-key global-map (kbd "<f5>") 'fg42-reload)
+
   ;; Key Chord ------------------------------------------------
   ;; (require 'key-chord)
   ;; (key-chord-mode 1)

lib/extensions/editor/version.el

@@ -1,3 +1,4 @@
-(defconst FG42-VERSION "2.0.0")
+(defconst FG42-VERSION "2.31.0"
+  "Global version of FG42")
 
 (provide 'extensions/editor/version)

lib/fg42.el

@@ -2,9 +2,9 @@
 
 ;; Copyright (C) 2015  lxsameer
 
-;; Author: Nic Ferrier <lxsameer@gnu.org>
+;; Author: Sameer Rahmani <lxsameer@gnu.org>
 ;; Keywords: lisp fg42 IDE package manager
-;; Version: 2.67.0
+;; Version: 2.31
 
 ;; 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
@@ -33,4 +33,3 @@
   (initialize-extensions))
 
 (provide 'fg42)
-

lib/fpkg.el

@@ -2,7 +2,7 @@
 
 ;; Copyright (C) 2015  lxsameer
 
-;; Author: Nic Ferrier <lxsameer@gnu.org>
+;; Author: Sameer Rahmani <lxsameer@gnu.org>
 ;; Keywords: lisp fg42 IDE package manager
 ;; Version: 1.0.0
 
@@ -48,7 +48,7 @@
     (dolist (pkg (hash-table-values required-packages))
       (when (not (package-installed-p pkg)) (setq result nil)))
     result))
-    
+
 (defun install--package (pkg)
   "Intall a package via its propreate source."
   (let* ((source (fpkg-dependency-source pkg))
@@ -63,7 +63,7 @@
   (let ((packages (hash-table-values required-packages)))
 
     (require 'package)
-    
+
     (add-to-list 'package-archives
 		 '("melpa" . "http://melpa.milkbox.net/packages/") t)
     (when (< emacs-major-version 24)
@@ -72,21 +72,20 @@
 
     ;; Initialize package.el
     (package-initialize)
-    
+
     (setq url-http-attempt-keepalives nil)
 
     (unless (all-dependencies-installed?)
       ;; check for new packages (package versions)
       (message "%s" "Refreshing package database...")
       (package-refresh-contents)
-      (message "%s" " done.")
 
       ;; install the missing packages
       (dolist (pkg packages)
 	(when (not (package-installed-p (fpkg-dependency-name pkg)))
 	  (install--package pkg))))))
 
-  
+
 
 (defun depends-on (pkgname &rest args)
   "Global function to specify a single dependency"