April 2005 - mcclim-devel - mailman3.common-lisp.net

Re: [mcclim-devel] Axiom
by C Y 28 Apr '05

28 Apr '05

I should mention the browser is not the most complicated thing in the world graphically, as it dates from a rather earlier period in interface history. (A few buttons, objects, etc.) I can't produce a screenshot right now because my last install went wonky :-(. CY --- C Y <smustudent1(a)yahoo.com> wrote: > There has been some discussion going on on the Axiom list about > graphics, and Tim Daly made the following interesting remark: > > "I've looked at McClim which is a path I'd dearly love to take but so > far I've not gotten it to work. If someone could reproduce the first > page of the browser (a few buttons, an image) in McClim that might be > enough to get me over the hurdle. A pure lisp solution is preferred." > > How difficult would this be to create (assume current McCLIM skills = > <very small quantity>) ? I would like to take a stab at this (or if > somebody with actual skill does that would be even better) because if > Axiom impliments a GUI in McCLIM it would (IMHO) do a world of good > for > both Axiom and McCLIM. I have gotten McCLIM to work before (though > not > on GCL) and if it's not insanely difficult I'd like to take a shot at > it. > > CY > > __________________________________________________ > Do You Yahoo!? > Tired of spam? Yahoo! Mail has the best spam protection around > http://mail.yahoo.com > _______________________________________________ > mcclim-devel mailing list > mcclim-devel(a)common-lisp.net > http://common-lisp.net/cgi-bin/mailman/listinfo/mcclim-devel > __________________________________________________ Do You Yahoo!? Tired of spam? Yahoo! Mail has the best spam protection around http://mail.yahoo.com

1 0

Re: [mcclim-devel] possible buglet in highlighting shapes
by pw＠snoopy.mv.com 27 Apr '05

27 Apr '05

> I have built a grapher-based tool, that allows me to distinguish > between multiple types of node by using shapes. When I highlight > rectangular nodes, all is well. But I have "roundtangle" nodes, and > when I pass the mouse over them, instead of seeing a box around them, > or a highlight outline around the roundtangle, McCLIM gives me THREE > rectangles, one around the body of the node, and one each around the > semi-circles on the end. You probably want to use :single-box T in with-output-as-presentation. Paul

1 0

[mcclim-devel] A couple of Beagle changes
by Duncan Rose 26 Apr '05

26 Apr '05

The following patch (generated with 'cvs diff -u beagle', which I hope is correct) should modify Beagle so that the following are 'fixed' (i.e. as fixed as they ever get when I do things which is not very ;-) + rectangular tiles + line dashes + patterns (not stencils though) + dispatch repaint when mirror transform is set now untransforms the mirror region by the mirror transformation to hopefully speed things up a little (still veeery slow when the output history is large) beagle/image.lisp can be removed from Beagle, and the lisp-bezier-path.lisp file needs adding. Thanks, -Duncan

1 0

[mcclim-devel] Re: clim-debugger
by Matthew D Swank 26 Apr '05

26 Apr '05

It's not much, but: ;;; -*- Mode: Lisp; Package: COMMON-LISP-USER -*- ;;; ASDF system definition for the clim-debugger. (asdf:defsystem clim-debugger :serial t :components ((:file "clim-debugger"))) -- "You do not really understand something unless you can explain it to your grandmother." — Albert Einstein.

1 0

[mcclim-devel] clim-debugger
by Peter Mechlenborg 26 Apr '05

26 Apr '05

Hi all I finally took some time off to do a bit on the debugger again. It can be found here: http://www.daimi.au.dk/~metch/lisp/clim-debugger.lisp Changes: - A "more button" have been added, so more stack-frames can be viewed if 20 isn't enough. - Scroll-bars have been added, thanks to Elliott Johnson. There's still a small problem though. The scroll-bars do not remember their position when a stack-frame or "more" is pressed. I don't know how to fix this, couldn't find anything in the specs and Clouseau didn't help either. Do anyone of you know how to do this? - Frame variables are viewed with Clouseau when pressed. What do you think? Have fun, -- Peter

5 8

[mcclim-devel] Drawing graphs & scaling
by Thibault Langlois 22 Apr '05

22 Apr '05

