General refactor

core/defuns/defuns-file.el

@@ -34,10 +34,10 @@ provided."
   (let ((dir (f-dirname path))
         (fullpath (f-full path))
         (is-auto t))
-    (when (and bang (not (file-exists-p dir)))
-      (f-mkdir dir))
-    (if (file-exists-p dir)
-        (if (file-exists-p fullpath)
+    (when (and bang (not (f-exists? dir)))
+      (mkdir dir))
+    (if (f-exists? dir)
+        (if (f-exists? fullpath)
             (error "File already exists: %s" path)
           (find-file fullpath)
           (add-hook 'yas-after-exit-snippet-hook 'narf--save-exit)

core/defuns/defuns-nlinum.el

@@ -7,6 +7,12 @@
       (narf|nlinum-disable)
     (narf|nlinum-enable)))
 
+;;;###autoload
+(defun narf|nlinum-enable ()
+  (nlinum-mode +1)
+  (add-hook 'post-command-hook 'narf|nlinum-hl-line nil t)
+  (narf|nlinum-unhl-line))
+
 ;;;###autoload
 (defun narf|nlinum-disable ()
   (nlinum-mode -1)