Find node module at point

ffap-nodejs-module.el

;;; Try to find the string at point as a NodeJS module

(require 'ffap)

(defun ffap-nodejs-module (name)
  (unless (or (string-prefix-p "/" name)
              (string-prefix-p "./" name)
              (string-prefix-p "../" name))
    (let ((base (locate-dominating-file
                 default-directory
                 (lambda (dir)
                   (let ((filename (concat dir "node_modules/" name)))
                     (and (file-exists-p filename)
                          filename))))))
      (and base (concat base "node_modules/" name)))))

(add-to-list 'ffap-alist '(js-mode . ffap-nodejs-module) t)
(add-to-list 'ffap-alist '(js2-mode . ffap-nodejs-module) t)