
(d-quote
 (progn
   (setq shell-file-name "c:/Program Files/emacs-23.1/bin/cmdproxy.exe")
   (setq default-directory "d:/home/c++-projects/")
   (shell-command "\"\c:/Program Files/emacs-23.1/bin/etags.exe\" *.el")
   )
 )

(d-quote
  (setq shell-file-name "c:/Program Files/emacs-23.1/bin/cmdproxy.exe")
  (setq default-directory "d:/home/dlisp/")
  (shell-command "\"\c:/Program Files/emacs-23.1/bin/etags.exe\" *.el")
  )

(d-quote
  (setq shell-file-name "c:/Program Files/emacs-23.1/bin/cmdproxy.exe")
  (setq default-directory "d:/home/c++-projects/2006/libd/")
  (shell-command "\"\c:/Program Files/emacs-23.1/bin/etags.exe\" *.hh *.ch *.cc")
  )

;;(visit-tags-table "~/c++-projects/2006/libd/TAGS")

(provide 'd-etags)
;;; d-etags.el ends here
