<commit_before>;;; This file is part of <NAME> <<EMAIL>> home.
;(add-to-list 'load-path "~/share/emacs/site-lisp")

(custom-set-variables
  ;; custom-set-variables was added by Custom.
  ;; If you edit it by hand, you could mess it up, so be careful.
  ;; Your init file should contain only one such instance.
  ;; If there is more than one, they won't work right.
 '(safe-local-variable-values (quote ((encoding . utf-8)))))

;;; el-get <http://github.com/dimitri/el-get>.
(add-to-list 'load-path "~/.emacs.d/el-get/el-get")
;; (require 'el-get)
(unless (require 'el-get nil t)
  (url-retrieve
   "https://raw.github.com/dimitri/el-get/master/el-get-install.el"
   (lambda (s)
     (goto-char (point-max))
     (eval-print-last-sexp))))
(setq el-get-sources
      '(
        (:name deft
               :after (progn
                        (setq
                         deft-extension "org"
                         deft-text-mode 'org-mode)))
        ;; (:name visws
        ;;        :type emacswik)
        (:name markdown-mode
               :after (progn
                        (add-hook 'markdown-mode-hook
                                  (lambda ()(setq truncate-lines t)))
                        (setq auto-mode-alist
                              (cons '("/README\\'" . markdown-mode)
                                    auto-mode-alist))
                        ;; Mutt temporary files.
                        (setq auto-mode-alist
                              (cons
                               '("/mutt[-a-zA-Z0-9]+\\'" . markdown-mode)
                               auto-mode-alist))))
        (:name less
               :after (progn
                        (add-hook 'find-file-hook
                                  '(lambda ()
                                     (when buffer-read-only
                                       (less-minor-mode-on))))
                        (global-set-key (kbd "ESC ESC ESC")
                                        'less-minor-mode))
               :type git
               :url "git://github.com/emacsmirror/less.git")
        ;; (:name sass-mode
        ;;        ;; :post-init (lambda ()
        ;;        ;;              (add-to-list 'auto-mode-alist '("\\.scss$" . sass-mode)))
        ;;        :features sass-mode)
        (:name scss-mode
               :after (progn
                        (setq scss-compile-at-save nil)))
        (:name lua-mode
               :after (progn
                        (add-to-list 'auto-mode-alist
                                     '("\\.ws\\'" . lua-mode))
                        ;; <http://lua-users.org/wiki/LuaStyleGuide>,
                        ;; <http://stackoverflow.com/questions/4643206/how-to-configure-indentation-in-emacs-lua-mode#answer-4652043>
                        (setq lua-indent-level 2)))
        ;; (:name lua2-mode
        ;;        :type http
        ;;        ;; :after (lambda ()
        ;;        ;;          (autoload 'lua2-mode "lua2-mode"
        ;;        ;;            "semantic highlighting extension for lua-mode" t))
        ;;        :url "http://www.enyo.de/fw/software/lua-emacs/lua2-mode.el")
        (:name findr
               :type git
               :url "git://github.com/emacsmirror/findr.git")
        (:name window-numbering
               :type git
               :url "git://github.com/nschum/window-numbering.el.git"
               :after (progn
                        (autoload 'window-numbering-mode
                          "window-numbering"
                          "Numbered window shortcuts" t)
                        ;; <http://blog.binchen.org/?p=512#sec-1>.
                        (custom-set-faces
                         '(window-numbering-face
                           ((t (:foreground "brightmagenta" :background "brightwhite" :weight normal :underline nil)))))
                        (window-numbering-mode 1)))
        ;; ;; <http://www.nongnu.org/color-theme>.
        ;; (:name color-theme)
        ;; (:name color-theme-zenburn
        ;;        :features zenburn
        ;;        :after (progn
        ;;                 (color-theme-zenburn)))
        ;; (:name bongo
        ;;        :type git
        ;;        :url "git://github.com/dbrock/bongo.git"<commit_msg>emacs one more<commit_after>;;; This file is part of <NAME> <<EMAIL>> home.
;(add-to-list 'load-path "~/share/emacs/site-lisp")

(custom-set-variables
  ;; custom-set-variables was added by Custom.
  ;; If you edit it by hand, you could mess it up, so be careful.
  ;; Your init file should contain only one such instance.
  ;; If there is more than one, they won't work right.
 '(safe-local-variable-values (quote ((encoding . utf-8)))))

;;; el-get <http://github.com/dimitri/el-get>.
(add-to-list 'load-path "~/.emacs.d/el-get/el-get")
;; (require 'el-get)
(unless (require 'el-get nil t)
  (url-retrieve
   "https://raw.github.com/dimitri/el-get/master/el-get-install.el"
   (lambda (s)
     (goto-char (point-max))
     (eval-print-last-sexp))))
(setq el-get-sources
      '(
        (:name deft
               :after (progn
                        (setq
                         deft-extension "org"
                         deft-text-mode 'org-mode)))
        ;; (:name visws
        ;;        :type emacswik)
        (:name markdown-mode
               :after (progn
                        (add-hook 'markdown-mode-hook
                                  (lambda ()(setq truncate-lines t)))
                        (setq auto-mode-alist
                              (cons '("/README\\'" . markdown-mode)
                                    auto-mode-alist))
                        ;; Mutt temporary files.
                        (setq auto-mode-alist
                              (cons
                               '("/mutt[-a-zA-Z0-9]+\\'" . markdown-mode)
                               auto-mode-alist))))
        (:name less
               :after (progn
                        (add-hook 'find-file-hook
                                  '(lambda ()
                                     (when buffer-read-only
                                       (less-minor-mode-on))))
                        (global-set-key (kbd "ESC ESC ESC")
                                        'less-minor-mode))
               :type git
               :url "git://github.com/emacsmirror/less.git")
        ;; (:name sass-mode
        ;;        ;; :post-init (lambda ()
        ;;        ;;              (add-to-list 'auto-mode-alist '("\\.scss$" . sass-mode)))
        ;;        :features sass-mode)
        (:name scss-mode
               :after (progn
                        (setq scss-compile-at-save nil)))
        (:name lua-mode
               :after (progn
                        (add-to-list 'auto-mode-alist
                                     '("\\.ws\\'" . lua-mode))
                        ;; <http://lua-users.org/wiki/LuaStyleGuide>,
                        ;; <http://stackoverflow.com/questions/4643206/how-to-configure-indentation-in-emacs-lua-mode#answer-4652043>
                        (setq lua-indent-level 2)))
        ;; (:name lua2-mode
        ;;        :type http
        ;;        ;; :after (lambda ()
        ;;        ;;          (autoload 'lua2-mode "lua2-mode"
        ;;        ;;            "semantic highlighting extension for lua-mode" t))
        ;;        :url "http://www.enyo.de/fw/software/lua-emacs/lua2-mode.el")
        (:name findr
               :type git
               :url "git://github.com/emacsmirror/findr.git")
        (:name window-numbering
               :type git
               :url "git://github.com/nschum/window-numbering.el.git"
               :after (progn
                        (autoload 'window-numbering-mode
                          "window-numbering"
                          "Numbered window shortcuts" t)
                        ;; <http://blog.binchen.org/?p=512#sec-1>.
                        (custom-set-faces
                         '(window-numbering-face
                           ((t (:foreground "brightmagenta" :background nil :weight normal :underline nil)))))
                        (window-numbering-mode 1)))
        ;; ;; <http://www.nongnu.org/color-theme>.
        ;; (:name color-theme)
        ;; (:name color-theme-zenburn
        ;;        :features zenburn
        ;;        :after (progn
        ;;                 (color-theme-zenburn)))
        ;; (:name bongo
        ;;        :type git
        ;;        :url "git://github.com/dbrock/bongo.git"
{'fraction_non_alphanumeric': 0.14028903771589707, 'fraction_numerical': 0.00634473034896017, 'mean_word_length': 1.1285321330332583, 'pattern_counts': {'":': 0, '<': 19, '<?xml version=': 0, '>': 19, 'https://': 2, 'lorem ipsum': 0, 'www.': 4, 'xml': 0}, 'pii_count': 0, 'substrings_counts': 0, 'word_list_counts': {'cursed_substrings.json': 14, 'profanity_word_list.json': 0, 'sexual_word_list.json': 0, 'zh_pornsignals.json': 0}}
{'dir': 'git-commits-cleaned', 'id': '868799', 'n_tokens_mistral': 2592, 'n_tokens_neox': 2376, 'n_words': 465}