Warn of missing customization for grep.el on Windows

init.el

@@ -3172,6 +3172,14 @@ eventuelly be set to nil, however)."
           ((nil) (warn "Server not running, check logs and restart manually."))
           (t (warn "`server-running-p' returned neither nil nor t.  Check and restart server manually if required."))))))
 
+  ;; Warn of Windows pecularitites
+
+  (when on-windows
+    ;; Warn if `find-program' in `grep.el' is the default, because this might be the CMD's FIND.
+    (when (and (require 'grep nil t)
+               (string= find-program "find"))
+      (warn (concat "`find-program' points to \"find\", which might be CMD's FIND; please customize this variable to point to an implementation of GNU find instead"))))
+
   ;; Load custom code
 
   (dolist (file db/after-init-load-files)