Size: a a a

Emacs — русскоговорящее сообщество

2020 July 19

C

C22 in Emacs — русскоговорящее сообщество
паприколу
источник

C

C22 in Emacs — русскоговорящее сообщество
ну типа как мем
источник

VY

Vasiliy Yorkin in Emacs — русскоговорящее сообщество
Надо глянуть, я давно не смотрел что там)
источник

S

Shizoid in Emacs — русскоговорящее сообщество
Не ошибся?
источник

PG

Pig Greenest in Emacs — русскоговорящее сообщество
эти товарищи не тегают patch версии, т. е. последняя 1.6.6, но последний тег в репе 1.6.0
источник

PG

Pig Greenest in Emacs — русскоговорящее сообщество
источник

A

Artem in Emacs — русскоговорящее сообщество
Shizoid
Не ошибся?
Всё верно
источник

S

Shizoid in Emacs — русскоговорящее сообщество
Всё круто
источник

PG

Pig Greenest in Emacs — русскоговорящее сообщество
хз, а в чем профит?
источник

P1

Peter 11111000000 in Emacs — русскоговорящее сообщество
декларативненько:
(tui-define-component my-message
 :documentation
 "Message containing other components"
 :render
 (lambda ()
   (let ((name (plist-get (tui-get-props) :name)))
     (list (hello :name name)
           "\n------------\n"
           (tui-demo-basic-question)
           "\nmake "
           (basic-counter :start-value 0)
           " widgets!"))))

(tui-define-component tui-demo-basic-counter
 :documentation
 "Basic counter control"
 :get-initial-state
 (lambda ()
   (or (plist-get (tui-get-props) :start-value)
       0))
 :render
 (lambda ()
   (lexical-let ((counter (tui-get-state))
                 (component component))
     (cl-flet ((incr-counter () (interactive) (tui--set-state component (+ 1 counter)))
               (decr-counter () (interactive) (tui--set-state component (- counter 1))))
       (list counter
             " "
             (propertize "⏶"
                         'keymap
                         ;;`(keymap (down-mouse-1 . ,(lambda () (interactive) (tui-set-state 5)))))
                         `(keymap (down-mouse-1 . ,#'incr-counter)))
             (propertize "⏷"
                         'keymap
                          `(keymap (down-mouse-1 . ,#'decr-counter))))))))
источник

P1

Peter 11111000000 in Emacs — русскоговорящее сообщество
компонентненько
источник

P1

Peter 11111000000 in Emacs — русскоговорящее сообщество
не, я понимаю, что это всё необязательно, но после того как попишешь на React лет 5, мозг навсегда ломается )
источник

P1

Peter 11111000000 in Emacs — русскоговорящее сообщество
...кратко говоря, императивное ооп юай ломает после декларативного фп, т.о. я понимаю и автора TUI
источник

D

Dameda in Emacs — русскоговорящее сообщество
Pig Greenest
так у вас есть tdlib
С линковкой либ в нихоси много приколов
источник

P1

Peter 11111000000 in Emacs — русскоговорящее сообщество
о да. точнее, один сплошной прикол...
источник

PG

Pig Greenest in Emacs — русскоговорящее сообщество
Peter 11111000000
декларативненько:
(tui-define-component my-message
 :documentation
 "Message containing other components"
 :render
 (lambda ()
   (let ((name (plist-get (tui-get-props) :name)))
     (list (hello :name name)
           "\n------------\n"
           (tui-demo-basic-question)
           "\nmake "
           (basic-counter :start-value 0)
           " widgets!"))))

(tui-define-component tui-demo-basic-counter
 :documentation
 "Basic counter control"
 :get-initial-state
 (lambda ()
   (or (plist-get (tui-get-props) :start-value)
       0))
 :render
 (lambda ()
   (lexical-let ((counter (tui-get-state))
                 (component component))
     (cl-flet ((incr-counter () (interactive) (tui--set-state component (+ 1 counter)))
               (decr-counter () (interactive) (tui--set-state component (- counter 1))))
       (list counter
             " "
             (propertize "⏶"
                         'keymap
                         ;;`(keymap (down-mouse-1 . ,(lambda () (interactive) (tui-set-state 5)))))
                         `(keymap (down-mouse-1 . ,#'incr-counter)))
             (propertize "⏷"
                         'keymap
                          `(keymap (down-mouse-1 . ,#'decr-counter))))))))
> `(keymap (down-mouse-1 . ,#'incr-counter))
🌚
источник

P1

Peter 11111000000 in Emacs — русскоговорящее сообщество
@greenest_pig  ok ok )
источник

P1

Peter 11111000000 in Emacs — русскоговорящее сообщество
я бы тут макрос сделал упрощающий до (down-mouse-1 . incr-counter)
источник

P1

Peter 11111000000 in Emacs — русскоговорящее сообщество
а-ля :bind в use-package
источник

PG

Pig Greenest in Emacs — русскоговорящее сообщество
'(keymap (down-mouse-1 . incr-counter))
источник