← Back to branch summary

~ubuntu-branches/ubuntu/natty/texmacs/natty

« back to all changes in this revision

Viewing changes to TeXmacs/progs/kernel/texmacs/tm-define.scm

  • Committer: Bazaar Package Importer
  • Author(s): Atsuhito KOHDA
  • Date: 2010-11-05 14:47:00 UTC
  • mfrom: (4.1.10 sid)
  • Revision ID: james.westby@ubuntu.com-20101105144700-t2ju0m1o53cqtyed
Tags: 1:1.0.7.7-1
* New Upstream Release.
* Updated patches/09_ipa.dpatch for new upstream sources.

Show diffs side-by-side

added added

removed removed

Lines of Context:
TeXmacs/progs/kernel/texmacs/tm-define.scm
38
38
;; Overloading
39
39
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
40
40
 
 
41
(define (define-option-profile opt decl)
 
42
  (if (has-look-and-feel? opt) decl '(begin)))
 
43
 
41
44
(define (conditions-insert! kind opt)
42
45
  (set! ovl-conds (conditions-insert ovl-conds kind opt)))
43
46
 
80
83
    `(lambda ,(cdadr decl) ,(car opt))
81
84
    decl))
82
85
 
 
86
(hash-set! define-option-table :profile define-option-profile)
83
87
(hash-set! define-option-table :mode define-option-mode)
84
88
(hash-set! define-option-table :context define-option-context)
85
89
(hash-set! define-option-table :inside define-option-inside)