<commit_before>
(require 'package)

(add-to-list 'package-archives
             '("marmalade" . "http://marmalade-repo.org/packages/"))
(add-to-list 'package-archives
             '("melpa" . "http://melpa.milkbox.net/packages/") t)

(setq package-archive-enable-alist '(("melpa" deft magit)))
(package-initialize)


(defvar xiongyi/packages '(
			  ;ac-slime
                          ;auto-complete
                          autopair
                          ;clojure-mode
                          ;clojure-test-mode
                          ;coffee-mode
                          ;csharp-mode
                          ;deft
                          ;erlang
                          ;feature-mode
                          flycheck
                          gist
                          go-mode
                          graphviz-dot-mode
                          ;haml-mode
                          ;haskell-mode
                          htmlize
                          magit
                          markdown-mode
                          marmalade
                          ;nodejs-repl
                          ;nrepl
                          ;o-blog
                          org
                          paredit
                          ;php-mode
                          ;puppet-mode
                          ;restclient
                          rvm
                          scala-mode
                          smex
                          ;sml-mode
                          ;solarized-theme
                          ;web-mode
                          writegood-mode
                          yaml-mode)
  "Default packages")

(require 'cl)

(defun xiongyi/packages-installed-p ()
  (loop for pkg in xiongyi/packages
        when (not (package-installed-p pkg)) do (return nil)
        finally (return t)))

(unless (xiongyi/packages-installed-p)
  (message "%s" "Refreshing package database...")
  (package-refresh-contents)
  (dolist (pkg xiongyi/packages)
    (when (not (package-installed-p pkg))
      (package-install pkg))))
<commit_msg>select package<commit_after>
(require 'package)

(add-to-list 'package-archives
             '("marmalade" . "http://marmalade-repo.org/packages/"))
(add-to-list 'package-archives
             '("melpa" . "http://melpa.milkbox.net/packages/") t)

(setq package-archive-enable-alist '(("melpa" deft magit)))
(package-initialize)


(defvar xiongyi/packages '(
			  ;ac-slime
                          ;auto-complete
                          autopair
                          ;clojure-mode
                          ;clojure-test-mode
                          ;coffee-mode
                          ;csharp-mode
                          ;deft
                          ;erlang
                          ;feature-mode
                          flycheck
                          gist
                          ;go-mode
                          graphviz-dot-mode
                          ;haml-mode
                          ;haskell-mode
                          htmlize
                          magit
                          markdown-mode
                          marmalade
                          ;nodejs-repl
                          ;nrepl
                          ;o-blog
                          org
                          paredit
                          ;php-mode
                          ;puppet-mode
                          ;restclient
                          ;rvm
                          ;scala-mode
                          smex
                          ;sml-mode
                          ;solarized-theme
                          ;web-mode
                          writegood-mode
                          yaml-mode)
  "Default packages")

(require 'cl)

(defun xiongyi/packages-installed-p ()
  (loop for pkg in xiongyi/packages
        when (not (package-installed-p pkg)) do (return nil)
        finally (return t)))

(unless (xiongyi/packages-installed-p)
  (message "%s" "Refreshing package database...")
  (package-refresh-contents)
  (dolist (pkg xiongyi/packages)
    (when (not (package-installed-p pkg))
      (package-install pkg))))

{'fraction_non_alphanumeric': 0.08469289827255279, 'fraction_numerical': 0.0, 'mean_word_length': 0.8126086956521739, 'pattern_counts': {'":': 0, '<': 3, '<?xml version=': 0, '>': 3, 'https://': 0, 'lorem ipsum': 0, 'www.': 0, 'xml': 0}, 'pii_count': 0, 'substrings_counts': 0, 'word_list_counts': {'cursed_substrings.json': 0, 'profanity_word_list.json': 0, 'sexual_word_list.json': 0, 'zh_pornsignals.json': 0}}
{'dir': 'git-commits-cleaned', 'id': '2319072', 'n_tokens_mistral': 1095, 'n_tokens_neox': 1058, 'n_words': 189}