At 12:47 PM 10/4/00 -0400, Brad Giaccio wrote:
>Paul,
>This sounds nice but could you make the default nil instead of 't
Okay.
- Paul
>Brad
>
>On Wed, Sep 20, 2000 at 10:01:16PM +0000, Paul Kinnucan wrote:
> > At 10:38 AM 9/20/00 -0400, Jason Stell wrote:
> > >I'm resending the message below, because I don't think it went through
> > >previously... (sorry if this is a dup)
> > >============================================
> > >
> > > Below is a patch to jde-wiz.el that I have created to add
> > >functionality to automatically sort the list of import
> > > statements when a new one is programmatically added. There is a new
> > >custom variable called
> > > jde-auto-sort-imports that defaults to 't'. I also added changes to
> > >preserve the current location in the buffer
> > > when the new statement is added.
> > >
> > > FWIW: Hope someone else finds this useful.
> > >
> >
> > Hi Jason,
> >
> > Thanks for this enhancement. I will include it in the next release.
> >
> > - Paul
> >
> > >
> > > Regards and Thanks!
> > >
> > > Jason Stell
> > > ====================================================
> > >
> > > *** jde-wiz.el_orig Tue Sep 19 00:57:54 2000
> > > --- jde-wiz.el Tue Sep 19 08:38:57 2000
> > > ***************
> > > *** 38,43 ****
> > > --- 38,53 ----
> > > ;; end JVL enhancement contributed by Jim LoVerde <[EMAIL PROTECTED]>
> > >
> > >
> > > + ;; auto sorting of import statements
> > > + (defcustom jde-auto-sort-imports t
> > > + "*Automatically resort import statements after a jde-wiz-import.
> > > + If non-nil, the JDE automatically resorts the import statements when
> > >a new import statement is added using
> > > jde-wiz-import or jde-wiz-find-and-import."
> > >
> > > + :group 'jde-project
> > > + :type 'boolean
> > > + )
> > > + ;;
> > > +
> > > +
> > > (defun jde-wiz-update-class-list()
> > > "Update the class list used to resolve class names.
> > > The first time you invoke a JDE wizard, the JDE builds a list of all
> > >classes on the classpath
> > > ***************
> > > *** 229,241 ****
> > > (setq i 0)
> > > (setq n (length new-imports))
> > > (while (< i n)
> > > (let ((new-import
> > > (nth i new-imports)))
> > > (progn
> > > (insert
> > > (concat "import " new-import ";\n"))
> > > (message "Imported %s" new-import))
> > > ! (setq i (+ i 1)))))))
> > >
> > >
> > > (defun jde-wiz-strip-existing-imports (new-imports existing-imports)
> > >
> > > --- 239,255 ----
> > > (setq i 0)
> > > (setq n (length new-imports))
> > > (while (< i n)
> > > + (let (deactivate-mark) t)
> > > (let ((new-import
> > > (nth i new-imports)))
> > > (progn
> > > (insert
> > > (concat "import " new-import ";\n"))
> > > (message "Imported %s" new-import))
> > > ! (setq i (+ i 1)))
> > > ! (if jde-auto-sort-imports
> > > ! (jde-sort-imports))
> > > ! ))))
> > >
> > >
> > > (defun jde-wiz-strip-existing-imports (new-imports existing-imports)
> > >
> > >
> > >
> > >Attachment Converted: "g:\eudora\attach\jason.stell.vcf"
> > >
>
>--
>--- There are two kinds of knowledge, you either know the answer or
> you know where to find it
> -Kane, Johnson, and anonymous
