upstream/kallithea Files · rhodecode/public/js/mode/scheme/index.html

Add Twitter's Bootstrap 3.0.0 CSS and Javascript files, under Apache License 2.0...

Add Twitter's Bootstrap 3.0.0 CSS and Javascript files, under Apache License 2.0 These files are exactly as they appear the upstream release 3.0.0 of Bootstrap, which Twitter released under the Apache License 2.0. To extract these files, I did the following: I downloaded the following file: https://github.com/twbs/bootstrap/archive/v3.0.0.zip with sha256sum of: $ sha256sum v3.0.0.zip 2d54f345f4abc6bf65ea648c323e9bae577e6febf755650e62555f2d7a222e17 v3.0.0.zip And extracted from it these two files: bootstrap-3.0.0/dist/css/bootstrap.css bootstrap-3.0.0/dist/js/bootstrap.js which are licensed under the Apache License 2.0. and placed them into: rhodecode/public/css/bootstrap.css rhodecode/public/js/bootstrap.js respectively.

marcink - - Load All Authors

File last commit:

r4029:c9bcfe2d default


                r4117:6af3e67c

rhodecode-2.2.5-gpl

Download file

             index.html
        
                    65 lines
            
             | 2.2 KiB
            
                | text/html
            
             |
                HtmlLexer
            
             / rhodecode / public / js / mode / scheme / index.html
          
                    History
                
                 |
                  Source
                 | Raw
                 |Copy content
                 |Copy permalink

        marcink
    
added codemirror edit mode with autodetection

              r4026
            
      <!doctype html>

      <html>

        <head>

          <meta charset="utf-8">

          <title>CodeMirror: Scheme mode</title>

          <link rel="stylesheet" href="../../lib/codemirror.css">

          <script src="../../lib/codemirror.js"></script>

          <script src="scheme.js"></script>

          <style>.CodeMirror {background: #f8f8f8;}</style>

          <link rel="stylesheet" href="../../doc/docs.css">

        </head>

        <body>

          <h1>CodeMirror: Scheme mode</h1>

          <form><textarea id="code" name="code">

      ; See if the input starts with a given symbol.

      (define (match-symbol input pattern)

        (cond ((null? (remain input)) #f)

        marcink
    
codecleaner

              r4029
            
          ((eqv? (car (remain input)) pattern) (r-cdr input))

          (else #f)))

        marcink
    
added codemirror edit mode with autodetection

              r4026
            
      ; Allow the input to start with one of a list of patterns.

      (define (match-or input pattern)

        (cond ((null? pattern) #f)

        marcink
    
codecleaner

              r4029
            
          ((match-pattern input (car pattern)))

          (else (match-or input (cdr pattern)))))

        marcink
    
added codemirror edit mode with autodetection

              r4026
            
      ; Allow a sequence of patterns.

      (define (match-seq input pattern)

        (if (null? pattern)

            input

            (let ((match (match-pattern input (car pattern))))

        marcink
    
codecleaner

              r4029
            
          (if match (match-seq match (cdr pattern)) #f))))

        marcink
    
added codemirror edit mode with autodetection

              r4026
            
      ; Match with the pattern but no problem if it does not match.

      (define (match-opt input pattern)

        (let ((match (match-pattern input (car pattern))))

          (if match match input)))

      ; Match anything (other than '()), until pattern is found. The rather

      ; clumsy form of requiring an ending pattern is needed to decide where

      ; the end of the match is. If none is given, this will match the rest

      ; of the sentence.

      (define (match-any input pattern)

        (cond ((null? (remain input)) #f)

        marcink
    
codecleaner

              r4029
            
          ((null? pattern) (f-cons (remain input) (clear-remain input)))

          (else

           (let ((accum-any (collector)))

             (define (match-pattern-any input pattern)

               (cond ((null? (remain input)) #f)

                 (else (accum-any (car (remain input)))

                   (cond ((match-pattern (r-cdr input) pattern))

                         (else (match-pattern-any (r-cdr input) pattern))))))

             (let ((retval (match-pattern-any input (car pattern))))

               (if retval

               (f-cons (accum-any) retval)

               #f))))))

        marcink
    
added codemirror edit mode with autodetection

              r4026
            
      </textarea></form>

          <script>

            var editor = CodeMirror.fromTextArea(document.getElementById("code"), {});

          </script>

          <p><strong>MIME types defined:</strong> <code>text/x-scheme</code>.</p>

        </body>

      </html>

	Site-wide shortcuts
/	Use quick search box
g h	Goto home page
g g	Goto my private gists page
g G	Goto my public gists page
g 0-9	Goto bookmarked items from 0-9
n r	New repository page
n g	New gist page

	Repositories
g s	Goto summary page
g c	Goto changelog page
g f	Goto files page
g F	Goto files page with file search activated
g p	Goto pull requests page
g o	Goto repository settings
g O	Goto repository access permissions settings
t s	Toggle sidebar on some pages

marcink added codemirror edit mode with autodetection	r4026	<!doctype html>
		<html>
		<head>
		<meta charset="utf-8">
		<title>CodeMirror: Scheme mode</title>
		<link rel="stylesheet" href="../../lib/codemirror.css">
		<script src="../../lib/codemirror.js"></script>
		<script src="scheme.js"></script>
		<style>.CodeMirror {background: #f8f8f8;}</style>
		<link rel="stylesheet" href="../../doc/docs.css">
		</head>
		<body>
		<h1>CodeMirror: Scheme mode</h1>
		<form><textarea id="code" name="code">
		; See if the input starts with a given symbol.
		(define (match-symbol input pattern)
		(cond ((null? (remain input)) #f)
marcink codecleaner	r4029	((eqv? (car (remain input)) pattern) (r-cdr input))
		(else #f)))
marcink added codemirror edit mode with autodetection	r4026
		; Allow the input to start with one of a list of patterns.
		(define (match-or input pattern)
		(cond ((null? pattern) #f)
marcink codecleaner	r4029	((match-pattern input (car pattern)))
		(else (match-or input (cdr pattern)))))
marcink added codemirror edit mode with autodetection	r4026
		; Allow a sequence of patterns.
		(define (match-seq input pattern)
		(if (null? pattern)
		input
		(let ((match (match-pattern input (car pattern))))
marcink codecleaner	r4029	(if match (match-seq match (cdr pattern)) #f))))
marcink added codemirror edit mode with autodetection	r4026
		; Match with the pattern but no problem if it does not match.
		(define (match-opt input pattern)
		(let ((match (match-pattern input (car pattern))))
		(if match match input)))

		; Match anything (other than '()), until pattern is found. The rather
		; clumsy form of requiring an ending pattern is needed to decide where
		; the end of the match is. If none is given, this will match the rest
		; of the sentence.
		(define (match-any input pattern)
		(cond ((null? (remain input)) #f)
marcink codecleaner	r4029	((null? pattern) (f-cons (remain input) (clear-remain input)))
		(else
		(let ((accum-any (collector)))
		(define (match-pattern-any input pattern)
		(cond ((null? (remain input)) #f)
		(else (accum-any (car (remain input)))
		(cond ((match-pattern (r-cdr input) pattern))
		(else (match-pattern-any (r-cdr input) pattern))))))
		(let ((retval (match-pattern-any input (car pattern))))
		(if retval
		(f-cons (accum-any) retval)
		#f))))))
marcink added codemirror edit mode with autodetection	r4026	</textarea></form>
		<script>
		var editor = CodeMirror.fromTextArea(document.getElementById("code"), {});
		</script>

		<p><strong>MIME types defined:</strong> <code>text/x-scheme</code>.</p>

		</body>
		</html>