4 '(("project-name" . "eproject-0.2")))
7 '(("Previous File" "-e eproject-prevfile" "M-left")
8 ("Next File" "-e eproject-nextfile" "M-right")
10 ("Hello World" "echo \"Hello World!\"" "f1")
11 ("World Search" "-e (world-search-forward)" "f2")
13 ("Explore Project" "nautilus --browser `pwd` &")
14 ("XTerm In Project" "xterm &")
18 '(("eproject.txt" 1 1)
20 ("eproject-config.el" 1 1)
25 (defun world-search-forward nil
26 (info "(emacs)word search")
28 (generate-new-buffer "*World Search*"))
29 (insert-buffer "*info*")
32 (re-search-forward "word" nil t)
33 (replace-match "world"))))
38 (list (list (prj-getconfig "project-name")
44 '(lambda () (message " *** Welcome to eproject ***"))