skeletons/abbrevs

skeletons/abbrevs

[Oliver Lohmann]

Hello,

i've got a problem with making useful
skeletons/abbrevs:

i.e. i define the following function/skeleton-construct:
;;===
(defun myFor(s1 s2 s3)
  (interactive "sSet Var: \nsSet BreakCondition: \nsSet Incr: ")
  (skeleton-insert'(nil
                    >"for(" s1 ";" s2 ";" s3 ")" "{" \n
                    > _ \n
                    > "}" \n
                    )))
;;===

how can i put into my abbrev-list with full functionality?

this entry does not work because of the missing parameters:
;;===
(define-abbrev c-mode-abbrev-table ";for"
  "" 'myFor)
;;===


thanks a lot for your help!

Best regards,
 Oliver Lohmann
____________   ______
\   \~~~\   \  \    /   Fachhochschule Wedel
 \   \   \   \  \  /   Feldstrasse 143
  \   \== \   \==\/   D-22880 Wedel
   \   \   \   \     Fachbereich
    \  /    \  /    Medieninformatik
     \/      \/    http://www.fh-wedel.de/

Re: skeletons/abbrevs

[Oliver Scholz]

Oliver Lohmann <nagash2270@yahoo.de> writes:

> Hello,
>
> i've got a problem with making useful
> skeletons/abbrevs:
>
> i.e. i define the following function/skeleton-construct:
> ;;===
> (defun myFor(s1 s2 s3)
>   (interactive "sSet Var: \nsSet BreakCondition: \nsSet Incr: ")
>   (skeleton-insert'(nil
>                     >"for(" s1 ";" s2 ";" s3 ")" "{" \n
>                     > _ \n
>                     > "}" \n
>                     )))
> ;;===

Use `define-skeleton' instead:

(define-skeleton my-for
  "Insert the skeleton for a for-loop."
  >"for(" 
  (skeleton-read "Set Var: ") ";" 
  (skeleton-read "Set BreakCondition: ") ";" 
  (skeleton-read "Set Incr: ") ")" "{" \n
  > _ \n
  > "}" \n)

(define-abbrev c-mode-abbrev-table "ffor" "" 'my-for)

    Oliver
-- 
6 Floréal an 211 de la Révolution
Liberté, Egalité, Fraternité!