optimal skeleton definition

optimal skeleton definition

[Martin Slouf]

hi,

being not an elisp expert i wrote this kind of skeleton to simplify my java
getter/setter generation, which is later bound to some abbrev to be expanded
automatically.

- - - -

(define-skeleton java-getter-setter
  "inserts java getter/setter pair"
  nil (setq v1 (skeleton-read "Input Java type: "))
  nil (setq v2 (skeleton-read "Input property name: "))
  (setq method-part-name (concat (upcase (substring v2 0 1)) (substring v2 1)))
  nil >"public " v1 " get" method-part-name "() {"?\n
  >"return this." v2 ";"?\n
  "}">""?\n\n
  >"public void set" method-part-name "(" v1 " " v2 ") {"?\n
  >"this." v2 " = " v2 ";"?\n
  "}">)

- - - -

the problem of the code above is, that (setq ...) functions always return a
value and that value is printed into a buffer.  Is there a chance not to print
the value of the setq s-expression to the buffer?

thanks.  martin

Re: optimal skeleton definition

[Stefan Monnier]

> being not an elisp expert i wrote this kind of skeleton to simplify my java
> getter/setter generation, which is later bound to some abbrev to be expanded
> automatically.

> - - - -

> (define-skeleton java-getter-setter
>   "inserts java getter/setter pair"
>   nil (setq v1 (skeleton-read "Input Java type: "))
>   nil (setq v2 (skeleton-read "Input property name: "))
>   (setq method-part-name (concat (upcase (substring v2 0 1)) (substring v2 1)))
>   nil >"public " v1 " get" method-part-name "() {"?\n
>> "return this." v2 ";"?\n
>   "}">""?\n\n
>> "public void set" method-part-name "(" v1 " " v2 ") {"?\n
>> "this." v2 " = " v2 ";"?\n
>   "}">)

> - - - -

> the problem of the code above is, that (setq ...) functions always return
> a value and that value is printed into a buffer.  Is there a chance not to
> print the value of the setq s-expression to the buffer?

Quote your setq.  I.e. use

            '(setq foo bar)
instead of
            (setq foo bar)


-- Stefan

Re: optimal skeleton definition: solved

[Martin Slouf]

thanks a lot. m.

On Sun, Jan 08, 2006 at 11:07:13PM -0500, Stefan Monnier wrote:
> > being not an elisp expert i wrote this kind of skeleton to simplify my java
> > getter/setter generation, which is later bound to some abbrev to be expanded
> > automatically.
> 
> > - - - -
> 
> > (define-skeleton java-getter-setter
> >   "inserts java getter/setter pair"
> >   nil (setq v1 (skeleton-read "Input Java type: "))
> >   nil (setq v2 (skeleton-read "Input property name: "))
> >   (setq method-part-name (concat (upcase (substring v2 0 1)) (substring v2 1)))
> >   nil >"public " v1 " get" method-part-name "() {"?\n
> >> "return this." v2 ";"?\n
> >   "}">""?\n\n
> >> "public void set" method-part-name "(" v1 " " v2 ") {"?\n
> >> "this." v2 " = " v2 ";"?\n
> >   "}">)
> 
> > - - - -
> 
> > the problem of the code above is, that (setq ...) functions always return
> > a value and that value is printed into a buffer.  Is there a chance not to
> > print the value of the setq s-expression to the buffer?
> 
> Quote your setq.  I.e. use
> 
>             '(setq foo bar)
> instead of
>             (setq foo bar)
> 
> 
> -- Stefan
> _______________________________________________
> help-gnu-emacs mailing list
> help-gnu-emacs@gnu.org
> http://lists.gnu.org/mailman/listinfo/help-gnu-emacs