"
 COPYRIGHT (c) 1988 by Claus Gittinger / eXept Software AG
 COPYRIGHT (c) 2015-2016 Jan Vrany
 COPYRIGHT (c) 2021 LabWare
              All Rights Reserved

 This software is furnished under a license and may be used
 only in accordance with the terms of that license and with the
 inclusion of the above copyright notice.   This software may not
 be provided or otherwise made available to, or used by, any
 other person.  No title to or ownership of the software is
 hereby transferred.
"
"{ Package: 'stx:libtool' }"

"{ NameSpace: Smalltalk }"

CodeViewTheme subclass:#Solarized
	instanceVariableNames:''
	classVariableNames:'Base03 Base02 Base01 Base00 Base0 Base1 Base2 Base3 Yellow Orange
		Red Magenta Violet Blue Cyan Green'
	poolDictionaries:''
	category:'Views-Text-Theme'
!

!Solarized class methodsFor:'documentation'!

copyright
"
 COPYRIGHT (c) 1988 by Claus Gittinger / eXept Software AG
 COPYRIGHT (c) 2015-2016 Jan Vrany
 COPYRIGHT (c) 2021 LabWare
              All Rights Reserved

 This software is furnished under a license and may be used
 only in accordance with the terms of that license and with the
 inclusion of the above copyright notice.   This software may not
 be provided or otherwise made available to, or used by, any
 other person.  No title to or ownership of the software is
 hereby transferred.
"
! !

!Solarized class methodsFor:'initialization'!

initialize
    "Invoked at system start or when the class is dynamically loaded."

    "/ please change as required (and remove this comment)

    Base03 := Color rgbValue: 16r002b36.
    Base02 := Color rgbValue: 16r073642.
    Base01 := Color rgbValue: 16r586e75.
    Base00 := Color rgbValue: 16r657b83.
    Base0 := Color rgbValue: 16r839496.
    Base1 := Color rgbValue: 16r93a1a1.
    Base2 := Color rgbValue: 16reee8d5.
    Base3 := Color rgbValue: 16rfdf6e3.
    Yellow :=Color rgbValue: 16rb58900.
    Orange := Color rgbValue: 16rcb4b16.
    Red := Color rgbValue: 16rdc322f.
    Magenta := Color rgbValue: 16rd33682.
    Violet := Color rgbValue: 16r6c71c4.
    Blue := Color rgbValue: 16r268bd2.
    Cyan := Color rgbValue: 16r2aa198.
    Green := Color rgbValue: 16r859900.

    "Modified: / 11-12-2017 / 16:23:59 / jv"
! !

!Solarized methodsFor:'styles'!

badIdentifierEmphasis
    "the emphasis used for illegal identifiers;
     If syntaxColoring is turned on."

    ^ self errorEmphasis

    "Created: / 20-12-2017 / 22:50:27 / Jan Vrany <jan.vrany@fit.cvut.cz>"
!

commentColor
    "the color used for comments;
     If syntaxColoring is turned on."

    ^ Base01

    "Created: / 15-12-2017 / 22:55:38 / Jan Vrany <jan.vrany@fit.cvut.cz>"
    "Modified: / 16-12-2017 / 20:09:10 / Jan Vrany <jan.vrany@fit.cvut.cz>"
!

constantColor
    "the color used for constants;
     If syntaxColoring is turned on."

    ^ Cyan

    "Created: / 15-12-2017 / 22:56:33 / Jan Vrany <jan.vrany@fit.cvut.cz>"
    "Modified: / 16-01-2019 / 19:12:24 / Jan Vrany <jan.vrany@fit.cvut.cz>"
!

debugSelectorColor
    "the color used for some selected debug
     selectors (such as halt etc.);
     If syntaxColoring is turned on.
     If left nil, the normal selector color is used."

    ^ Red

    "Created: / 16-12-2017 / 21:40:18 / Jan Vrany <jan.vrany@fit.cvut.cz>"
!

defaultSyntaxBackground
    "Return a background color for the code editor. If nil is returned,
     a TextView's default background is used instread."

    ^ Base3

    "Created: / 11-12-2017 / 17:39:33 / jv"
    "Modified: / 16-12-2017 / 20:08:44 / Jan Vrany <jan.vrany@fit.cvut.cz>"
