(defun setup-asy ()
  (let ((texmf-dist (substring (shell-command-to-string "kpsewhich -var-value TEXMFDIST 2>/dev/null")
			       0 -1)))
    (when texmf-dist
      (setq asy-mode-path (concat texmf-dist "/asymptote"))
      (add-to-list 'load-path asy-mode-path)
      (load-file (concat asy-mode-path "/asy-init.el")))))

(register-mypkg
 (list :name "asy"
       :enabled (which "asy")
       :packages nil
       :init #'setup-asy))