<commit_before>;; (setq user-emacs-directory "sandbox")
;; (setq pacakge-user-dir "sandbox/elpa")

(setq user-emacs-directory (getenv "USER_DIRECTORY"))
(setq pacakge-user-dir     (getenv "PACKAGE_DIR"))
;; (setq default-directory    (getenv "DEFAULT_DIRECTORY"))

(setq package-archives
      '(
	
	;;("melpa" . "https://melpa.milkbox.net/packages/")
	;;("popkit" . "http://elpa.popkit.org/packages/")
	("melpa" . "https://melpa.org/packages/")
	
	("org"       . "http://orgmode.org/elpa/")
	("gnu"       . "http://elpa.gnu.org/packages/")

	("marmalade" .  "http://marmalade-repo.org/packages/")))

(package-initialize)

(defun packages-require (&rest packs)
  "Install and load a package. If the package is not available
installs it automaticaly."
  (mapc  (lambda (package)
           (unless (package-installed-p package)
                   (package-install package)    
                   ;;#'package-require
                   ))
         packs        
         ))

(unless (file-exists-p "sandbox/elpa")
  (package-refresh-contents))

(unless (package-installed-p 'org-wiki)
  (package-install-file "org-wiki.el"))

(setq org-wiki-location (getenv "ORG_WIKI_LOCATION"))


(unless (file-exists-p org-wiki-location)
  (mkdir org-wiki-location))

(defun test-sandbox ()
  "Test if the sandbox is working."
  (interactive)
  (insert (concat "user-emacs-directory = "  user-emacs-directory "\n" ))
  (insert (concat "user-init-file = "        user-init-file "\n" ))
  (insert (concat "package-user-dir = "      package-user-dir "\n" ))
  <commit_msg>Update sandbox/init.el.<commit_after>;; (setq user-emacs-directory "sandbox")
;; (setq pacakge-user-dir "sandbox/elpa")

(setq user-emacs-directory (getenv "USER_DIRECTORY"))
(setq pacakge-user-dir     (getenv "PACKAGE_DIR"))
;; (setq default-directory    (getenv "DEFAULT_DIRECTORY"))

(setq package-archives
      '(
	
	;;("melpa" . "https://melpa.milkbox.net/packages/")
	;;("popkit" . "http://elpa.popkit.org/packages/")
	("melpa" . "https://melpa.org/packages/")
	
	("org"       . "http://orgmode.org/elpa/")
	("gnu"       . "http://elpa.gnu.org/packages/")

	;; ("marmalade" .  "http://marmalade-repo.org/packages/")

    ))

(package-initialize)

(defun packages-require (&rest packs)
  "Install and load a package. If the package is not available
installs it automaticaly."
  (mapc  (lambda (package)
           (unless (package-installed-p package)
                   (package-install package)    
                   ;;#'package-require
                   ))
         packs        
         ))

(unless (file-exists-p "elpa")
  (package-refresh-contents))

(unless (package-installed-p 'org-wiki)
  (package-install-file "../org-wiki.el"))

(setq org-wiki-location (getenv "ORG_WIKI_LOCATION"))


(unless (file-exists-p org-wiki-location)
  (mkdir org-wiki-location))

(defun test-sandbox ()
  "Test if the sandbox is working."
  (interactive)
  (insert (concat "user-emacs-directory = "  user-emacs-directory "\n" ))
  (insert (concat "user-init-file = "        user-init-file "\n" ))
  (insert (concat "package-user-dir = "      package-user-dir "\n" ))
  
{'fraction_non_alphanumeric': 0.1753205128205128, 'fraction_numerical': 0.0, 'mean_word_length': 2.815403422982885, 'pattern_counts': {'":': 0, '<': 3, '<?xml version=': 0, '>': 3, 'https://': 4, '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': '3255208', 'n_tokens_mistral': 1139, 'n_tokens_neox': 1089, 'n_words': 209}