Hermes is ready. Did some polishing and updated TODOs.
This commit is contained in:
parent
044e36ff5d
commit
c80ebe3c16
@ -9,9 +9,6 @@
|
|||||||
|
|
||||||
;Object stuff
|
;Object stuff
|
||||||
; TODO make different objects threadable send button vs text area vs canvas
|
; TODO make different objects threadable send button vs text area vs canvas
|
||||||
; TODO gui is just a relay remember
|
|
||||||
; TODO create a dialog to ask user for his username. This should be wrapped in a
|
|
||||||
; function get-username that we can call
|
|
||||||
|
|
||||||
(provide make-gui)
|
(provide make-gui)
|
||||||
|
|
||||||
@ -200,7 +197,8 @@
|
|||||||
(define name "Me")
|
(define name "Me")
|
||||||
(define min-h-size 80)
|
(define min-h-size 80)
|
||||||
(define min-v-size 30)
|
(define min-v-size 30)
|
||||||
(define listy (list (list "Server" "Connected" "Red" 0))) ; initializes
|
;(define listy (list (list "Server" "Connected" "Red" 0))) ; initializes
|
||||||
|
(define listy '())
|
||||||
; listy with first message to be drawn on screen
|
; listy with first message to be drawn on screen
|
||||||
; wrap in closure
|
; wrap in closure
|
||||||
(define my-color "black") ; default color of the text messages if none
|
(define my-color "black") ; default color of the text messages if none
|
||||||
@ -225,7 +223,8 @@
|
|||||||
#f))))
|
#f))))
|
||||||
(set! my-color returned)
|
(set! my-color returned)
|
||||||
returned)
|
returned)
|
||||||
(define height 15) ; height between messages drawn on the screen
|
(define height 0) ; determines starting height
|
||||||
|
; TODO create height variable that stores the height/space between messages
|
||||||
|
|
||||||
;; prompt user for username
|
;; prompt user for username
|
||||||
;; could randomly assign a user
|
;; could randomly assign a user
|
||||||
|
@ -1,5 +1,5 @@
|
|||||||
FEATURES
|
FEATURES
|
||||||
5. parser in the client side should do something similar (/color, /quit)
|
need to pass color settings between users
|
||||||
16. plain tcp -> ssl based
|
16. plain tcp -> ssl based
|
||||||
***17. fix breaks for improper disconnects from clients
|
***17. fix breaks for improper disconnects from clients
|
||||||
18. Add topics after project completion
|
18. Add topics after project completion
|
||||||
|
Loading…
Reference in New Issue
Block a user