Fixed and checked into the trunk.
Thanks for spotting this.
On Jan 11, 2010, at 12:49 PM, Daniel Flesner wrote:
>
> it appears to have been broken in change #192.
>
> Debugger entered--Lisp error: (invalid-function " * Describe class ")
> (" * Describe class " (file-name-sans-extension (file-name-
> nondirectory buffer-file-name)) " here." (quote n) " " (jde-javadoc-
> insert-empty-line) " " (jde-javadoc-insert-empty-line) " * Created:
> " (current-time-string) (quote n) " " (jde-javadoc-insert-empty-
> line) " " (jde-gen-save-excursion (jde-javadoc-insert ...)) " " (jde-
> gen-save-excursion (jde-javadoc-insert ...)) " " (jde-javadoc-insert-
> end-block))
> (progn (progn (require ...) (jde-javadoc-insert-start-block))
> (quote l) (" * Describe class " (file-name-sans-extension ...) "
> here." (quote n) " " (jde-javadoc-insert-empty-line) " " (jde-
> javadoc-insert-empty-line) " * Created: " (current-time-string)
> (quote n) " " (jde-javadoc-insert-empty-line) " " (jde-gen-save-
> excursion ...) " " (jde-gen-save-excursion ...) " " (jde-javadoc-
> insert-end-block)))
> (if jde-gen-create-javadoc (progn (progn ... ...) (quote l) (" *
> Describe class " ... " here." ... " " ... " " ... " * Created:
> " ... ... " " ... " " ... " " ... " " ...)))
> (when jde-gen-create-javadoc (progn (require ...) (jde-javadoc-
> insert-start-block)) (quote l) (" * Describe class " (file-name-sans-
> extension ...) " here." (quote n) " " (jde-javadoc-insert-empty-
> line) " " (jde-javadoc-insert-empty-line) " * Created: " (current-
> time-string) (quote n) " " (jde-javadoc-insert-empty-line) " " (jde-
> gen-save-excursion ...) " " (jde-gen-save-excursion ...) " " (jde-
> javadoc-insert-end-block)))
> eval((when jde-gen-create-javadoc (progn (require ...) (jde-javadoc-
> insert-start-block)) (quote l) (" * Describe class " (file-name-sans-
> extension ...) " here." (quote n) " " (jde-javadoc-insert-empty-
> line) " " (jde-javadoc-insert-empty-line) " * Created: " (current-
> time-string) (quote n) " " (jde-javadoc-insert-empty-line) " " (jde-
> gen-save-excursion ...) " " (jde-gen-save-excursion ...) " " (jde-
> javadoc-insert-end-block))))
> ad-Orig-tempo-insert((when jde-gen-create-javadoc (progn
> (require ...) (jde-javadoc-insert-start-block)) (quote l) (" *
> Describe class " (file-name-sans-extension ...) " here." (quote n) "
> " (jde-javadoc-insert-empty-line) " " (jde-javadoc-insert-empty-
> line) " * Created: " (current-time-string) (quote n) " " (jde-
> javadoc-insert-empty-line) " " (jde-gen-save-excursion ...) " " (jde-
> gen-save-excursion ...) " " (jde-javadoc-insert-end-block))) nil)
> tempo-insert((when jde-gen-create-javadoc (progn (require ...) (jde-
> javadoc-insert-start-block)) (quote l) (" * Describe class " (file-
> name-sans-extension ...) " here." (quote n) " " (jde-javadoc-insert-
> empty-line) " " (jde-javadoc-insert-empty-line) " * Created:
> " (current-time-string) (quote n) " " (jde-javadoc-insert-empty-
> line) " " (jde-gen-save-excursion ...) " " (jde-gen-save-
> excursion ...) " " (jde-javadoc-insert-end-block))) nil)
> #[(elt) "Â \"" [elt on-region tempo-insert] 3]((when jde-gen-
> create-javadoc (progn (require ...) (jde-javadoc-insert-start-
> block)) (quote l) (" * Describe class " (file-name-sans-
> extension ...) " here." (quote n) " " (jde-javadoc-insert-empty-
> line) " " (jde-javadoc-insert-empty-line) " * Created: " (current-
> time-string) (quote n) " " (jde-javadoc-insert-empty-line) " " (jde-
> gen-save-excursion ...) " " (jde-gen-save-excursion ...) " " (jde-
> javadoc-insert-end-block))))
> mapc(#[(elt) "Â \"" [elt on-region tempo-insert] 3] ((funcall jde-
> gen-boilerplate-function) (jde-gen-get-package-statement) (when jde-
> gen-create-javadoc (progn ... ...) (quote l) (" * Describe class
> " ... " here." ... " " ... " " ... " * Created: " ... ... " " ... "
> " ... " " ... " " ...)) "public class " (file-name-sans-extension
> (file-name-nondirectory buffer-file-name)) " " (jde-gen-get-extend-
> class) (jde-gen-electric-brace) (quote p) (quote n) "}" > (if jde-
> gen-comments (concat " // " ...)) (quote >) (quote n) (progn (tempo-
> backward-mark) (jde-gen-save-excursion ...) (jde-gen-save-
> excursion ...)) (progn (re-search-forward "^[ ]*$") (setq tempo-
> marks nil) nil)))
> ad-Orig-tempo-insert-template(tempo-template-java-class-buffer-
> template nil)
> tempo-insert-template(tempo-template-java-class-buffer-template nil)
> tempo-template-java-class-buffer-template()
> jde-gen-class()
> call-interactively(jde-gen-class t nil)
> execute-extended-command(nil)
> call-interactively(execute-extended-command nil nil)
>
> ------------------------------------------------------------------------------
> This SF.Net email is sponsored by the Verizon Developer Community
> Take advantage of Verizon's best-in-class app development support
> A streamlined, 14 day to market process makes app distribution fast
> and easy
> Join now and get one step closer to millions of Verizon customers
> http://p.sf.net/sfu/verizon-dev2dev
> _______________________________________________
> jdee-devel mailing list
> jdee-devel@lists.sourceforge.net
> https://lists.sourceforge.net/lists/listinfo/jdee-devel
------------------------------------------------------------------------------
This SF.Net email is sponsored by the Verizon Developer Community
Take advantage of Verizon's best-in-class app development support
A streamlined, 14 day to market process makes app distribution fast and easy
Join now and get one step closer to millions of Verizon customers
http://p.sf.net/sfu/verizon-dev2dev
_______________________________________________
jdee-devel mailing list
jdee-devel@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/jdee-devel