Hello, I would like to be able to scale a graph: (defmethod plot ((object tree) stream) (with-scaling (stream 0.7) (draw-graph (list (root-node object)) #'draw-node-colors :stream stream))) where draw-graph is directly inspired from an example in allegro CLIM manual: (defun draw-graph (root-nodes draw-node-function &rest keys) (apply #'format-graph-from-roots root-nodes #'(lambda (node s) (multiple-value-bind () (with-output-as-presentation (s node 'node) (funcall draw-node-function node s)))) #'(lambda (n) (if (visible-p n) (children n))) keys)) and draw-node-colors draws a node using draw-rectangle*. The problem is that when the scaling factor is not 1 the nodes are not correctly placed (although they are correctly scaled) with respect to arcs. Any ideas ? Thanks. Thibault

3 6

[mcclim-devel] How to change color of a text field
by Paolo Amoroso 21 Apr '05

21 Apr '05

How can I change the color of the text displayed in a text field? Does the CLIM specification allow this? Paolo -- Lisp Propulsion Laboratory log - http://www.paoloamoroso.it/log

3 6

[mcclim-devel] keymap switching in McCLIM frame
by glitch 20 Apr '05

20 Apr '05

I heard that i probably get help in this mailing list. I have stumbled on problem with keymap switching in McCLIM frames. What i did: $ clim * (some-loading) * (run-frame-top-level 'any-frame) -> user gesture, that causes setxkbmap -> no reaction ^C (ext:quit) $ clim * (run-frame-top-level 'any-frame) -> typing any keys *trace-output*: lookup-gesture-command: 0 :|cyrillic-<something>| - why now? cmucl19a clx5.2 McCLIM 0.9 Excuse me please for my broken English :( best regards /glitch

1 0

[mcclim-devel] keymap switching in McCLIM frame
by glitch 20 Apr '05

20 Apr '05

I heard that i probably get help in this mailing list. I have stumbled on problem with keymap switching in McCLIM frames. What i did: $ clim * (some-loading) * (run-frame-top-level 'any-frame) -> user gesture, that causes setxkbmap -> no reaction ^C (ext:quit) $ clim * (run-frame-top-level 'any-frame) -> typing any keys *trace-output*: lookup-gesture-command: 0 :|cyrillic-<something>| - why now? cmucl19a clx5.2 McCLIM 0.9 Excuse me please for my broken English :( best regards /glitch

1 0

[mcclim-devel] mcclim.asd patch for Allegro CL
by rpgoldman＠real-time.com 18 Apr '05

18 Apr '05

Here's a patch that causes Allegro (or at least my beloved, increasingly aged ACL 6.2), to load CLX while loading MCCLIM. Per Christophe's instructions on #lisp, consider this to be an official whine to have the patch applied! :-) I don't believe that there's any way this could muck things up for anyone not using ACL, but I am not infallible... R --- mcclim.asd 1 Mar 2005 15:46:13 -0000 1.4 +++ mcclim.asd 18 Apr 2005 17:19:18 -0000 @@ -80,6 +80,25 @@ (defsystem :clim-lisp #+clisp "fix-clisp"))) (:file "package" :depends-on ("Lisp-Dep")))) +;;; possibly this should be further refined to funciton properly for +;;; Allegro on Windows platforms. [2005/04/18:rpg] +#+allegro +(defclass requireable-system (asdf:system) + () + ) + +#+allegro +(defmethod asdf:perform ((op asdf:load-op) (system requireable-system)) + (require (intern (slot-value system 'asdf::name) "KEYWORD"))) + +#+allegro +(defmethod asdf::traverse ((op asdf:load-op) (system requireable-system)) + (list (cons op system))) + +#+allegro +(defsystem :clx + :class requireable-system) + (defsystem :clim-core :depends-on (:clim-lisp) :components ((:file "decls") @@ -216,7 +235,7 @@ (defsystem :clim )) (defsystem :clim-clx - :depends-on (:clim #+(or sbcl openmcl ecl) :clx) + :depends-on (:clim #+(or sbcl openmcl ecl allegro) :clx) :components ((:module "Backends/CLX" :pathname #.(make-pathname :directory '(:relative "Backends" "CLX")) @@ -276,7 +295,7 @@ (defsystem :clim-looks :depends-on (:clim ;; If we're on an implementation that ships CLX, use ;; it. Same if the user has loaded CLX already. - #+(or sbcl openmcl ecl clx) :clim-clx + #+(or sbcl openmcl ecl clx allegro) :clim-clx #+gl :clim-opengl ;; OpenMCL and MCL support the beagle backend (native ;; OS X look&feel on OS X).

1 0