added stuff for windows-nt

init.org

@@ -114,6 +114,19 @@
   (tool-bar-mode 0)  ;; disable tool bar
   (scroll-bar-mode 0)  ;; disable scroll bar
 #+END_SRC
+
+Some windows specific stuff
+#+BEGIN_SRC emacs-lisp
+  (when (eq system-type 'windows-nt)
+    (remove-hook 'find-file-hooks 'vc-refresh-state)
+    (progn
+      (setq gc-cons-threshold (* 511 1024 1024)
+            gc-cons-percentage 0.5
+            garbage-collection-messages t
+            w32-pipe-read-delay 0
+            w32-get-true-file-attributes nil)
+      (run-with-idle-timer 5 t #'garbage-collect)))
+#+END_SRC
 * visuals
 ** Font
 #+BEGIN_SRC emacs-lisp