For what it's worth, I made one simple change to make
the package name interactive in adition to the class
name:put 
"(jde-gen-get-package-statement)"
in place of the 
\"package ;\"
near the top of the template.

Lauren
--- Kevin Mukhar <[EMAIL PROTECTED]> wrote:
> I don't know enough lisp to know if this is the best
> way, but sometime ago
> (from this list I think) someone posted some lisp
> that does what you need.
> After putting the code into my .emacs, I can select
> File/JDE New/Other, then
> press the space bar in the mini buffer to get a
> selection list of the
> templates, from which I can select the Test Class
> template that I have in my
> .emacs.
> 
> The parts of my .emacs that seem to be related to
> creating a junit test class
> are as follows:
> 
> (custom-set-variables
> ;;;other variables from my .emacs not shown
>  '(jde-gen-test-class-buffer-template (quote
> ("(funcall
> jde-gen-boilerplate-function)" "\"package ;\"'>'n"
> "'>'n" "\"import
> junit.framework.*;\"'>'n" "'>'n" "\"/**\" '>'n" "\"
> * \""
> "(file-name-nondirectory buffer-file-name) '>'n" "\"
> *\" '>'n" "\" *\" '>'n"
> "\" * Created: \" (current-time-string) '>'n" "\"
> *\" '>'n" "\" * @author <a
> href=\\\"mailto: \\\"\" (user-full-name)
> \"</a>\"'>'n" "\" * @version\" '>'n" "\" */\" '>'n'"
> "'>'n" "\"public class
> \"" "(file-name-sans-extension
> (file-name-nondirectory
> buffer-file-name))" "\" extends TestCase\"" "(if
> jde-gen-k&r " "()" "'>'n)"
> "\" {\"'>'n'n" "\"public \""
> "(file-name-sans-extension
> (file-name-nondirectory
> buffer-file-name))" "\" (String name)\"" "(if
> jde-gen-k&r " "()" "'>'n)" "\"
> {\"'>'n" "\"super(name);\"" "'>'p'n" "\"}\">"
> "'>'n'n" "\"protected void
> setUp() \"" "(if jde-gen-k&r " "()" "'>'n)"
> "\"{\"'>'n" "\"}\">" "'>'n'n"
> "\"public static Test suite() \"" "(if jde-gen-k&r "
> "()" "'>'n)" "\"{\"'>'n"
> "\"return new TestSuite(\""
> "(file-name-sans-extension (file-name-nondirectory
> buffer-file-name))" "\".class);\"'n" "\"}\">"
> "'>'n'n" "\"public static void
> main(String[] args) \"" "(if jde-gen-k&r " "()"
> "'>'n)" "\"{\"'>'n"
> "\"junit.textui.TestRunner.run(\""
> "(file-name-sans-extension
> (file-name-nondirectory
> buffer-file-name))" "\".class);\"'n" "\"}\">" "'>'n"
> "\"}\">" "'>'n")))
> 
>  '(jde-gen-buffer-templates (quote (("Test Class" .
> jde-gen-test-class)
> ("Class" . jde-gen-class) ("Console" .
> jde-gen-console) ("Swing App" .
> jde-gen-jfc-app))))
> ) ;;;this should close custom-set-variables
> 
> (defcustom jde-gen-test-class-buffer-template
>   (list
>     "(funcall jde-gen-boilerplate-function) '>'n"
>     "\"/**\" '>'n"
>     "\" * \""
>     "(file-name-nondirectory buffer-file-name) '>'n"
>     "\" *\" '>'n"
>     "\" *\" '>'n"
>     "\" * Created: \" (current-time-string) '>'n"
>     "\" *\" '>'n"
>     "\" * @author <a href=\\\"mailto: \\\"\"
> (user-full-name)
> \"</a>\"'>'n"
>     "\" * @version\" '>'n"
>     "\" */\" '>'n'"
>     "'>'n"
>     "\"public class \""
>     "(file-name-sans-extension
> (file-name-nondirectory
> buffer-file-name))"
>     "\" extends TestCase\""
> 
>     "(if jde-gen-k&r "
>      "()"
>      "'>'n)"
>      "\"{\"'>'n'n"
> 
>     "\"public \""
>     "(file-name-sans-extension
> (file-name-nondirectory
> buffer-file-name))"
>     "\" (String name)\""
> 
>     "(if jde-gen-k&r "
>      "()"
>      "'>'n)"
>      "\"{\"'>'n"
> 
>     
>     "\"super(name);\""
>     "'>'p'n"
>     "\"}\">"
>     "'>'n'n"
>     "\"protected void setUp() \""
>     "(if jde-gen-k&r "
>      "()"
>      "'>'n)"
>      "\"{\"'>'n"
> 
>     "'>'p'n"
>     "\"}\">"
>     "'>'n'n"
>     "\"public static Test suite() \""
>     "(if jde-gen-k&r "
>      "()"
>      "'>'n)"
>      "\"{\"'>'n"
>      "\"return new TestSuite(\""
>      "(file-name-sans-extension
> (file-name-nondirectory
> buffer-file-name))"
>      "\".class);\"'n"
>     "'>'p'n"
>     "\"}\">"
>     "'>'n'n"
> 
>     "\"public static void main(String[] args) \""
>     "(if jde-gen-k&r "
>      "()"
>      "'>'n)"
>      "\"{\"'>'n"
>      "\"junit.textui.TestRunner.run(\""
>      "(file-name-sans-extension
> (file-name-nondirectory
> buffer-file-name))"
>      "\".class);\"'n"
>     "'>'p'n"
>     "\"}\">"
>     "'>'n'n"
>     
> 
>     "\"}\">"
>     "\"// \""
>     "(file-name-sans-extension
> (file-name-nondirectory
> buffer-file-name))"
>     "'>'n")
>   "*Template for new Java class.
> Setting this variable defines a template
> instantiation
> command `jde-gen-test-class', as a side-effect."
>   :group 'jde-gen
>   :type '(repeat string)
>   :set '(lambda (sym val)
>          (defalias 'jde-gen-test-class
>            (tempo-define-template
> "java-test-class-buffer-template"
>                       (jde-gen-read-template val)
>                        nil
>                        "Insert a generic Java class
> buffer skeleton."))
>          (set-default sym val)))
> 
> ;;;###autoload
> (defun jde-gen-test-class-buffer (file)
>   "Create a new Java buffer containing a class of
> the same name.
> This command inserts the class template generated by
> `jde-gen-class'.
> It then moves the point to the location to the
> constructor."
>   (interactive "F")
>   (find-file file)
>   (jde-gen-test-class)
>   (beginning-of-buffer)
>   (search-forward "{")
>   (backward-char 1)
>   (c-indent-exp)
>   (tempo-forward-mark))
> 
> 
> Max Rydahl Andersen wrote:
> > 
> > How does one correctly register a new template so
> it will be available via
> > the Files/JDE New/Other... ?


__________________________________________________
Do You Yahoo!?
Make international calls for as low as $.04/minute with Yahoo! Messenger
http://phonecard.yahoo.com/

Reply via email to