racket/collects/framework/private/pasteboard.ss
Eli Barzilay 7d50e61c7f * Newlines at EOFs
* Another big chunk of v4-require-isms
* Allow `#lang framework/keybinding-lang' for keybinding files
* Move hierlist sources into "mrlib/hierlist", leave stub behind

svn: r10689
2008-07-09 07:18:06 +00:00

17 lines
590 B
Scheme

#lang scheme/unit
(require "sig.ss" mred/mred-sig)
(import mred^
[prefix editor: framework:editor^])
(export (rename framework:pasteboard^
[-keymap% keymap%]))
(init-depend mred^ framework:editor^)
(define basic% (editor:basic-mixin pasteboard%))
(define standard-style-list% (editor:standard-style-list-mixin basic%))
(define -keymap% (editor:keymap-mixin standard-style-list%))
(define file% (editor:file-mixin -keymap%))
(define backup-autosave% (editor:backup-autosave-mixin file%))
(define info% (editor:info-mixin backup-autosave%))