!

defaultSyntaxColor
    "the color used for anything else;
     If syntaxColoring is turned on."

    ^ Color black

    "Created: / 11-12-2017 / 17:39:45 / jv"
    "Modified: / 16-12-2017 / 21:39:42 / Jan Vrany <jan.vrany@fit.cvut.cz>"
!

errorColor
    "the color used for the thisContext pseudoVariable;
     If syntaxColoring is turned on."

    ^ Red

    "Created: / 20-12-2017 / 22:48:06 / Jan Vrany <jan.vrany@fit.cvut.cz>"
!

errorEmphasis
    ^ (Array with:#underwave with:(#underlineColor->Red))

    "Created: / 20-12-2017 / 22:51:45 / Jan Vrany <jan.vrany@fit.cvut.cz>"
!

globalIdentifierEmphasis
    "the color used for global identifiers;
     If syntaxColoring is turned on."

    ^ #bold

    "Created: / 16-12-2017 / 21:39:04 / Jan Vrany <jan.vrany@fit.cvut.cz>"
!

identifierColor
    "the color used for other identifiers;
     If syntaxColoring is turned on."

    ^ Blue

    "
     UserPreferences current at:#identifierColor put:Color green darkened darkened.
     UserPreferences current at:#identifierColor put:Color black.
    "

    "Created: / 16-12-2017 / 21:41:59 / Jan Vrany <jan.vrany@fit.cvut.cz>"
!

methodSelectorEmphasis
    "the emphasis used for a methods selector pattern;
     If syntaxColoring is turned on."

    ^ #bold

    "Created: / 16-12-2017 / 21:40:54 / Jan Vrany <jan.vrany@fit.cvut.cz>"
!

numberConstantColor
    "the color used for number constants;
     If syntaxColoring is turned on."

    ^  Magenta

    "Created: / 16-12-2017 / 20:10:18 / Jan Vrany <jan.vrany@fit.cvut.cz>"
!

selfColor
    "the color used for the self pseudoVariable;
     If syntaxColoring is turned on."

    ^ Green

    "Created: / 16-12-2017 / 20:11:44 / Jan Vrany <jan.vrany@fit.cvut.cz>"
    "Modified: / 16-01-2019 / 19:13:53 / Jan Vrany <jan.vrany@fit.cvut.cz>"
!

selfEmphasis
    "the emphasis used for the self pseudoVariable;
     If syntaxColoring is turned on."

    ^ #bold

    "Created: / 16-01-2019 / 19:14:26 / Jan Vrany <jan.vrany@fit.cvut.cz>"
!

thisContextColor
    "the color used for the thisContext pseudoVariable;
     If syntaxColoring is turned on."

    ^ Green

    "Created: / 15-12-2017 / 22:58:12 / Jan Vrany <jan.vrany@fit.cvut.cz>"
!

unimplementedSelectorColor
    "the color used for bad message selectors;
     If syntaxColoring is turned on."

    ^ self selectorColor

    "Created: / 20-12-2017 / 22:48:53 / Jan Vrany <jan.vrany@fit.cvut.cz>"
!

unimplementedSelectorEmphasis
    "the emphasis used for bad message selectors;
     If syntaxColoring is turned on."

    ^ self errorEmphasis

    "Created: / 20-12-2017 / 22:49:33 / Jan Vrany <jan.vrany@fit.cvut.cz>"
! !

!Solarized methodsFor:'styles - navigation'!

assignmentHighlightBackround
    ^ Red lighter

    "Created: / 15-09-2021 / 21:25:08 / Jan Vrany <jan.vrany@labware.com>"
!

selectorHighlightBackground
    ^ Blue lighter

    "Created: / 15-09-2021 / 21:28:56 / Jan Vrany <jan.vrany@labware.com>"
!

variableHighlightBackground
    ^ Yellow lighter

    "Created: / 15-09-2021 / 21:29:10 / Jan Vrany <jan.vrany@labware.com>"
! !

!Solarized class methodsFor:'documentation'!

version_HG

    ^ '$Changeset: <not expanded> $'
! !


Solarized initialize!