| 123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867868869870871872873874875876877878879880881882883884885886887888889890891892893894895896897898899900901902903904905906907908909910911912913914915916917918919920921922923924925926927928929930931932933934935936937938939940941942943944945946947948949950951952953954955956957958959960961962963964965966967968969970971972973974975976977978979980981982983984985986987988989990991992993994995996997998999100010011002100310041005100610071008100910101011101210131014101510161017101810191020102110221023102410251026102710281029103010311032103310341035103610371038103910401041104210431044104510461047104810491050105110521053105410551056105710581059106010611062106310641065106610671068106910701071107210731074107510761077107810791080108110821083108410851086108710881089109010911092109310941095109610971098109911001101110211031104110511061107110811091110111111121113111411151116111711181119112011211122112311241125112611271128112911301131113211331134113511361137113811391140114111421143114411451146114711481149115011511152115311541155115611571158115911601161116211631164116511661167116811691170117111721173117411751176117711781179118011811182118311841185118611871188118911901191119211931194119511961197119811991200120112021203120412051206120712081209121012111212121312141215121612171218121912201221122212231224122512261227122812291230123112321233123412351236123712381239124012411242124312441245124612471248124912501251125212531254125512561257125812591260126112621263126412651266126712681269127012711272127312741275127612771278127912801281128212831284128512861287128812891290129112921293129412951296129712981299130013011302130313041305130613071308130913101311131213131314131513161317131813191320132113221323132413251326132713281329133013311332133313341335133613371338133913401341134213431344134513461347134813491350135113521353135413551356135713581359136013611362136313641365136613671368136913701371137213731374137513761377137813791380138113821383138413851386138713881389139013911392139313941395139613971398139914001401140214031404140514061407140814091410141114121413141414151416141714181419142014211422142314241425142614271428142914301431143214331434143514361437143814391440144114421443144414451446144714481449145014511452145314541455145614571458145914601461146214631464146514661467146814691470147114721473147414751476147714781479148014811482148314841485148614871488148914901491149214931494149514961497149814991500150115021503150415051506150715081509151015111512151315141515151615171518151915201521152215231524152515261527152815291530153115321533153415351536153715381539154015411542154315441545154615471548154915501551155215531554155515561557155815591560156115621563156415651566156715681569157015711572157315741575157615771578157915801581158215831584158515861587158815891590159115921593159415951596159715981599160016011602160316041605160616071608160916101611161216131614161516161617161816191620162116221623162416251626162716281629163016311632163316341635163616371638163916401641164216431644164516461647164816491650165116521653165416551656165716581659166016611662166316641665166616671668166916701671167216731674167516761677167816791680168116821683168416851686168716881689169016911692169316941695169616971698169917001701170217031704170517061707170817091710171117121713171417151716171717181719172017211722172317241725172617271728172917301731173217331734173517361737173817391740174117421743174417451746174717481749175017511752175317541755175617571758175917601761176217631764176517661767176817691770177117721773177417751776177717781779178017811782178317841785178617871788178917901791179217931794179517961797179817991800180118021803180418051806180718081809181018111812181318141815181618171818181918201821182218231824182518261827182818291830183118321833183418351836183718381839184018411842184318441845184618471848184918501851185218531854185518561857185818591860186118621863186418651866186718681869187018711872187318741875187618771878187918801881188218831884188518861887188818891890189118921893189418951896189718981899190019011902190319041905190619071908190919101911191219131914191519161917191819191920192119221923192419251926192719281929193019311932193319341935193619371938193919401941194219431944194519461947194819491950195119521953195419551956195719581959196019611962196319641965196619671968196919701971197219731974197519761977197819791980198119821983198419851986198719881989199019911992199319941995199619971998199920002001200220032004200520062007200820092010201120122013201420152016201720182019202020212022202320242025202620272028202920302031203220332034203520362037203820392040204120422043204420452046204720482049205020512052205320542055205620572058205920602061206220632064206520662067206820692070207120722073207420752076207720782079208020812082208320842085208620872088208920902091209220932094209520962097209820992100210121022103210421052106210721082109211021112112211321142115211621172118211921202121212221232124212521262127212821292130213121322133213421352136213721382139214021412142214321442145214621472148214921502151215221532154215521562157215821592160216121622163216421652166216721682169217021712172217321742175217621772178217921802181218221832184218521862187218821892190219121922193219421952196219721982199220022012202220322042205220622072208220922102211221222132214221522162217221822192220222122222223222422252226222722282229223022312232223322342235223622372238223922402241224222432244224522462247224822492250225122522253225422552256225722582259226022612262226322642265226622672268226922702271227222732274227522762277227822792280228122822283228422852286228722882289229022912292229322942295229622972298229923002301230223032304230523062307230823092310231123122313231423152316231723182319232023212322232323242325232623272328232923302331233223332334233523362337233823392340234123422343234423452346234723482349235023512352235323542355235623572358235923602361236223632364236523662367236823692370237123722373237423752376237723782379238023812382238323842385238623872388238923902391239223932394239523962397239823992400240124022403240424052406240724082409241024112412241324142415241624172418241924202421242224232424242524262427242824292430243124322433243424352436243724382439244024412442244324442445244624472448244924502451245224532454245524562457245824592460246124622463246424652466246724682469247024712472247324742475247624772478247924802481248224832484248524862487248824892490249124922493249424952496249724982499250025012502250325042505250625072508250925102511251225132514251525162517251825192520252125222523252425252526252725282529253025312532253325342535253625372538253925402541254225432544254525462547254825492550255125522553255425552556255725582559256025612562256325642565256625672568256925702571257225732574257525762577257825792580258125822583258425852586258725882589259025912592259325942595259625972598259926002601260226032604260526062607260826092610261126122613261426152616261726182619262026212622262326242625262626272628262926302631263226332634263526362637263826392640264126422643264426452646264726482649265026512652265326542655265626572658265926602661266226632664266526662667266826692670267126722673267426752676267726782679268026812682268326842685268626872688268926902691269226932694269526962697269826992700270127022703270427052706270727082709271027112712271327142715271627172718271927202721272227232724272527262727272827292730273127322733273427352736273727382739274027412742274327442745274627472748274927502751275227532754275527562757275827592760276127622763276427652766276727682769277027712772277327742775277627772778277927802781278227832784278527862787278827892790279127922793279427952796279727982799280028012802280328042805280628072808280928102811281228132814281528162817281828192820282128222823282428252826282728282829283028312832283328342835283628372838283928402841284228432844284528462847284828492850285128522853285428552856285728582859286028612862286328642865286628672868286928702871287228732874287528762877287828792880288128822883288428852886288728882889289028912892289328942895289628972898289929002901290229032904290529062907290829092910291129122913291429152916291729182919292029212922292329242925292629272928292929302931293229332934293529362937293829392940294129422943294429452946294729482949295029512952295329542955295629572958295929602961296229632964296529662967296829692970297129722973297429752976297729782979298029812982298329842985298629872988298929902991299229932994299529962997299829993000300130023003300430053006300730083009301030113012301330143015301630173018301930203021302230233024302530263027302830293030303130323033303430353036303730383039304030413042304330443045304630473048304930503051305230533054305530563057305830593060306130623063306430653066306730683069307030713072307330743075307630773078307930803081308230833084308530863087308830893090309130923093309430953096309730983099310031013102310331043105310631073108310931103111311231133114311531163117311831193120312131223123312431253126312731283129313031313132313331343135313631373138313931403141314231433144314531463147314831493150315131523153315431553156315731583159316031613162316331643165316631673168316931703171317231733174317531763177317831793180318131823183318431853186318731883189319031913192319331943195319631973198319932003201320232033204320532063207320832093210321132123213321432153216321732183219322032213222322332243225322632273228322932303231323232333234323532363237323832393240324132423243324432453246324732483249325032513252325332543255325632573258325932603261326232633264326532663267326832693270327132723273327432753276327732783279328032813282328332843285328632873288328932903291329232933294329532963297329832993300330133023303330433053306330733083309331033113312331333143315331633173318331933203321332233233324332533263327332833293330333133323333333433353336333733383339334033413342334333443345334633473348334933503351335233533354335533563357335833593360336133623363336433653366336733683369337033713372337333743375337633773378337933803381338233833384338533863387338833893390339133923393339433953396339733983399340034013402340334043405340634073408340934103411341234133414341534163417341834193420342134223423342434253426342734283429343034313432343334343435343634373438343934403441344234433444344534463447344834493450345134523453345434553456345734583459346034613462346334643465346634673468346934703471347234733474347534763477347834793480348134823483348434853486348734883489349034913492349334943495349634973498349935003501350235033504350535063507350835093510351135123513351435153516351735183519352035213522352335243525352635273528352935303531353235333534353535363537353835393540354135423543354435453546354735483549355035513552355335543555355635573558355935603561356235633564356535663567356835693570357135723573357435753576357735783579358035813582358335843585358635873588358935903591359235933594359535963597359835993600360136023603360436053606360736083609361036113612361336143615361636173618361936203621362236233624362536263627362836293630363136323633363436353636363736383639364036413642364336443645364636473648364936503651365236533654365536563657365836593660366136623663366436653666366736683669367036713672367336743675367636773678367936803681368236833684368536863687368836893690369136923693369436953696369736983699370037013702370337043705370637073708370937103711371237133714371537163717371837193720372137223723372437253726372737283729373037313732373337343735373637373738373937403741374237433744374537463747374837493750375137523753375437553756375737583759376037613762376337643765376637673768376937703771377237733774377537763777377837793780378137823783378437853786378737883789379037913792379337943795379637973798379938003801380238033804380538063807380838093810381138123813381438153816381738183819382038213822382338243825382638273828382938303831383238333834383538363837383838393840384138423843384438453846384738483849385038513852385338543855385638573858385938603861386238633864386538663867386838693870387138723873387438753876387738783879388038813882388338843885388638873888388938903891389238933894389538963897389838993900390139023903390439053906390739083909391039113912391339143915391639173918391939203921392239233924392539263927392839293930393139323933393439353936393739383939394039413942394339443945394639473948394939503951395239533954395539563957395839593960396139623963396439653966396739683969397039713972397339743975397639773978397939803981398239833984398539863987398839893990399139923993399439953996399739983999400040014002400340044005400640074008400940104011401240134014401540164017401840194020402140224023402440254026402740284029403040314032403340344035403640374038403940404041404240434044404540464047404840494050405140524053405440554056405740584059406040614062406340644065406640674068406940704071407240734074407540764077407840794080408140824083408440854086408740884089409040914092409340944095409640974098409941004101410241034104410541064107410841094110411141124113411441154116411741184119412041214122412341244125412641274128412941304131413241334134413541364137413841394140414141424143414441454146414741484149415041514152415341544155415641574158415941604161416241634164416541664167416841694170417141724173417441754176417741784179418041814182418341844185418641874188418941904191419241934194419541964197419841994200420142024203420442054206420742084209421042114212421342144215421642174218421942204221422242234224422542264227422842294230423142324233423442354236423742384239424042414242424342444245424642474248424942504251425242534254425542564257425842594260426142624263426442654266426742684269427042714272427342744275427642774278427942804281428242834284428542864287428842894290429142924293429442954296429742984299430043014302430343044305430643074308430943104311431243134314431543164317431843194320432143224323432443254326432743284329433043314332433343344335433643374338433943404341434243434344434543464347434843494350435143524353435443554356435743584359436043614362436343644365436643674368436943704371437243734374437543764377437843794380438143824383438443854386438743884389439043914392439343944395439643974398439944004401440244034404440544064407440844094410441144124413441444154416441744184419442044214422442344244425442644274428442944304431443244334434443544364437443844394440444144424443444444454446444744484449445044514452445344544455445644574458445944604461446244634464446544664467446844694470447144724473447444754476447744784479448044814482448344844485448644874488448944904491449244934494449544964497449844994500450145024503450445054506450745084509451045114512451345144515451645174518451945204521452245234524452545264527452845294530453145324533453445354536453745384539454045414542454345444545454645474548454945504551455245534554455545564557455845594560456145624563456445654566456745684569457045714572457345744575457645774578457945804581458245834584458545864587458845894590459145924593459445954596459745984599460046014602460346044605460646074608460946104611461246134614461546164617461846194620462146224623462446254626462746284629463046314632463346344635463646374638463946404641464246434644464546464647464846494650465146524653465446554656465746584659466046614662466346644665466646674668466946704671467246734674467546764677467846794680468146824683468446854686468746884689469046914692469346944695469646974698469947004701470247034704470547064707470847094710471147124713471447154716471747184719472047214722472347244725472647274728472947304731473247334734473547364737473847394740474147424743474447454746474747484749475047514752475347544755475647574758475947604761476247634764476547664767476847694770477147724773477447754776477747784779478047814782478347844785478647874788478947904791479247934794479547964797479847994800480148024803480448054806480748084809481048114812481348144815481648174818481948204821482248234824482548264827482848294830483148324833483448354836483748384839484048414842484348444845484648474848484948504851485248534854485548564857485848594860486148624863486448654866486748684869487048714872487348744875487648774878487948804881488248834884488548864887488848894890489148924893489448954896489748984899490049014902490349044905490649074908490949104911491249134914491549164917491849194920492149224923492449254926492749284929493049314932493349344935493649374938493949404941494249434944494549464947494849494950495149524953495449554956495749584959496049614962496349644965496649674968496949704971497249734974497549764977497849794980498149824983498449854986498749884989499049914992499349944995499649974998499950005001500250035004500550065007500850095010501150125013501450155016501750185019502050215022502350245025502650275028502950305031503250335034503550365037503850395040504150425043504450455046504750485049505050515052505350545055505650575058505950605061506250635064506550665067506850695070507150725073507450755076507750785079508050815082508350845085508650875088508950905091509250935094509550965097509850995100510151025103510451055106510751085109511051115112511351145115511651175118511951205121512251235124512551265127512851295130513151325133513451355136513751385139514051415142514351445145514651475148514951505151515251535154515551565157515851595160516151625163516451655166516751685169517051715172517351745175517651775178517951805181518251835184518551865187518851895190519151925193519451955196519751985199520052015202520352045205520652075208520952105211521252135214521552165217521852195220522152225223522452255226522752285229523052315232523352345235523652375238523952405241524252435244524552465247524852495250525152525253525452555256525752585259526052615262526352645265526652675268526952705271527252735274527552765277527852795280528152825283528452855286528752885289529052915292529352945295529652975298529953005301530253035304530553065307530853095310531153125313531453155316531753185319532053215322532353245325532653275328532953305331533253335334533553365337533853395340534153425343534453455346534753485349535053515352535353545355535653575358535953605361536253635364536553665367536853695370537153725373537453755376537753785379538053815382538353845385538653875388538953905391539253935394539553965397539853995400540154025403540454055406540754085409541054115412541354145415541654175418541954205421542254235424542554265427542854295430543154325433543454355436543754385439544054415442544354445445544654475448544954505451545254535454545554565457545854595460546154625463546454655466546754685469547054715472547354745475547654775478547954805481548254835484548554865487548854895490549154925493549454955496549754985499550055015502550355045505550655075508550955105511551255135514551555165517551855195520552155225523552455255526552755285529553055315532553355345535553655375538553955405541554255435544554555465547554855495550555155525553555455555556555755585559556055615562556355645565556655675568556955705571557255735574557555765577557855795580558155825583558455855586558755885589559055915592559355945595559655975598559956005601560256035604560556065607560856095610561156125613561456155616561756185619562056215622562356245625562656275628562956305631563256335634563556365637563856395640564156425643564456455646564756485649565056515652565356545655565656575658565956605661566256635664566556665667566856695670567156725673567456755676567756785679568056815682568356845685568656875688568956905691569256935694569556965697569856995700570157025703570457055706570757085709571057115712571357145715571657175718571957205721572257235724572557265727572857295730573157325733573457355736573757385739574057415742574357445745574657475748574957505751575257535754575557565757575857595760576157625763576457655766576757685769577057715772577357745775577657775778577957805781578257835784578557865787578857895790579157925793579457955796579757985799580058015802580358045805580658075808580958105811581258135814581558165817581858195820582158225823582458255826582758285829583058315832583358345835583658375838583958405841584258435844584558465847584858495850585158525853585458555856585758585859586058615862586358645865586658675868586958705871587258735874587558765877587858795880588158825883588458855886588758885889589058915892589358945895589658975898589959005901590259035904590559065907590859095910591159125913591459155916591759185919592059215922592359245925592659275928592959305931593259335934593559365937593859395940594159425943594459455946594759485949595059515952595359545955595659575958595959605961596259635964596559665967596859695970597159725973597459755976597759785979598059815982598359845985598659875988598959905991599259935994599559965997599859996000600160026003600460056006600760086009601060116012601360146015601660176018601960206021602260236024602560266027602860296030603160326033603460356036603760386039604060416042604360446045604660476048604960506051605260536054605560566057605860596060606160626063606460656066606760686069607060716072607360746075607660776078607960806081608260836084608560866087608860896090609160926093609460956096609760986099610061016102610361046105610661076108610961106111611261136114611561166117611861196120612161226123612461256126612761286129613061316132613361346135613661376138613961406141614261436144614561466147614861496150615161526153615461556156615761586159616061616162616361646165616661676168616961706171617261736174617561766177617861796180618161826183618461856186618761886189619061916192619361946195619661976198619962006201620262036204620562066207620862096210621162126213621462156216621762186219622062216222622362246225622662276228622962306231623262336234623562366237623862396240624162426243624462456246624762486249625062516252625362546255625662576258625962606261626262636264626562666267626862696270627162726273627462756276627762786279628062816282628362846285628662876288628962906291629262936294629562966297629862996300630163026303630463056306630763086309631063116312631363146315631663176318631963206321632263236324632563266327632863296330633163326333633463356336633763386339634063416342634363446345634663476348634963506351635263536354635563566357635863596360636163626363636463656366636763686369637063716372637363746375637663776378637963806381638263836384638563866387638863896390639163926393639463956396639763986399640064016402640364046405640664076408640964106411641264136414641564166417641864196420642164226423642464256426642764286429643064316432643364346435643664376438643964406441644264436444644564466447644864496450645164526453645464556456645764586459646064616462646364646465646664676468646964706471647264736474647564766477647864796480648164826483648464856486648764886489649064916492649364946495649664976498649965006501650265036504650565066507650865096510651165126513651465156516651765186519652065216522652365246525652665276528652965306531653265336534653565366537653865396540654165426543654465456546654765486549655065516552655365546555655665576558655965606561656265636564656565666567656865696570657165726573657465756576657765786579658065816582658365846585658665876588658965906591659265936594659565966597659865996600660166026603660466056606660766086609661066116612661366146615661666176618661966206621662266236624662566266627662866296630663166326633663466356636663766386639664066416642664366446645664666476648664966506651665266536654665566566657665866596660666166626663666466656666666766686669667066716672667366746675667666776678667966806681668266836684668566866687668866896690669166926693669466956696669766986699670067016702670367046705670667076708670967106711671267136714671567166717671867196720672167226723672467256726672767286729673067316732673367346735673667376738673967406741674267436744674567466747674867496750675167526753675467556756675767586759676067616762676367646765676667676768676967706771677267736774677567766777677867796780678167826783678467856786678767886789679067916792679367946795679667976798679968006801680268036804680568066807680868096810681168126813681468156816681768186819682068216822682368246825682668276828682968306831683268336834683568366837683868396840684168426843684468456846684768486849685068516852685368546855685668576858685968606861686268636864686568666867686868696870687168726873687468756876687768786879688068816882688368846885688668876888688968906891689268936894689568966897689868996900690169026903690469056906690769086909691069116912691369146915691669176918691969206921692269236924692569266927692869296930693169326933693469356936693769386939694069416942694369446945694669476948694969506951695269536954695569566957695869596960696169626963696469656966696769686969697069716972697369746975697669776978697969806981698269836984698569866987698869896990699169926993699469956996699769986999700070017002700370047005700670077008700970107011701270137014701570167017701870197020702170227023702470257026702770287029703070317032703370347035703670377038703970407041704270437044704570467047704870497050705170527053705470557056705770587059706070617062706370647065706670677068706970707071707270737074707570767077707870797080708170827083708470857086708770887089709070917092709370947095709670977098709971007101710271037104710571067107710871097110711171127113711471157116711771187119712071217122712371247125712671277128712971307131713271337134713571367137713871397140714171427143714471457146714771487149715071517152715371547155715671577158715971607161716271637164716571667167716871697170717171727173717471757176717771787179718071817182718371847185718671877188718971907191719271937194719571967197719871997200720172027203720472057206720772087209721072117212721372147215721672177218721972207221722272237224722572267227722872297230723172327233723472357236723772387239724072417242724372447245724672477248724972507251725272537254725572567257725872597260726172627263726472657266726772687269727072717272727372747275727672777278727972807281728272837284728572867287728872897290729172927293729472957296729772987299730073017302730373047305730673077308730973107311731273137314731573167317731873197320732173227323732473257326732773287329733073317332733373347335733673377338733973407341734273437344734573467347734873497350735173527353735473557356735773587359736073617362736373647365736673677368736973707371737273737374737573767377737873797380738173827383738473857386738773887389739073917392739373947395739673977398739974007401740274037404740574067407740874097410741174127413741474157416741774187419742074217422742374247425742674277428742974307431743274337434743574367437743874397440744174427443744474457446744774487449745074517452745374547455745674577458745974607461746274637464746574667467746874697470747174727473747474757476747774787479748074817482748374847485748674877488748974907491749274937494749574967497749874997500750175027503750475057506750775087509751075117512751375147515751675177518751975207521752275237524752575267527752875297530753175327533753475357536753775387539754075417542754375447545754675477548754975507551755275537554755575567557755875597560756175627563756475657566756775687569757075717572757375747575757675777578757975807581758275837584758575867587758875897590759175927593759475957596759775987599760076017602760376047605760676077608760976107611761276137614761576167617761876197620762176227623762476257626762776287629763076317632763376347635763676377638763976407641764276437644764576467647764876497650765176527653765476557656765776587659766076617662766376647665766676677668766976707671767276737674767576767677767876797680768176827683768476857686768776887689769076917692769376947695769676977698769977007701770277037704770577067707770877097710771177127713771477157716771777187719772077217722772377247725772677277728772977307731773277337734773577367737773877397740774177427743774477457746774777487749775077517752775377547755775677577758775977607761776277637764776577667767776877697770777177727773777477757776777777787779778077817782778377847785778677877788778977907791779277937794779577967797779877997800780178027803780478057806780778087809781078117812781378147815781678177818781978207821782278237824782578267827782878297830783178327833783478357836783778387839784078417842784378447845784678477848784978507851785278537854785578567857785878597860786178627863786478657866786778687869787078717872787378747875787678777878787978807881788278837884788578867887788878897890789178927893789478957896789778987899790079017902790379047905790679077908790979107911791279137914791579167917791879197920792179227923792479257926792779287929793079317932793379347935793679377938793979407941794279437944794579467947794879497950795179527953795479557956795779587959796079617962796379647965796679677968796979707971797279737974797579767977797879797980798179827983798479857986798779887989799079917992799379947995799679977998799980008001800280038004800580068007800880098010801180128013801480158016801780188019802080218022802380248025802680278028802980308031803280338034803580368037803880398040804180428043804480458046804780488049805080518052805380548055805680578058805980608061806280638064806580668067806880698070807180728073807480758076807780788079808080818082808380848085808680878088808980908091809280938094809580968097809880998100810181028103810481058106810781088109811081118112811381148115811681178118811981208121812281238124812581268127812881298130813181328133813481358136813781388139814081418142814381448145814681478148814981508151815281538154815581568157815881598160816181628163816481658166816781688169817081718172817381748175817681778178817981808181818281838184818581868187818881898190819181928193819481958196819781988199820082018202820382048205820682078208820982108211821282138214821582168217821882198220822182228223822482258226822782288229823082318232823382348235823682378238823982408241824282438244824582468247824882498250825182528253825482558256825782588259826082618262826382648265826682678268826982708271827282738274827582768277827882798280828182828283828482858286828782888289829082918292829382948295829682978298829983008301830283038304830583068307830883098310831183128313831483158316831783188319832083218322832383248325832683278328832983308331833283338334833583368337833883398340834183428343834483458346834783488349835083518352835383548355835683578358835983608361836283638364836583668367836883698370837183728373837483758376837783788379838083818382838383848385838683878388838983908391839283938394839583968397839883998400840184028403840484058406840784088409841084118412841384148415841684178418841984208421842284238424842584268427842884298430843184328433843484358436843784388439844084418442844384448445844684478448844984508451845284538454845584568457845884598460846184628463846484658466846784688469847084718472847384748475847684778478847984808481848284838484848584868487848884898490849184928493849484958496849784988499850085018502850385048505850685078508850985108511851285138514851585168517851885198520852185228523852485258526852785288529853085318532853385348535853685378538853985408541854285438544854585468547854885498550855185528553855485558556855785588559856085618562856385648565856685678568856985708571857285738574857585768577857885798580858185828583858485858586858785888589859085918592859385948595859685978598859986008601860286038604860586068607860886098610861186128613861486158616861786188619862086218622862386248625862686278628862986308631863286338634863586368637863886398640864186428643864486458646864786488649865086518652865386548655865686578658865986608661866286638664866586668667866886698670867186728673867486758676867786788679868086818682868386848685868686878688868986908691869286938694869586968697869886998700870187028703870487058706870787088709871087118712871387148715871687178718871987208721872287238724872587268727872887298730873187328733873487358736873787388739874087418742874387448745874687478748874987508751875287538754875587568757875887598760876187628763876487658766876787688769877087718772877387748775877687778778877987808781878287838784878587868787878887898790879187928793879487958796879787988799880088018802880388048805880688078808880988108811881288138814881588168817881888198820882188228823882488258826882788288829883088318832883388348835883688378838883988408841884288438844884588468847884888498850885188528853885488558856885788588859886088618862886388648865886688678868886988708871887288738874887588768877887888798880888188828883888488858886888788888889889088918892889388948895889688978898889989008901890289038904890589068907890889098910891189128913891489158916891789188919892089218922892389248925892689278928892989308931893289338934893589368937893889398940894189428943894489458946894789488949895089518952895389548955895689578958895989608961896289638964896589668967896889698970897189728973897489758976897789788979898089818982898389848985898689878988898989908991899289938994899589968997899889999000900190029003900490059006900790089009901090119012901390149015901690179018901990209021902290239024902590269027902890299030903190329033903490359036903790389039904090419042904390449045904690479048904990509051905290539054905590569057905890599060906190629063906490659066906790689069907090719072907390749075907690779078907990809081908290839084908590869087908890899090909190929093909490959096909790989099910091019102910391049105910691079108910991109111911291139114911591169117911891199120912191229123912491259126912791289129913091319132913391349135913691379138913991409141914291439144914591469147914891499150915191529153915491559156915791589159916091619162916391649165916691679168916991709171917291739174917591769177917891799180918191829183918491859186918791889189919091919192919391949195919691979198919992009201920292039204920592069207920892099210921192129213921492159216921792189219922092219222922392249225922692279228922992309231923292339234923592369237923892399240924192429243924492459246924792489249925092519252925392549255925692579258925992609261926292639264926592669267926892699270927192729273927492759276927792789279928092819282928392849285928692879288928992909291929292939294929592969297929892999300930193029303930493059306930793089309931093119312931393149315931693179318931993209321932293239324932593269327932893299330933193329333933493359336933793389339934093419342934393449345934693479348934993509351935293539354935593569357935893599360936193629363936493659366936793689369937093719372937393749375937693779378937993809381938293839384938593869387938893899390939193929393939493959396939793989399940094019402940394049405940694079408940994109411941294139414941594169417941894199420942194229423942494259426942794289429943094319432943394349435943694379438943994409441944294439444944594469447944894499450945194529453945494559456945794589459946094619462946394649465946694679468946994709471947294739474947594769477947894799480948194829483948494859486948794889489949094919492949394949495949694979498949995009501950295039504950595069507950895099510951195129513951495159516951795189519952095219522952395249525952695279528952995309531953295339534953595369537953895399540954195429543954495459546954795489549955095519552955395549555955695579558955995609561956295639564956595669567956895699570957195729573957495759576957795789579958095819582958395849585958695879588958995909591959295939594959595969597959895999600960196029603960496059606960796089609961096119612961396149615961696179618961996209621962296239624962596269627962896299630963196329633963496359636963796389639964096419642964396449645964696479648964996509651965296539654965596569657965896599660966196629663966496659666966796689669967096719672967396749675967696779678967996809681968296839684968596869687968896899690969196929693969496959696969796989699970097019702970397049705970697079708970997109711971297139714971597169717971897199720972197229723972497259726972797289729973097319732973397349735973697379738973997409741974297439744974597469747974897499750975197529753975497559756975797589759976097619762976397649765976697679768976997709771977297739774977597769777977897799780978197829783978497859786978797889789979097919792979397949795979697979798979998009801980298039804980598069807980898099810981198129813981498159816981798189819982098219822982398249825982698279828982998309831983298339834983598369837983898399840984198429843984498459846984798489849985098519852985398549855985698579858985998609861986298639864986598669867986898699870987198729873987498759876987798789879988098819882988398849885988698879888988998909891989298939894989598969897989898999900990199029903990499059906990799089909991099119912991399149915991699179918991999209921992299239924992599269927992899299930993199329933993499359936993799389939994099419942994399449945994699479948994999509951995299539954995599569957995899599960996199629963996499659966996799689969997099719972997399749975997699779978997999809981998299839984998599869987998899899990999199929993999499959996999799989999100001000110002100031000410005100061000710008100091001010011100121001310014100151001610017100181001910020100211002210023100241002510026100271002810029100301003110032100331003410035100361003710038100391004010041100421004310044100451004610047100481004910050100511005210053100541005510056100571005810059100601006110062100631006410065100661006710068100691007010071100721007310074100751007610077100781007910080100811008210083100841008510086100871008810089100901009110092100931009410095100961009710098100991010010101101021010310104101051010610107101081010910110101111011210113101141011510116101171011810119101201012110122101231012410125101261012710128101291013010131101321013310134101351013610137101381013910140101411014210143101441014510146101471014810149101501015110152101531015410155101561015710158101591016010161101621016310164101651016610167101681016910170101711017210173101741017510176101771017810179101801018110182101831018410185101861018710188101891019010191101921019310194101951019610197101981019910200102011020210203102041020510206102071020810209102101021110212102131021410215102161021710218102191022010221102221022310224102251022610227102281022910230102311023210233102341023510236102371023810239102401024110242102431024410245102461024710248102491025010251102521025310254102551025610257102581025910260102611026210263102641026510266102671026810269102701027110272102731027410275102761027710278102791028010281102821028310284102851028610287102881028910290102911029210293102941029510296102971029810299103001030110302103031030410305103061030710308103091031010311103121031310314103151031610317103181031910320103211032210323103241032510326103271032810329103301033110332103331033410335103361033710338103391034010341103421034310344103451034610347103481034910350103511035210353103541035510356103571035810359103601036110362103631036410365103661036710368103691037010371103721037310374103751037610377103781037910380103811038210383103841038510386103871038810389103901039110392103931039410395103961039710398103991040010401104021040310404104051040610407104081040910410104111041210413104141041510416104171041810419104201042110422104231042410425104261042710428104291043010431104321043310434104351043610437104381043910440104411044210443104441044510446104471044810449104501045110452104531045410455104561045710458104591046010461104621046310464104651046610467104681046910470104711047210473104741047510476104771047810479104801048110482104831048410485104861048710488104891049010491104921049310494104951049610497104981049910500105011050210503105041050510506105071050810509105101051110512105131051410515105161051710518105191052010521105221052310524105251052610527105281052910530105311053210533105341053510536105371053810539105401054110542105431054410545105461054710548105491055010551105521055310554105551055610557105581055910560105611056210563105641056510566105671056810569105701057110572105731057410575105761057710578105791058010581105821058310584105851058610587105881058910590105911059210593105941059510596105971059810599106001060110602106031060410605106061060710608106091061010611106121061310614106151061610617106181061910620106211062210623106241062510626106271062810629106301063110632106331063410635106361063710638106391064010641106421064310644106451064610647106481064910650106511065210653106541065510656106571065810659106601066110662106631066410665106661066710668106691067010671106721067310674106751067610677106781067910680106811068210683106841068510686106871068810689106901069110692106931069410695106961069710698106991070010701107021070310704107051070610707107081070910710107111071210713107141071510716107171071810719107201072110722107231072410725107261072710728107291073010731107321073310734107351073610737107381073910740107411074210743107441074510746107471074810749107501075110752107531075410755107561075710758107591076010761107621076310764107651076610767107681076910770107711077210773107741077510776107771077810779107801078110782107831078410785107861078710788107891079010791107921079310794107951079610797107981079910800108011080210803108041080510806108071080810809108101081110812108131081410815108161081710818108191082010821108221082310824108251082610827108281082910830108311083210833108341083510836108371083810839108401084110842108431084410845108461084710848108491085010851108521085310854108551085610857108581085910860108611086210863108641086510866108671086810869108701087110872108731087410875108761087710878108791088010881108821088310884108851088610887108881088910890108911089210893108941089510896108971089810899109001090110902109031090410905109061090710908109091091010911109121091310914109151091610917109181091910920109211092210923109241092510926109271092810929109301093110932109331093410935109361093710938109391094010941109421094310944109451094610947109481094910950109511095210953109541095510956109571095810959109601096110962109631096410965109661096710968109691097010971109721097310974109751097610977109781097910980109811098210983109841098510986109871098810989109901099110992109931099410995109961099710998109991100011001110021100311004110051100611007110081100911010110111101211013110141101511016110171101811019110201102111022110231102411025110261102711028110291103011031110321103311034110351103611037110381103911040110411104211043110441104511046110471104811049110501105111052110531105411055110561105711058110591106011061110621106311064110651106611067110681106911070110711107211073110741107511076110771107811079110801108111082110831108411085110861108711088110891109011091110921109311094110951109611097110981109911100111011110211103111041110511106111071110811109111101111111112111131111411115111161111711118111191112011121111221112311124111251112611127111281112911130111311113211133111341113511136111371113811139111401114111142111431114411145111461114711148111491115011151111521115311154111551115611157111581115911160111611116211163111641116511166111671116811169111701117111172111731117411175111761117711178111791118011181111821118311184111851118611187111881118911190111911119211193111941119511196111971119811199112001120111202112031120411205112061120711208112091121011211112121121311214112151121611217112181121911220112211122211223112241122511226112271122811229112301123111232112331123411235112361123711238112391124011241112421124311244112451124611247112481124911250112511125211253112541125511256112571125811259112601126111262112631126411265112661126711268112691127011271112721127311274112751127611277112781127911280112811128211283112841128511286112871128811289112901129111292112931129411295112961129711298112991130011301113021130311304113051130611307113081130911310113111131211313113141131511316113171131811319113201132111322113231132411325113261132711328113291133011331113321133311334113351133611337113381133911340113411134211343113441134511346113471134811349113501135111352113531135411355113561135711358113591136011361113621136311364113651136611367113681136911370113711137211373113741137511376113771137811379113801138111382113831138411385113861138711388113891139011391113921139311394113951139611397113981139911400114011140211403114041140511406114071140811409114101141111412114131141411415114161141711418114191142011421114221142311424114251142611427114281142911430114311143211433114341143511436114371143811439114401144111442114431144411445114461144711448114491145011451114521145311454114551145611457114581145911460114611146211463114641146511466114671146811469114701147111472114731147411475114761147711478114791148011481114821148311484114851148611487114881148911490114911149211493114941149511496114971149811499115001150111502115031150411505115061150711508115091151011511115121151311514115151151611517115181151911520115211152211523115241152511526115271152811529115301153111532115331153411535115361153711538115391154011541115421154311544115451154611547115481154911550115511155211553115541155511556115571155811559115601156111562115631156411565115661156711568115691157011571115721157311574115751157611577115781157911580115811158211583115841158511586115871158811589115901159111592115931159411595115961159711598115991160011601116021160311604116051160611607116081160911610116111161211613116141161511616116171161811619116201162111622116231162411625116261162711628116291163011631116321163311634116351163611637116381163911640116411164211643116441164511646116471164811649116501165111652116531165411655116561165711658116591166011661116621166311664116651166611667116681166911670116711167211673116741167511676116771167811679116801168111682116831168411685116861168711688116891169011691116921169311694116951169611697116981169911700117011170211703117041170511706117071170811709117101171111712117131171411715117161171711718117191172011721117221172311724117251172611727117281172911730117311173211733117341173511736117371173811739117401174111742117431174411745117461174711748117491175011751117521175311754117551175611757117581175911760117611176211763117641176511766117671176811769117701177111772117731177411775117761177711778117791178011781117821178311784117851178611787117881178911790117911179211793117941179511796117971179811799118001180111802118031180411805118061180711808118091181011811118121181311814118151181611817118181181911820118211182211823118241182511826118271182811829118301183111832118331183411835118361183711838118391184011841118421184311844118451184611847118481184911850118511185211853118541185511856118571185811859118601186111862118631186411865118661186711868118691187011871118721187311874118751187611877118781187911880118811188211883118841188511886118871188811889118901189111892118931189411895118961189711898118991190011901119021190311904119051190611907119081190911910119111191211913119141191511916119171191811919119201192111922119231192411925119261192711928119291193011931119321193311934119351193611937119381193911940119411194211943119441194511946119471194811949119501195111952119531195411955119561195711958119591196011961119621196311964119651196611967119681196911970119711197211973119741197511976119771197811979119801198111982119831198411985119861198711988119891199011991119921199311994119951199611997119981199912000120011200212003120041200512006120071200812009120101201112012120131201412015120161201712018120191202012021120221202312024120251202612027120281202912030120311203212033120341203512036120371203812039120401204112042120431204412045120461204712048120491205012051120521205312054120551205612057120581205912060120611206212063120641206512066120671206812069120701207112072120731207412075120761207712078120791208012081120821208312084120851208612087120881208912090120911209212093120941209512096120971209812099121001210112102121031210412105121061210712108121091211012111121121211312114121151211612117121181211912120121211212212123121241212512126121271212812129121301213112132121331213412135121361213712138121391214012141121421214312144121451214612147121481214912150121511215212153121541215512156121571215812159121601216112162121631216412165121661216712168121691217012171121721217312174121751217612177121781217912180121811218212183121841218512186121871218812189121901219112192121931219412195121961219712198121991220012201122021220312204122051220612207122081220912210122111221212213122141221512216122171221812219122201222112222122231222412225122261222712228122291223012231122321223312234122351223612237122381223912240122411224212243122441224512246122471224812249122501225112252122531225412255122561225712258122591226012261122621226312264122651226612267122681226912270122711227212273122741227512276122771227812279122801228112282122831228412285122861228712288122891229012291122921229312294122951229612297122981229912300123011230212303123041230512306123071230812309123101231112312123131231412315123161231712318123191232012321123221232312324123251232612327123281232912330123311233212333123341233512336123371233812339123401234112342123431234412345123461234712348123491235012351123521235312354123551235612357123581235912360123611236212363123641236512366123671236812369123701237112372123731237412375123761237712378123791238012381123821238312384123851238612387123881238912390123911239212393123941239512396123971239812399124001240112402124031240412405124061240712408124091241012411124121241312414124151241612417124181241912420124211242212423124241242512426124271242812429124301243112432124331243412435124361243712438124391244012441124421244312444124451244612447124481244912450124511245212453124541245512456124571245812459124601246112462124631246412465124661246712468124691247012471124721247312474124751247612477124781247912480124811248212483124841248512486124871248812489124901249112492124931249412495124961249712498124991250012501125021250312504125051250612507125081250912510125111251212513125141251512516125171251812519125201252112522125231252412525125261252712528125291253012531125321253312534125351253612537125381253912540125411254212543125441254512546125471254812549125501255112552125531255412555125561255712558125591256012561125621256312564125651256612567125681256912570125711257212573125741257512576125771257812579125801258112582125831258412585125861258712588125891259012591125921259312594125951259612597125981259912600126011260212603126041260512606126071260812609126101261112612126131261412615126161261712618126191262012621126221262312624126251262612627126281262912630126311263212633126341263512636126371263812639126401264112642126431264412645126461264712648126491265012651126521265312654126551265612657126581265912660126611266212663126641266512666126671266812669126701267112672126731267412675126761267712678126791268012681126821268312684126851268612687126881268912690126911269212693126941269512696126971269812699127001270112702127031270412705127061270712708127091271012711127121271312714127151271612717127181271912720127211272212723127241272512726127271272812729127301273112732127331273412735127361273712738127391274012741127421274312744127451274612747127481274912750127511275212753127541275512756127571275812759127601276112762127631276412765127661276712768127691277012771127721277312774127751277612777127781277912780127811278212783127841278512786127871278812789127901279112792127931279412795127961279712798127991280012801128021280312804128051280612807128081280912810128111281212813128141281512816128171281812819128201282112822128231282412825128261282712828128291283012831128321283312834128351283612837128381283912840128411284212843128441284512846128471284812849128501285112852128531285412855128561285712858128591286012861128621286312864128651286612867128681286912870128711287212873128741287512876128771287812879128801288112882128831288412885128861288712888128891289012891128921289312894128951289612897128981289912900129011290212903129041290512906129071290812909129101291112912129131291412915129161291712918129191292012921129221292312924129251292612927129281292912930129311293212933129341293512936129371293812939129401294112942129431294412945129461294712948129491295012951129521295312954129551295612957129581295912960129611296212963129641296512966129671296812969129701297112972129731297412975129761297712978129791298012981129821298312984129851298612987129881298912990129911299212993129941299512996129971299812999130001300113002130031300413005130061300713008130091301013011130121301313014130151301613017130181301913020130211302213023130241302513026130271302813029130301303113032130331303413035130361303713038130391304013041130421304313044130451304613047130481304913050130511305213053130541305513056130571305813059130601306113062130631306413065130661306713068130691307013071130721307313074130751307613077130781307913080130811308213083130841308513086130871308813089130901309113092130931309413095130961309713098130991310013101131021310313104131051310613107131081310913110131111311213113131141311513116131171311813119131201312113122131231312413125131261312713128131291313013131131321313313134131351313613137131381313913140131411314213143131441314513146131471314813149131501315113152131531315413155131561315713158131591316013161131621316313164131651316613167131681316913170131711317213173131741317513176131771317813179131801318113182131831318413185131861318713188131891319013191131921319313194131951319613197131981319913200132011320213203132041320513206132071320813209132101321113212132131321413215132161321713218132191322013221132221322313224132251322613227132281322913230132311323213233132341323513236132371323813239132401324113242132431324413245132461324713248132491325013251132521325313254132551325613257132581325913260132611326213263132641326513266132671326813269132701327113272132731327413275132761327713278132791328013281132821328313284132851328613287132881328913290132911329213293132941329513296132971329813299133001330113302133031330413305133061330713308133091331013311133121331313314133151331613317133181331913320133211332213323133241332513326133271332813329133301333113332133331333413335133361333713338133391334013341133421334313344133451334613347133481334913350133511335213353133541335513356133571335813359133601336113362133631336413365133661336713368133691337013371133721337313374133751337613377133781337913380133811338213383133841338513386133871338813389133901339113392133931339413395133961339713398133991340013401134021340313404134051340613407134081340913410134111341213413134141341513416134171341813419134201342113422134231342413425134261342713428134291343013431134321343313434134351343613437134381343913440134411344213443134441344513446134471344813449134501345113452134531345413455134561345713458134591346013461134621346313464134651346613467134681346913470134711347213473134741347513476134771347813479134801348113482134831348413485134861348713488134891349013491134921349313494134951349613497134981349913500135011350213503135041350513506135071350813509135101351113512135131351413515135161351713518135191352013521135221352313524135251352613527135281352913530135311353213533135341353513536135371353813539 |
- ;;; color-theme-library.el --- The real color theme functions
-
- ;; Copyright (C) 2005, 2006 Xavier Maillard <zedek@gnu.org>
- ;; Copyright (C) 2005, 2006 Brian Palmer <bpalmer@gmail.com>
-
- ;; Version: 0.0.9
- ;; Keywords: faces
- ;; Author: Brian Palmer, Xavier Maillard
- ;; Maintainer: Xavier Maillard <zedek@gnu.org>
- ;; URL: http://www.emacswiki.org/cgi-bin/wiki.pl?ColorTheme
-
- ;; This file is not (YET) part of GNU Emacs.
-
- ;; This is free software; you can redistribute it and/or modify it under
- ;; the terms of the GNU General Public License as published by the Free
- ;; Software Foundation; either version 2, or (at your option) any later
- ;; version.
- ;;
- ;; This is distributed in the hope that it will be useful, but WITHOUT
- ;; ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
- ;; FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
- ;; for more details.
- ;;
- ;; You should have received a copy of the GNU General Public License
- ;; along with GNU Emacs; see the file COPYING. If not, write to the
- ;; Free Software Foundation, Inc., 59 Temple Place - Suite 330, Boston,
- ;; MA 02111-1307, USA.
-
- ;; Code:
- (eval-when-compile
- (require 'color-theme))
-
- (defun color-theme-gnome ()
- "Wheat on darkslategrey scheme.
- From one version of Emacs in RH6 and Gnome, modified by Jonadab."
- (interactive)
- (color-theme-install
- '(color-theme-gnome
- ((foreground-color . "wheat")
- (background-color . "darkslategrey")
- (background-mode . dark))
- (default ((t (nil))))
- (region ((t (:foreground "cyan" :background "dark cyan"))))
- (underline ((t (:foreground "yellow" :underline t))))
- (modeline ((t (:foreground "dark cyan" :background "wheat"))))
- (modeline-buffer-id ((t (:foreground "dark cyan" :background "wheat"))))
- (modeline-mousable ((t (:foreground "dark cyan" :background "wheat"))))
- (modeline-mousable-minor-mode ((t (:foreground "dark cyan" :background "wheat"))))
- (italic ((t (:foreground "dark red" :italic t))))
- (bold-italic ((t (:foreground "dark red" :bold t :italic t))))
- (font-lock-comment-face ((t (:foreground "Firebrick"))))
- (bold ((t (:bold)))))))
-
- (defun color-theme-blue-gnus ()
- "Color theme for gnus and message faces only.
- This is intended for other color themes to use (eg. `color-theme-gnome2'
- and `color-theme-blue-sea')."
- (interactive)
- (color-theme-install
- '(color-theme-blue-gnus
- nil
- (gnus-cite-attribution-face ((t (:lforeground "lemon chiffon" :bold t))))
- (gnus-cite-face-1 ((t (:foreground "LightSalmon"))))
- (gnus-cite-face-2 ((t (:foreground "Khaki"))))
- (gnus-cite-face-3 ((t (:foreground "Coral"))))
- (gnus-cite-face-4 ((t (:foreground "yellow green"))))
- (gnus-cite-face-5 ((t (:foreground "dark khaki"))))
- (gnus-cite-face-6 ((t (:foreground "bisque"))))
- (gnus-cite-face-7 ((t (:foreground "peru"))))
- (gnus-cite-face-8 ((t (:foreground "light coral"))))
- (gnus-cite-face-9 ((t (:foreground "plum"))))
- (gnus-emphasis-bold ((t (:bold t))))
- (gnus-emphasis-bold-italic ((t (:italic t :bold t))))
- (gnus-emphasis-highlight-words ((t (:background "black" :foreground "yellow"))))
- (gnus-emphasis-italic ((t (:italic t))))
- (gnus-emphasis-underline ((t (:underline t))))
- (gnus-emphasis-underline-bold ((t (:bold t :underline t))))
- (gnus-emphasis-underline-bold-italic ((t (:italic t :bold t :underline t))))
- (gnus-emphasis-underline-italic ((t (:italic t :underline t))))
- (gnus-group-mail-1-empty-face ((t (:foreground "White"))))
- (gnus-group-mail-1-face ((t (:bold t :foreground "White"))))
- (gnus-group-mail-2-empty-face ((t (:foreground "light cyan"))))
- (gnus-group-mail-2-face ((t (:bold t :foreground "light cyan"))))
- (gnus-group-mail-3-empty-face ((t (:foreground "LightBlue"))))
- (gnus-group-mail-3-face ((t (:bold t :foreground "LightBlue"))))
- (gnus-group-mail-low-empty-face ((t (:foreground "Aquamarine"))))
- (gnus-group-mail-low-face ((t (:bold t :foreground "Aquamarine"))))
- (gnus-group-news-1-empty-face ((t (:foreground "White"))))
- (gnus-group-news-1-face ((t (:bold t :foreground "White"))))
- (gnus-group-news-2-empty-face ((t (:foreground "light cyan"))))
- (gnus-group-news-2-face ((t (:bold t :foreground "light cyan"))))
- (gnus-group-news-3-empty-face ((t (:foreground "LightBlue"))))
- (gnus-group-news-3-face ((t (:bold t :foreground "LightBlue"))))
- (gnus-group-news-4-empty-face ((t (:foreground "Aquamarine"))))
- (gnus-group-news-4-face ((t (:bold t :foreground "Aquamarine"))))
- (gnus-group-news-5-empty-face ((t (:foreground "MediumAquamarine"))))
- (gnus-group-news-5-face ((t (:bold t :foreground "MediumAquamarine"))))
- (gnus-group-news-6-empty-face ((t (:foreground "MediumAquamarine"))))
- (gnus-group-news-6-face ((t (:bold t :foreground "MediumAquamarine"))))
- (gnus-group-news-low-empty-face ((t (:foreground "MediumAquamarine"))))
- (gnus-group-news-low-face ((t (:bold t :foreground "MediumAquamarine"))))
- (gnus-header-content-face ((t (:foreground "LightSkyBlue3"))))
- (gnus-header-from-face ((t (:bold t :foreground "light cyan"))))
- (gnus-header-name-face ((t (:bold t :foreground "LightBlue"))))
- (gnus-header-newsgroups-face ((t (:bold t :foreground "MediumAquamarine"))))
- (gnus-header-subject-face ((t (:bold t :foreground "light cyan"))))
- (gnus-signature-face ((t (:foreground "Grey"))))
- (gnus-splash-face ((t (:foreground "ForestGreen"))))
- (gnus-summary-cancelled-face ((t (:background "Black" :foreground "Yellow"))))
- (gnus-summary-high-ancient-face ((t (:bold t :foreground "MediumAquamarine"))))
- (gnus-summary-high-read-face ((t (:bold t :foreground "Aquamarine"))))
- (gnus-summary-high-ticked-face ((t (:bold t :foreground "LightSalmon"))))
- (gnus-summary-high-unread-face ((t (:bold t :foreground "beige"))))
- (gnus-summary-low-ancient-face ((t (:foreground "DimGray"))))
- (gnus-summary-low-read-face ((t (:foreground "slate gray"))))
- (gnus-summary-low-ticked-face ((t (:foreground "Pink"))))
- (gnus-summary-low-unread-face ((t (:foreground "LightGray"))))
- (gnus-summary-normal-ancient-face ((t (:foreground "MediumAquamarine"))))
- (gnus-summary-normal-read-face ((t (:foreground "Aquamarine"))))
- (gnus-summary-normal-ticked-face ((t (:foreground "LightSalmon"))))
- (gnus-summary-normal-unread-face ((t (nil))))
- (gnus-summary-selected-face ((t (:background "DarkSlateBlue"))))
- (message-cited-text-face ((t (:foreground "LightSalmon"))))
- (message-header-cc-face ((t (:foreground "light cyan"))))
- (message-header-name-face ((t (:foreground "LightBlue"))))
- (message-header-newsgroups-face ((t (:bold t :foreground "MediumAquamarine"))))
- (message-header-other-face ((t (:foreground "MediumAquamarine"))))
- (message-header-subject-face ((t (:bold t :foreground "light cyan"))))
- (message-header-to-face ((t (:bold t :foreground "light cyan"))))
- (message-header-xheader-face ((t (:foreground "MediumAquamarine"))))
- (message-separator-face ((t (:foreground "chocolate")))))))
-
- (defun color-theme-dark-gnus ()
- "Color theme for gnus and message faces only.
- This is intended for other color themes to use
- \(eg. `color-theme-late-night')."
- (interactive)
- (color-theme-install
- '(color-theme-blue-gnus
- nil
- (gnus-cite-attribution-face ((t (:foreground "#bbb"))))
- (gnus-cite-face-1 ((t (:foreground "#aaa"))))
- (gnus-cite-face-2 ((t (:foreground "#aaa"))))
- (gnus-cite-face-3 ((t (:foreground "#aaa"))))
- (gnus-cite-face-4 ((t (:foreground "#aaa"))))
- (gnus-cite-face-5 ((t (:foreground "#aaa"))))
- (gnus-cite-face-6 ((t (:foreground "#aaa"))))
- (gnus-cite-face-7 ((t (:foreground "#aaa"))))
- (gnus-cite-face-8 ((t (:foreground "#aaa"))))
- (gnus-cite-face-9 ((t (:foreground "#aaa"))))
- (gnus-emphasis-bold ((t (:bold t))))
- (gnus-emphasis-bold-italic ((t (:italic t :bold t))))
- (gnus-emphasis-highlight-words ((t (:foreground "#ccc"))))
- (gnus-emphasis-italic ((t (:italic t))))
- (gnus-emphasis-underline ((t (:underline t))))
- (gnus-emphasis-underline-bold ((t (:bold t :underline t))))
- (gnus-emphasis-underline-bold-italic ((t (:italic t :bold t :underline t))))
- (gnus-emphasis-underline-italic ((t (:italic t :underline t))))
- (gnus-group-mail-1-empty-face ((t (:foreground "#999"))))
- (gnus-group-mail-1-face ((t (:bold t :foreground "#999"))))
- (gnus-group-mail-2-empty-face ((t (:foreground "#999"))))
- (gnus-group-mail-2-face ((t (:bold t :foreground "#999"))))
- (gnus-group-mail-3-empty-face ((t (:foreground "#888"))))
- (gnus-group-mail-3-face ((t (:bold t :foreground "#888"))))
- (gnus-group-mail-low-empty-face ((t (:foreground "#777"))))
- (gnus-group-mail-low-face ((t (:bold t :foreground "#777"))))
- (gnus-group-news-1-empty-face ((t (:foreground "#999"))))
- (gnus-group-news-1-face ((t (:bold t :foreground "#999"))))
- (gnus-group-news-2-empty-face ((t (:foreground "#888"))))
- (gnus-group-news-2-face ((t (:bold t :foreground "#888"))))
- (gnus-group-news-3-empty-face ((t (:foreground "#777"))))
- (gnus-group-news-3-face ((t (:bold t :foreground "#777"))))
- (gnus-group-news-4-empty-face ((t (:foreground "#666"))))
- (gnus-group-news-4-face ((t (:bold t :foreground "#666"))))
- (gnus-group-news-5-empty-face ((t (:foreground "#666"))))
- (gnus-group-news-5-face ((t (:bold t :foreground "#666"))))
- (gnus-group-news-6-empty-face ((t (:foreground "#666"))))
- (gnus-group-news-6-face ((t (:bold t :foreground "#666"))))
- (gnus-group-news-low-empty-face ((t (:foreground "#666"))))
- (gnus-group-news-low-face ((t (:bold t :foreground "#666"))))
- (gnus-header-content-face ((t (:foreground "#888"))))
- (gnus-header-from-face ((t (:bold t :foreground "#888"))))
- (gnus-header-name-face ((t (:bold t :foreground "#777"))))
- (gnus-header-newsgroups-face ((t (:bold t :foreground "#777"))))
- (gnus-header-subject-face ((t (:bold t :foreground "#999"))))
- (gnus-signature-face ((t (:foreground "#444"))))
- (gnus-splash-face ((t (:foreground "#ccc"))))
- (gnus-summary-cancelled-face ((t (:background "#555" :foreground "#000"))))
- (gnus-summary-high-ancient-face ((t (:bold t :foreground "#555"))))
- (gnus-summary-high-read-face ((t (:bold t :foreground "#666"))))
- (gnus-summary-high-ticked-face ((t (:bold t :foreground "#777"))))
- (gnus-summary-high-unread-face ((t (:bold t :foreground "#888"))))
- (gnus-summary-low-ancient-face ((t (:foreground "#444"))))
- (gnus-summary-low-read-face ((t (:foreground "#555"))))
- (gnus-summary-low-ticked-face ((t (:foreground "#666"))))
- (gnus-summary-low-unread-face ((t (:foreground "#777"))))
- (gnus-summary-normal-ancient-face ((t (:foreground "#555"))))
- (gnus-summary-normal-read-face ((t (:foreground "#666"))))
- (gnus-summary-normal-ticked-face ((t (:foreground "#777"))))
- (gnus-summary-normal-unread-face ((t (:foreground "#888"))))
- (gnus-summary-selected-face ((t (:background "#333"))))
- (message-cited-text-face ((t (:foreground "#aaa"))))
- (message-header-cc-face ((t (:foreground "#888"))))
- (message-header-name-face ((t (:bold t :foreground "#777"))))
- (message-header-newsgroups-face ((t (:bold t :foreground "#777"))))
- (message-header-other-face ((t (:foreground "#666"))))
- (message-header-subject-face ((t (:bold t :foreground "#999"))))
- (message-header-to-face ((t (:bold t :foreground "#777"))))
- (message-header-xheader-face ((t (:foreground "#666"))))
- (message-separator-face ((t (:foreground "#999")))))))
-
- (defun color-theme-blue-eshell ()
- "Color theme for eshell faces only.
- This is intended for other color themes to use (eg. `color-theme-gnome2')."
- (interactive)
- (color-theme-install
- '(color-theme-blue-eshell
- nil
- (eshell-ls-archive-face ((t (:bold t :foreground "IndianRed"))))
- (eshell-ls-backup-face ((t (:foreground "Grey"))))
- (eshell-ls-clutter-face ((t (:foreground "DimGray"))))
- (eshell-ls-directory-face ((t (:bold t :foreground "MediumSlateBlue"))))
- (eshell-ls-executable-face ((t (:foreground "Coral"))))
- (eshell-ls-missing-face ((t (:foreground "black"))))
- (eshell-ls-picture-face ((t (:foreground "Violet")))) ; non-standard face
- (eshell-ls-product-face ((t (:foreground "LightSalmon"))))
- (eshell-ls-readonly-face ((t (:foreground "Aquamarine"))))
- (eshell-ls-special-face ((t (:foreground "Gold"))))
- (eshell-ls-symlink-face ((t (:foreground "White"))))
- (eshell-ls-text-face ((t (:foreground "medium aquamarine")))) ; non-standard face
- (eshell-ls-todo-face ((t (:bold t :foreground "aquamarine")))) ; non-standard face
- (eshell-ls-unreadable-face ((t (:foreground "DimGray"))))
- (eshell-prompt-face ((t (:foreground "powder blue")))))))
-
- (defun color-theme-salmon-font-lock ()
- "Color theme for font-lock faces only.
- This is intended for other color themes to use (eg. `color-theme-gnome2')."
- (interactive)
- (color-theme-install
- '(color-theme-salmon-font-lock
- nil
- (font-lock-builtin-face ((t (:bold t :foreground "PaleGreen"))))
- (font-lock-comment-face ((t (:foreground "LightBlue"))))
- (font-lock-constant-face ((t (:foreground "Aquamarine"))))
- (font-lock-doc-string-face ((t (:foreground "LightSalmon"))))
- (font-lock-function-name-face ((t (:bold t :foreground "Aquamarine"))))
- (font-lock-keyword-face ((t (:foreground "Salmon"))))
- (font-lock-preprocessor-face ((t (:foreground "Salmon"))))
- (font-lock-reference-face ((t (:foreground "pale green"))))
- (font-lock-string-face ((t (:foreground "LightSalmon"))))
- (font-lock-type-face ((t (:bold t :foreground "YellowGreen"))))
- (font-lock-variable-name-face ((t (:bold t :foreground "Aquamarine"))))
- (font-lock-warning-face ((t (:bold t :foreground "red")))))))
-
- (defun color-theme-dark-font-lock ()
- "Color theme for font-lock faces only.
- This is intended for other color themes to use (eg. `color-theme-late-night')."
- (interactive)
- (color-theme-install
- '(color-theme-dark-font-lock
- nil
- (font-lock-builtin-face ((t (:bold t :foreground "#777"))))
- (font-lock-comment-face ((t (:foreground "#555"))))
- (font-lock-constant-face ((t (:foreground "#777"))))
- (font-lock-doc-string-face ((t (:foreground "#777"))))
- (font-lock-doc-face ((t (:foreground "#777"))))
- (font-lock-function-name-face ((t (:bold t :foreground "#777"))))
- (font-lock-keyword-face ((t (:foreground "#777"))))
- (font-lock-preprocessor-face ((t (:foreground "#777"))))
- (font-lock-reference-face ((t (:foreground "#777"))))
- (font-lock-string-face ((t (:foreground "#777"))))
- (font-lock-type-face ((t (:bold t))))
- (font-lock-variable-name-face ((t (:bold t :foreground "#888"))))
- (font-lock-warning-face ((t (:bold t :foreground "#999")))))))
-
- (defun color-theme-dark-info ()
- "Color theme for info, help and apropos faces.
- This is intended for other color themes to use (eg. `color-theme-late-night')."
- (interactive)
- (color-theme-install
- '(color-theme-dark-info
- nil
- (info-header-node ((t (:foreground "#666"))))
- (info-header-xref ((t (:foreground "#666"))))
- (info-menu-5 ((t (:underline t))))
- (info-menu-header ((t (:bold t :foreground "#666"))))
- (info-node ((t (:bold t :foreground "#888"))))
- (info-xref ((t (:bold t :foreground "#777")))))))
-
- (defun color-theme-gnome2 ()
- "Wheat on darkslategrey scheme.
- `color-theme-gnome' started it all.
-
- This theme supports standard faces, font-lock, eshell, info, message,
- gnus, custom, widget, woman, diary, cperl, bbdb, and erc. This theme
- includes faces for Emacs and XEmacs.
-
- The theme does not support w3 faces because w3 faces can be controlled
- by your default style sheet.
-
- This is what you should put in your .Xdefaults file, if you want to
- change the colors of the menus in Emacs 20 as well:
-
- emacs*Background: DarkSlateGray
- emacs*Foreground: Wheat"
- (interactive)
- (color-theme-blue-gnus)
- (let ((color-theme-is-cumulative t))
- (color-theme-blue-erc)
- (color-theme-blue-eshell)
- (color-theme-salmon-font-lock)
- (color-theme-salmon-diff)
- (color-theme-install
- '(color-theme-gnome2
- ((foreground-color . "wheat")
- (background-color . "darkslategrey")
- (mouse-color . "Grey")
- (cursor-color . "LightGray")
- (border-color . "black")
- (background-mode . dark))
- ((apropos-keybinding-face . underline)
- (apropos-label-face . italic)
- (apropos-match-face . secondary-selection)
- (apropos-property-face . bold-italic)
- (apropos-symbol-face . info-xref)
- (goto-address-mail-face . message-header-to-face)
- (goto-address-mail-mouse-face . secondary-selection)
- (goto-address-url-face . info-xref)
- (goto-address-url-mouse-face . highlight)
- (list-matching-lines-face . bold)
- (view-highlight-face . highlight))
- (default ((t (nil))))
- (bbdb-company ((t (:foreground "pale green"))))
- (bbdb-name ((t (:bold t :foreground "pale green"))))
- (bbdb-field-name ((t (:foreground "medium sea green"))))
- (bbdb-field-value ((t (:foreground "dark sea green"))))
- (bold ((t (:bold t))))
- (bold-italic ((t (:italic t :bold t :foreground "beige"))))
- (calendar-today-face ((t (:underline t))))
- (comint-highlight-prompt ((t (:foreground "medium aquamarine"))))
- (cperl-array-face ((t (:foreground "Yellow"))))
- (cperl-hash-face ((t (:foreground "White"))))
- (cperl-nonoverridable-face ((t (:foreground "SkyBlue"))))
- (custom-button-face ((t (:underline t :foreground "MediumSlateBlue"))))
- (custom-documentation-face ((t (:foreground "Grey"))))
- (custom-group-tag-face ((t (:foreground "MediumAquamarine"))))
- (custom-state-face ((t (:foreground "LightSalmon"))))
- (custom-variable-tag-face ((t (:foreground "Aquamarine"))))
- (diary-face ((t (:foreground "IndianRed"))))
- (dired-face-directory ((t (:bold t :foreground "sky blue"))))
- (dired-face-permissions ((t (:foreground "aquamarine"))))
- (dired-face-flagged ((t (:foreground "tomato"))))
- (dired-face-marked ((t (:foreground "light salmon"))))
- (dired-face-executable ((t (:foreground "green yellow"))))
- (fringe ((t (:background "darkslategrey"))))
- (highlight ((t (:background "PaleGreen" :foreground "DarkGreen"))))
- (highline-face ((t (:background "SeaGreen"))))
- (holiday-face ((t (:background "DimGray"))))
- (hyper-apropos-hyperlink ((t (:bold t :foreground "DodgerBlue1"))))
- (hyper-apropos-documentation ((t (:foreground "LightSalmon"))))
- (info-header-xref ((t (:foreground "DodgerBlue1" :bold t))))
- (info-menu-5 ((t (:underline t))))
- (info-node ((t (:underline t :bold t :foreground "DodgerBlue1"))))
- (info-xref ((t (:bold t :foreground "DodgerBlue1"))))
- (isearch ((t (:background "sea green"))))
- (italic ((t (:italic t))))
- (menu ((t (:foreground "wheat" :background "darkslategrey"))))
- (modeline ((t (:background "dark olive green" :foreground "wheat"))))
- (modeline-buffer-id ((t (:background "dark olive green" :foreground "beige"))))
- (modeline-mousable ((t (:background "dark olive green" :foreground "yellow green"))))
- (modeline-mousable-minor-mode ((t (:background "dark olive green" :foreground "wheat"))))
- (region ((t (:background "dark cyan" :foreground "cyan"))))
- (secondary-selection ((t (:background "Aquamarine" :foreground "SlateBlue"))))
- (show-paren-match-face ((t (:bold t :background "Aquamarine" :foreground "steel blue"))))
- (show-paren-mismatch-face ((t (:background "Red" :foreground "White"))))
- (underline ((t (:underline t))))
- (widget-field-face ((t (:foreground "LightBlue"))))
- (widget-inactive-face ((t (:foreground "DimGray"))))
- (widget-single-line-field-face ((t (:foreground "LightBlue"))))
- (w3m-anchor-face ((t (:bold t :foreground "DodgerBlue1"))))
- (w3m-arrived-anchor-face ((t (:bold t :foreground "DodgerBlue3"))))
- (w3m-header-line-location-title-face ((t (:foreground "beige" :background "dark olive green"))))
- (w3m-header-line-location-content-face ((t (:foreground "wheat" :background "dark olive green"))))
- (woman-bold-face ((t (:bold t))))
- (woman-italic-face ((t (:foreground "beige"))))
- (woman-unknown-face ((t (:foreground "LightSalmon"))))
- (zmacs-region ((t (:background "dark cyan" :foreground "cyan"))))))))
-
- (defun color-theme-simple-1 ()
- "Black background.
- Doesn't mess with most faces, but does turn on dark background mode."
- (interactive)
- (color-theme-install
- '(color-theme-simple-1
- ((foreground-color . "white")
- (background-color . "black")
- (cursor-color . "indian red")
- (background-mode . dark))
- (default ((t (nil))))
- (modeline ((t (:foreground "black" :background "white"))))
- (modeline-buffer-id ((t (:foreground "black" :background "white"))))
- (modeline-mousable ((t (:foreground "black" :background "white"))))
- (modeline-mousable-minor-mode ((t (:foreground "black" :background "white"))))
- (underline ((t (:underline t))))
- (region ((t (:background "grey")))))))
-
- (defun color-theme-jonadabian ()
- "Dark blue background.
- Supports standard faces, font-lock, highlight-changes, widget and
- custom."
- (interactive)
- (color-theme-install
- '(color-theme-jonadabian
- ((foreground-color . "#CCBB77")
- (cursor-color . "medium turquoise")
- (background-color . "#000055")
- (background-mode . dark))
- (default ((t (nil))))
- (modeline ((t (:foreground "cyan" :background "#007080"))))
- (modeline-buffer-id ((t (:foreground "cyan" :background "#007080"))))
- (modeline-mousable ((t (:foreground "cyan" :background "#007080"))))
- (modeline-mousable-minor-mode ((t (:foreground "cyan" :background "#007080"))))
- (underline ((t (:underline t))))
- (region ((t (:background "#004080"))))
- (font-lock-keyword-face ((t (:foreground "#00BBBB"))))
- (font-lock-comment-face ((t (:foreground "grey50" :bold t :italic t))))
- (font-lock-string-face ((t (:foreground "#10D010"))))
- (font-lock-constant-face ((t (:foreground "indian red"))))
- (highlight-changes-face ((t (:background "navy"))))
- (highlight-changes-delete-face ((t (:foreground "red" :background "navy"))))
- (widget-field-face ((t (:foreground "black" :background "grey35"))))
- (widget-inactive-face ((t (:foreground "gray"))))
- (custom-button-face ((t (:foreground "yellow" :background "dark blue"))))
- (custom-state-face ((t (:foreground "mediumaquamarine"))))
- (custom-face-tag-face ((t (:foreground "goldenrod" :underline t))))
- (custom-documentation-face ((t (:foreground "#10D010"))))
- (custom-set-face ((t (:foreground "#2020D0")))))))
-
- (defun color-theme-ryerson ()
- "White on midnightblue scheme.
- Used at Ryerson Polytechnic University in the Electronic Engineering department."
- (interactive)
- (color-theme-install
- '(color-theme-ryerson
- ((foreground-color . "white")
- (background-color . "midnightblue")
- (cursor-color . "red")
- (background-mode . dark))
- (default ((t (nil))))
- (modeline ((t (:foreground "black" :background "slategray3"))))
- (modeline-buffer-id ((t (:foreground "black" :background "slategray3"))))
- (modeline-mousable ((t (:foreground "black" :background "slategray3"))))
- (modeline-mousable-minor-mode ((t (:foreground "black" :background "slategray3"))))
- (underline ((t (:underline t))))
- (region ((t (:foreground "black" :background "slategray3")))))))
-
- (defun color-theme-wheat ()
- "Default colors on a wheat background.
- Calls the standard color theme function `color-theme-standard' in order
- to reset all faces."
- (interactive)
- (color-theme-standard)
- (let ((color-theme-is-cumulative t))
- (color-theme-install
- '(color-theme-wheat
- ((background-color . "Wheat"))))))
-
- (defun color-theme-standard ()
- "Emacs default colors.
- If you are missing standard faces in this theme, please notify the maintainer."
- (interactive)
- ;; Note that some of the things that make up a color theme are
- ;; actually variable settings!
- (color-theme-install
- '(color-theme-standard
- ((foreground-color . "black")
- (background-color . "white")
- (mouse-color . "black")
- (cursor-color . "black")
- (border-color . "black")
- (background-mode . light))
- ((Man-overstrike-face . bold)
- (Man-underline-face . underline)
- (apropos-keybinding-face . underline)
- (apropos-label-face . italic)
- (apropos-match-face . secondary-selection)
- (apropos-property-face . bold-italic)
- (apropos-symbol-face . bold)
- (goto-address-mail-face . italic)
- (goto-address-mail-mouse-face . secondary-selection)
- (goto-address-url-face . bold)
- (goto-address-url-mouse-face . highlight)
- (help-highlight-face . underline)
- (list-matching-lines-face . bold)
- (view-highlight-face . highlight))
- (default ((t (nil))))
- (bold ((t (:bold t))))
- (bold-italic ((t (:bold t :italic t))))
- (calendar-today-face ((t (:underline t))))
- (cperl-array-face ((t (:foreground "Blue" :background "lightyellow2" :bold t))))
- (cperl-hash-face ((t (:foreground "Red" :background "lightyellow2" :bold t :italic t))))
- (cperl-nonoverridable-face ((t (:foreground "chartreuse3"))))
- (custom-button-face ((t (nil))))
- (custom-changed-face ((t (:foreground "white" :background "blue"))))
- (custom-documentation-face ((t (nil))))
- (custom-face-tag-face ((t (:underline t))))
- (custom-group-tag-face ((t (:foreground "blue" :underline t))))
- (custom-group-tag-face-1 ((t (:foreground "red" :underline t))))
- (custom-invalid-face ((t (:foreground "yellow" :background "red"))))
- (custom-modified-face ((t (:foreground "white" :background "blue"))))
- (custom-rogue-face ((t (:foreground "pink" :background "black"))))
- (custom-saved-face ((t (:underline t))))
- (custom-set-face ((t (:foreground "blue" :background "white"))))
- (custom-state-face ((t (:foreground "dark green"))))
- (custom-variable-button-face ((t (:bold t :underline t))))
- (custom-variable-tag-face ((t (:foreground "blue" :underline t))))
- (diary-face ((t (:foreground "red"))))
- (ediff-current-diff-face-A ((t (:foreground "firebrick" :background "pale green"))))
- (ediff-current-diff-face-Ancestor ((t (:foreground "Black" :background "VioletRed"))))
- (ediff-current-diff-face-B ((t (:foreground "DarkOrchid" :background "Yellow"))))
- (ediff-current-diff-face-C ((t (:foreground "Navy" :background "Pink"))))
- (ediff-even-diff-face-A ((t (:foreground "Black" :background "light grey"))))
- (ediff-even-diff-face-Ancestor ((t (:foreground "White" :background "Grey"))))
- (ediff-even-diff-face-B ((t (:foreground "White" :background "Grey"))))
- (ediff-even-diff-face-C ((t (:foreground "Black" :background "light grey"))))
- (ediff-fine-diff-face-A ((t (:foreground "Navy" :background "sky blue"))))
- (ediff-fine-diff-face-Ancestor ((t (:foreground "Black" :background "Green"))))
- (ediff-fine-diff-face-B ((t (:foreground "Black" :background "cyan"))))
- (ediff-fine-diff-face-C ((t (:foreground "Black" :background "Turquoise"))))
- (ediff-odd-diff-face-A ((t (:foreground "White" :background "Grey"))))
- (ediff-odd-diff-face-Ancestor ((t (:foreground "Black" :background "light grey"))))
- (ediff-odd-diff-face-B ((t (:foreground "Black" :background "light grey"))))
- (ediff-odd-diff-face-C ((t (:foreground "White" :background "Grey"))))
- (eshell-ls-archive-face ((t (:foreground "Orchid" :bold t))))
- (eshell-ls-backup-face ((t (:foreground "OrangeRed"))))
- (eshell-ls-clutter-face ((t (:foreground "OrangeRed" :bold t))))
- (eshell-ls-directory-face ((t (:foreground "Blue" :bold t))))
- (eshell-ls-executable-face ((t (:foreground "ForestGreen" :bold t))))
- (eshell-ls-missing-face ((t (:foreground "Red" :bold t))))
- (eshell-ls-product-face ((t (:foreground "OrangeRed"))))
- (eshell-ls-readonly-face ((t (:foreground "Brown"))))
- (eshell-ls-special-face ((t (:foreground "Magenta" :bold t))))
- (eshell-ls-symlink-face ((t (:foreground "DarkCyan" :bold t))))
- (eshell-ls-unreadable-face ((t (:foreground "Grey30"))))
- (eshell-prompt-face ((t (:foreground "Red" :bold t))))
- (eshell-test-failed-face ((t (:foreground "OrangeRed" :bold t))))
- (eshell-test-ok-face ((t (:foreground "Green" :bold t))))
- (excerpt ((t (:italic t))))
- (fixed ((t (:bold t))))
- (flyspell-duplicate-face ((t (:foreground "Gold3" :bold t :underline t))))
- (flyspell-incorrect-face ((t (:foreground "OrangeRed" :bold t :underline t))))
- (font-lock-builtin-face ((t (:foreground "Orchid"))))
- (font-lock-comment-face ((t (:foreground "Firebrick"))))
- (font-lock-constant-face ((t (:foreground "CadetBlue"))))
- (font-lock-function-name-face ((t (:foreground "Blue"))))
- (font-lock-keyword-face ((t (:foreground "Purple"))))
- (font-lock-string-face ((t (:foreground "RosyBrown"))))
- (font-lock-type-face ((t (:foreground "ForestGreen"))))
- (font-lock-variable-name-face ((t (:foreground "DarkGoldenrod"))))
- (font-lock-warning-face ((t (:foreground "Red" :bold t))))
- (fringe ((t (:background "grey95"))))
- (gnus-cite-attribution-face ((t (:italic t))))
- (gnus-cite-face-1 ((t (:foreground "MidnightBlue"))))
- (gnus-cite-face-10 ((t (:foreground "medium purple"))))
- (gnus-cite-face-11 ((t (:foreground "turquoise"))))
- (gnus-cite-face-2 ((t (:foreground "firebrick"))))
- (gnus-cite-face-3 ((t (:foreground "dark green"))))
- (gnus-cite-face-4 ((t (:foreground "OrangeRed"))))
- (gnus-cite-face-5 ((t (:foreground "dark khaki"))))
- (gnus-cite-face-6 ((t (:foreground "dark violet"))))
- (gnus-cite-face-7 ((t (:foreground "SteelBlue4"))))
- (gnus-cite-face-8 ((t (:foreground "magenta"))))
- (gnus-cite-face-9 ((t (:foreground "violet"))))
- (gnus-emphasis-bold ((t (:bold t))))
- (gnus-emphasis-bold-italic ((t (:bold t :italic t))))
- (gnus-emphasis-italic ((t (:italic t))))
- (gnus-emphasis-underline ((t (:underline t))))
- (gnus-emphasis-underline-bold ((t (:bold t :underline t))))
- (gnus-emphasis-underline-bold-italic ((t (:bold t :italic t :underline t))))
- (gnus-emphasis-underline-italic ((t (:italic t :underline t))))
- (gnus-group-mail-1-empty-face ((t (:foreground "DeepPink3"))))
- (gnus-group-mail-1-face ((t (:foreground "DeepPink3" :bold t))))
- (gnus-group-mail-2-empty-face ((t (:foreground "HotPink3"))))
- (gnus-group-mail-2-face ((t (:foreground "HotPink3" :bold t))))
- (gnus-group-mail-3-empty-face ((t (:foreground "magenta4"))))
- (gnus-group-mail-3-face ((t (:foreground "magenta4" :bold t))))
- (gnus-group-mail-low-empty-face ((t (:foreground "DeepPink4"))))
- (gnus-group-mail-low-face ((t (:foreground "DeepPink4" :bold t))))
- (gnus-group-news-1-empty-face ((t (:foreground "ForestGreen"))))
- (gnus-group-news-1-face ((t (:foreground "ForestGreen" :bold t))))
- (gnus-group-news-2-empty-face ((t (:foreground "CadetBlue4"))))
- (gnus-group-news-2-face ((t (:foreground "CadetBlue4" :bold t))))
- (gnus-group-news-3-empty-face ((t (nil))))
- (gnus-group-news-3-face ((t (:bold t))))
- (gnus-group-news-low-empty-face ((t (:foreground "DarkGreen"))))
- (gnus-group-news-low-face ((t (:foreground "DarkGreen" :bold t))))
- (gnus-header-content-face ((t (:foreground "indianred4" :italic t))))
- (gnus-header-from-face ((t (:foreground "red3"))))
- (gnus-header-name-face ((t (:foreground "maroon"))))
- (gnus-header-newsgroups-face ((t (:foreground "MidnightBlue" :italic t))))
- (gnus-header-subject-face ((t (:foreground "red4"))))
- (gnus-signature-face ((t (:italic t))))
- (gnus-splash-face ((t (:foreground "ForestGreen"))))
- (gnus-summary-cancelled-face ((t (:foreground "yellow" :background "black"))))
- (gnus-summary-high-ancient-face ((t (:foreground "RoyalBlue" :bold t))))
- (gnus-summary-high-read-face ((t (:foreground "DarkGreen" :bold t))))
- (gnus-summary-high-ticked-face ((t (:foreground "firebrick" :bold t))))
- (gnus-summary-high-unread-face ((t (:bold t))))
- (gnus-summary-low-ancient-face ((t (:foreground "RoyalBlue" :italic t))))
- (gnus-summary-low-read-face ((t (:foreground "DarkGreen" :italic t))))
- (gnus-summary-low-ticked-face ((t (:foreground "firebrick" :italic t))))
- (gnus-summary-low-unread-face ((t (:italic t))))
- (gnus-summary-normal-ancient-face ((t (:foreground "RoyalBlue"))))
- (gnus-summary-normal-read-face ((t (:foreground "DarkGreen"))))
- (gnus-summary-normal-ticked-face ((t (:foreground "firebrick"))))
- (gnus-summary-normal-unread-face ((t (nil))))
- (gnus-summary-selected-face ((t (:underline t))))
- (highlight ((t (:background "darkseagreen2"))))
- (highlight-changes-delete-face ((t (:foreground "red" :underline t))))
- (highlight-changes-face ((t (:foreground "red"))))
- (highline-face ((t (:background "paleturquoise"))))
- (holiday-face ((t (:background "pink"))))
- (info-menu-5 ((t (:underline t))))
- (info-node ((t (:bold t :italic t))))
- (info-xref ((t (:bold t))))
- (italic ((t (:italic t))))
- (makefile-space-face ((t (:background "hotpink"))))
- (message-cited-text-face ((t (:foreground "red"))))
- (message-header-cc-face ((t (:foreground "MidnightBlue"))))
- (message-header-name-face ((t (:foreground "cornflower blue"))))
- (message-header-newsgroups-face ((t (:foreground "blue4" :bold t :italic t))))
- (message-header-other-face ((t (:foreground "steel blue"))))
- (message-header-subject-face ((t (:foreground "navy blue" :bold t))))
- (message-header-to-face ((t (:foreground "MidnightBlue" :bold t))))
- (message-header-xheader-face ((t (:foreground "blue"))))
- (message-separator-face ((t (:foreground "brown"))))
- (modeline ((t (:foreground "white" :background "black"))))
- (modeline-buffer-id ((t (:foreground "white" :background "black"))))
- (modeline-mousable ((t (:foreground "white" :background "black"))))
- (modeline-mousable-minor-mode ((t (:foreground "white" :background "black"))))
- (region ((t (:background "gray"))))
- (secondary-selection ((t (:background "paleturquoise"))))
- (show-paren-match-face ((t (:background "turquoise"))))
- (show-paren-mismatch-face ((t (:foreground "white" :background "purple"))))
- (speedbar-button-face ((t (:foreground "green4"))))
- (speedbar-directory-face ((t (:foreground "blue4"))))
- (speedbar-file-face ((t (:foreground "cyan4"))))
- (speedbar-highlight-face ((t (:background "green"))))
- (speedbar-selected-face ((t (:foreground "red" :underline t))))
- (speedbar-tag-face ((t (:foreground "brown"))))
- (term-black ((t (:foreground "black"))))
- (term-blackbg ((t (:background "black"))))
- (term-blue ((t (:foreground "blue"))))
- (term-bluebg ((t (:background "blue"))))
- (term-bold ((t (:bold t))))
- (term-cyan ((t (:foreground "cyan"))))
- (term-cyanbg ((t (:background "cyan"))))
- (term-default-bg ((t (nil))))
- (term-default-bg-inv ((t (nil))))
- (term-default-fg ((t (nil))))
- (term-default-fg-inv ((t (nil))))
- (term-green ((t (:foreground "green"))))
- (term-greenbg ((t (:background "green"))))
- (term-invisible ((t (nil))))
- (term-invisible-inv ((t (nil))))
- (term-magenta ((t (:foreground "magenta"))))
- (term-magentabg ((t (:background "magenta"))))
- (term-red ((t (:foreground "red"))))
- (term-redbg ((t (:background "red"))))
- (term-underline ((t (:underline t))))
- (term-white ((t (:foreground "white"))))
- (term-whitebg ((t (:background "white"))))
- (term-yellow ((t (:foreground "yellow"))))
- (term-yellowbg ((t (:background "yellow"))))
- (underline ((t (:underline t))))
- (vcursor ((t (:foreground "blue" :background "cyan" :underline t))))
- (vhdl-font-lock-attribute-face ((t (:foreground "Orchid"))))
- (vhdl-font-lock-directive-face ((t (:foreground "CadetBlue"))))
- (vhdl-font-lock-enumvalue-face ((t (:foreground "Gold4"))))
- (vhdl-font-lock-function-face ((t (:foreground "Orchid4"))))
- (vhdl-font-lock-prompt-face ((t (:foreground "Red" :bold t))))
- (vhdl-font-lock-reserved-words-face ((t (:foreground "Orange" :bold t))))
- (vhdl-font-lock-translate-off-face ((t (:background "LightGray"))))
- (vhdl-speedbar-architecture-face ((t (:foreground "Blue"))))
- (vhdl-speedbar-architecture-selected-face ((t (:foreground "Blue" :underline t))))
- (vhdl-speedbar-configuration-face ((t (:foreground "DarkGoldenrod"))))
- (vhdl-speedbar-configuration-selected-face ((t (:foreground "DarkGoldenrod" :underline t))))
- (vhdl-speedbar-entity-face ((t (:foreground "ForestGreen"))))
- (vhdl-speedbar-entity-selected-face ((t (:foreground "ForestGreen" :underline t))))
- (vhdl-speedbar-instantiation-face ((t (:foreground "Brown"))))
- (vhdl-speedbar-instantiation-selected-face ((t (:foreground "Brown" :underline t))))
- (vhdl-speedbar-package-face ((t (:foreground "Grey50"))))
- (vhdl-speedbar-package-selected-face ((t (:foreground "Grey50" :underline t))))
- (viper-minibuffer-emacs-face ((t (:foreground "Black" :background "darkseagreen2"))))
- (viper-minibuffer-insert-face ((t (:foreground "Black" :background "pink"))))
- (viper-minibuffer-vi-face ((t (:foreground "DarkGreen" :background "grey"))))
- (viper-replace-overlay-face ((t (:foreground "Black" :background "darkseagreen2"))))
- (viper-search-face ((t (:foreground "Black" :background "khaki"))))
- (widget-button-face ((t (:bold t))))
- (widget-button-pressed-face ((t (:foreground "red"))))
- (widget-documentation-face ((t (:foreground "dark green"))))
- (widget-field-face ((t (:background "gray85"))))
- (widget-inactive-face ((t (:foreground "dim gray"))))
- (widget-single-line-field-face ((t (:background "gray85")))))))
-
- (defun color-theme-fischmeister ()
- "The light colors on a grey blackground.
- Sebastian Fischmeister <sfischme@nexus.lzk.tuwien.ac.at>"
- (interactive)
- (color-theme-install
- '(color-theme-fischmeister
- ((foreground-color . "black")
- (background-color . "gray80")
- (mouse-color . "red")
- (cursor-color . "yellow")
- (border-color . "black")
- (background-mode . light))
- (default ((t (nil))))
- (modeline ((t (:foreground "gray80" :background "black"))))
- (modeline-buffer-id ((t (:foreground "gray80" :background "black"))))
- (modeline-mousable ((t (:foreground "gray80" :background "black"))))
- (modeline-mousable-minor-mode ((t (:foreground "gray80" :background "black"))))
- (highlight ((t (:background "darkseagreen2"))))
- (bold ((t (:bold t))))
- (italic ((t (:italic t))))
- (bold-italic ((t (:bold t :italic t))))
- (region ((t (:background "gray"))))
- (secondary-selection ((t (:background "paleturquoise"))))
- (underline ((t (:underline t))))
- (show-paren-match-face ((t (:foreground "yellow" :background "darkgreen"))))
- (show-paren-mismatch-face ((t (:foreground "white" :background "red"))))
- (font-lock-comment-face ((t (:foreground "FireBrick" :bold t :italic t))))
- (font-lock-string-face ((t (:foreground "DarkSlateBlue" :italic t))))
- (font-lock-keyword-face ((t (:foreground "navy"))))
- (font-lock-builtin-face ((t (:foreground "white"))))
- (font-lock-function-name-face ((t (:foreground "Blue"))))
- (font-lock-variable-name-face ((t (:foreground "Darkblue"))))
- (font-lock-type-face ((t (:foreground "darkgreen"))))
- (font-lock-constant-face ((t (:foreground "CadetBlue"))))
- (font-lock-warning-face ((t (:foreground "Orchid" :bold t))))
- (font-lock-reference-face ((t (:foreground "SteelBlue")))))))
-
- (defun color-theme-sitaramv-solaris ()
- "White on a midnight blue background. Lots of yellow and orange.
- Includes faces for font-lock, widget, custom, speedbar, message, gnus,
- eshell."
- (interactive)
- (color-theme-install
- '(color-theme-sitaramv-solaris
- ((foreground-color . "white")
- (background-color . "MidnightBlue")
- (mouse-color . "yellow")
- (cursor-color . "magenta2")
- (border-color . "black")
- (background-mode . dark))
- (default ((t (nil))))
- (modeline ((t (:foreground "black" :background "gold2"))))
- (modeline-buffer-id ((t (:foreground "black" :background "gold2"))))
- (modeline-mousable ((t (:foreground "black" :background "gold2"))))
- (modeline-mousable-minor-mode ((t (:foreground "black" :background "gold2"))))
- (highlight ((t (:foreground "black" :background "Aquamarine"))))
- (bold ((t (:bold t))))
- (italic ((t (:italic t))))
- (bold-italic ((t (:bold t :italic t))))
- (region ((t (:foreground "black" :background "snow3"))))
- (secondary-selection ((t (:foreground "black" :background "aquamarine"))))
- (underline ((t (:underline t))))
- (lazy-highlight-face ((t (:foreground "yellow"))))
- (font-lock-comment-face ((t (:foreground "orange" :italic t))))
- (font-lock-string-face ((t (:foreground "orange"))))
- (font-lock-keyword-face ((t (:foreground "green"))))
- (font-lock-builtin-face ((t (:foreground "LightSteelBlue"))))
- (font-lock-function-name-face ((t (:foreground "cyan" :bold t))))
- (font-lock-variable-name-face ((t (:foreground "white"))))
- (font-lock-type-face ((t (:foreground "cyan"))))
- (font-lock-constant-face ((t (:foreground "Aquamarine"))))
- (font-lock-warning-face ((t (:foreground "Pink" :bold t))))
- (widget-documentation-face ((t (:foreground "lime green"))))
- (widget-button-face ((t (:bold t))))
- (widget-field-face ((t (:background "dim gray"))))
- (widget-single-line-field-face ((t (:background "dim gray"))))
- (widget-inactive-face ((t (:foreground "light gray"))))
- (widget-button-pressed-face ((t (:foreground "red"))))
- (custom-invalid-face ((t (:foreground "yellow" :background "red"))))
- (custom-rogue-face ((t (:foreground "pink" :background "black"))))
- (custom-modified-face ((t (:foreground "white" :background "blue"))))
- (custom-set-face ((t (:foreground "blue" :background "white"))))
- (custom-changed-face ((t (:foreground "white" :background "blue"))))
- (custom-saved-face ((t (:underline t))))
- (custom-button-face ((t (nil))))
- (custom-documentation-face ((t (nil))))
- (custom-state-face ((t (:foreground "lime green"))))
- (custom-variable-tag-face ((t (:foreground "light blue" :underline t))))
- (custom-variable-button-face ((t (:bold t :underline t))))
- (custom-face-tag-face ((t (:underline t))))
- (custom-group-tag-face-1 ((t (:foreground "pink" :underline t))))
- (custom-group-tag-face ((t (:foreground "light blue" :underline t))))
- (speedbar-button-face ((t (:foreground "green3"))))
- (speedbar-file-face ((t (:foreground "cyan"))))
- (speedbar-directory-face ((t (:foreground "light blue"))))
- (speedbar-tag-face ((t (:foreground "yellow"))))
- (speedbar-selected-face ((t (:foreground "red" :underline t))))
- (speedbar-highlight-face ((t (:background "sea green"))))
- (font-lock-doc-string-face ((t (:foreground "Plum1" :bold t))))
- (font-lock-exit-face ((t (:foreground "green"))))
- (ff-paths-non-existant-file-face ((t (:foreground "NavyBlue" :bold t))))
- (show-paren-match-face ((t (:background "red"))))
- (show-paren-mismatch-face ((t (:foreground "white" :background "purple"))))
- (message-header-to-face ((t (:foreground "green2" :bold t))))
- (message-header-cc-face ((t (:foreground "LightGoldenrod" :bold t))))
- (message-header-subject-face ((t (:foreground "green3"))))
- (message-header-newsgroups-face ((t (:foreground "yellow" :bold t :italic t))))
- (message-header-other-face ((t (:foreground "Salmon"))))
- (message-header-name-face ((t (:foreground "green3"))))
- (message-header-xheader-face ((t (:foreground "GreenYellow"))))
- (message-separator-face ((t (:foreground "Tan"))))
- (message-cited-text-face ((t (:foreground "Gold"))))
- (message-mml-face ((t (:foreground "ForestGreen"))))
- (gnus-group-news-1-face ((t (:foreground "PaleTurquoise" :bold t))))
- (gnus-group-news-1-empty-face ((t (:foreground "PaleTurquoise"))))
- (gnus-group-news-2-face ((t (:foreground "turquoise" :bold t))))
- (gnus-group-news-2-empty-face ((t (:foreground "turquoise"))))
- (gnus-group-news-3-face ((t (:bold t))))
- (gnus-group-news-3-empty-face ((t (nil))))
- (gnus-group-news-4-face ((t (:bold t))))
- (gnus-group-news-4-empty-face ((t (nil))))
- (gnus-group-news-5-face ((t (:bold t))))
- (gnus-group-news-5-empty-face ((t (nil))))
- (gnus-group-news-6-face ((t (:bold t))))
- (gnus-group-news-6-empty-face ((t (nil))))
- (gnus-group-news-low-face ((t (:foreground "DarkTurquoise" :bold t))))
- (gnus-group-news-low-empty-face ((t (:foreground "DarkTurquoise"))))
- (gnus-group-mail-1-face ((t (:foreground "aquamarine1" :bold t))))
- (gnus-group-mail-1-empty-face ((t (:foreground "aquamarine1"))))
- (gnus-group-mail-2-face ((t (:foreground "aquamarine2" :bold t))))
- (gnus-group-mail-2-empty-face ((t (:foreground "aquamarine2"))))
- (gnus-group-mail-3-face ((t (:foreground "aquamarine3" :bold t))))
- (gnus-group-mail-3-empty-face ((t (:foreground "aquamarine3"))))
- (gnus-group-mail-low-face ((t (:foreground "aquamarine4" :bold t))))
- (gnus-group-mail-low-empty-face ((t (:foreground "aquamarine4"))))
- (gnus-summary-selected-face ((t (:underline t))))
- (gnus-summary-cancelled-face ((t (:foreground "yellow" :background "black"))))
- (gnus-summary-high-ticked-face ((t (:foreground "pink" :bold t))))
- (gnus-summary-low-ticked-face ((t (:foreground "pink" :italic t))))
- (gnus-summary-normal-ticked-face ((t (:foreground "pink"))))
- (gnus-summary-high-ancient-face ((t (:foreground "SkyBlue" :bold t))))
- (gnus-summary-low-ancient-face ((t (:foreground "SkyBlue" :italic t))))
- (gnus-summary-normal-ancient-face ((t (:foreground "SkyBlue"))))
- (gnus-summary-high-unread-face ((t (:bold t))))
- (gnus-summary-low-unread-face ((t (:italic t))))
- (gnus-summary-normal-unread-face ((t (nil))))
- (gnus-summary-high-read-face ((t (:foreground "PaleGreen" :bold t))))
- (gnus-summary-low-read-face ((t (:foreground "PaleGreen" :italic t))))
- (gnus-summary-normal-read-face ((t (:foreground "PaleGreen"))))
- (gnus-splash-face ((t (:foreground "Brown"))))
- (eshell-ls-directory-face ((t (:foreground "SkyBlue" :bold t))))
- (eshell-ls-symlink-face ((t (:foreground "Cyan" :bold t))))
- (eshell-ls-executable-face ((t (:foreground "Green" :bold t))))
- (eshell-ls-readonly-face ((t (:foreground "Pink"))))
- (eshell-ls-unreadable-face ((t (:foreground "DarkGrey"))))
- (eshell-ls-special-face ((t (:foreground "Magenta" :bold t))))
- (eshell-ls-missing-face ((t (:foreground "Red" :bold t))))
- (eshell-ls-archive-face ((t (:foreground "Orchid" :bold t))))
- (eshell-ls-backup-face ((t (:foreground "LightSalmon"))))
- (eshell-ls-product-face ((t (:foreground "LightSalmon"))))
- (eshell-ls-clutter-face ((t (:foreground "OrangeRed" :bold t))))
- (eshell-prompt-face ((t (:foreground "Pink" :bold t))))
- (term-default-fg ((t (nil))))
- (term-default-bg ((t (nil))))
- (term-default-fg-inv ((t (nil))))
- (term-default-bg-inv ((t (nil))))
- (term-bold ((t (:bold t))))
- (term-underline ((t (:underline t))))
- (term-invisible ((t (nil))))
- (term-invisible-inv ((t (nil))))
- (term-black ((t (:foreground "black"))))
- (term-red ((t (:foreground "red"))))
- (term-green ((t (:foreground "green"))))
- (term-yellow ((t (:foreground "yellow"))))
- (term-blue ((t (:foreground "blue"))))
- (term-magenta ((t (:foreground "magenta"))))
- (term-cyan ((t (:foreground "cyan"))))
- (term-white ((t (:foreground "white"))))
- (term-blackbg ((t (:background "black"))))
- (term-redbg ((t (:background "red"))))
- (term-greenbg ((t (:background "green"))))
- (term-yellowbg ((t (:background "yellow"))))
- (term-bluebg ((t (:background "blue"))))
- (term-magentabg ((t (:background "magenta"))))
- (term-cyanbg ((t (:background "cyan"))))
- (term-whitebg ((t (:background "white"))))
- (gnus-emphasis-bold ((t (:bold t))))
- (gnus-emphasis-italic ((t (:italic t))))
- (gnus-emphasis-underline ((t (:underline t))))
- (gnus-emphasis-underline-bold ((t (:bold t :underline t))))
- (gnus-emphasis-underline-italic ((t (:italic t :underline t))))
- (gnus-emphasis-bold-italic ((t (:bold t :italic t))))
- (gnus-emphasis-underline-bold-italic ((t (:bold t :italic t :underline t))))
- (gnus-emphasis-highlight-words ((t (:foreground "yellow" :background "black"))))
- (gnus-signature-face ((t (:italic t))))
- (gnus-header-from-face ((t (:foreground "spring green"))))
- (gnus-header-subject-face ((t (:foreground "yellow" :bold t))))
- (gnus-header-newsgroups-face ((t (:foreground "SeaGreen3" :bold t :italic t))))
- (gnus-header-name-face ((t (:foreground "pink"))))
- (gnus-header-content-face ((t (:foreground "lime green" :italic t))))
- (gnus-cite-attribution-face ((t (:italic t))))
- (gnus-cite-face-1 ((t (:foreground "light blue"))))
- (gnus-cite-face-2 ((t (:foreground "light cyan"))))
- (gnus-cite-face-3 ((t (:foreground "light yellow"))))
- (gnus-cite-face-4 ((t (:foreground "light pink"))))
- (gnus-cite-face-5 ((t (:foreground "pale green"))))
- (gnus-cite-face-6 ((t (:foreground "beige"))))
- (gnus-cite-face-7 ((t (:foreground "orange"))))
- (gnus-cite-face-8 ((t (:foreground "magenta"))))
- (gnus-cite-face-9 ((t (:foreground "violet"))))
- (gnus-cite-face-10 ((t (:foreground "medium purple"))))
- (gnus-cite-face-11 ((t (:foreground "turquoise")))))))
-
- (defun color-theme-sitaramv-nt ()
- "Black foreground on white background.
- Includes faces for font-lock, widget, custom, speedbar."
- (interactive)
- (color-theme-install
- '(color-theme-sitaramv-nt
- ((foreground-color . "black")
- (background-color . "white")
- (mouse-color . "sienna3")
- (cursor-color . "HotPink")
- (border-color . "Blue")
- (background-mode . light))
- (default ((t (nil))))
- (modeline ((t (:foreground "black" :background "gold2"))))
- (modeline-buffer-id ((t (:foreground "black" :background "gold2"))))
- (modeline-mousable ((t (:foreground "black" :background "gold2"))))
- (modeline-mousable-minor-mode ((t (:foreground "black" :background "gold2"))))
- (highlight ((t (:foreground "black" :background "darkseagreen2"))))
- (bold ((t (:bold t))))
- (italic ((t (:italic t))))
- (bold-italic ((t (:bold t :italic t))))
- (region ((t (:foreground "black" :background "snow3"))))
- (secondary-selection ((t (:background "paleturquoise"))))
- (underline ((t (:underline t))))
- (lazy-highlight-face ((t (:foreground "dark magenta" :bold t))))
- (font-lock-comment-face ((t (:foreground "ForestGreen" :italic t))))
- (font-lock-string-face ((t (:foreground "red"))))
- (font-lock-keyword-face ((t (:foreground "blue" :bold t))))
- (font-lock-builtin-face ((t (:foreground "black"))))
- (font-lock-function-name-face ((t (:foreground "dark magenta" :bold t))))
- (font-lock-variable-name-face ((t (:foreground "black"))))
- (font-lock-type-face ((t (:foreground "blue"))))
- (font-lock-constant-face ((t (:foreground "CadetBlue"))))
- (font-lock-warning-face ((t (:foreground "Red" :bold t))))
- (widget-documentation-face ((t (:foreground "dark green"))))
- (widget-button-face ((t (:bold t))))
- (widget-field-face ((t (:background "gray85"))))
- (widget-single-line-field-face ((t (:background "gray85"))))
- (widget-inactive-face ((t (:foreground "dim gray"))))
- (widget-button-pressed-face ((t (:foreground "red"))))
- (custom-invalid-face ((t (:foreground "yellow" :background "red"))))
- (custom-rogue-face ((t (:foreground "pink" :background "black"))))
- (custom-modified-face ((t (:foreground "white" :background "blue"))))
- (custom-set-face ((t (:foreground "blue" :background "white"))))
- (custom-changed-face ((t (:foreground "white" :background "blue"))))
- (custom-saved-face ((t (:underline t))))
- (custom-button-face ((t (nil))))
- (custom-documentation-face ((t (nil))))
- (custom-state-face ((t (:foreground "dark green"))))
- (custom-variable-tag-face ((t (:foreground "blue" :underline t))))
- (custom-variable-button-face ((t (:bold t :underline t))))
- (custom-face-tag-face ((t (:underline t))))
- (custom-group-tag-face-1 ((t (:foreground "red" :underline t))))
- (custom-group-tag-face ((t (:foreground "blue" :underline t))))
- (speedbar-button-face ((t (:foreground "green4"))))
- (speedbar-file-face ((t (:foreground "cyan4"))))
- (speedbar-directory-face ((t (:foreground "blue4"))))
- (speedbar-tag-face ((t (:foreground "brown"))))
- (speedbar-selected-face ((t (:foreground "red" :underline t))))
- (speedbar-highlight-face ((t (:background "green"))))
- (ff-paths-non-existant-file-face ((t (:foreground "NavyBlue" :bold t))))
- (show-paren-match-face ((t (:background "light blue"))))
- (show-paren-mismatch-face ((t (:foreground "white" :background "purple")))))))
-
- (defun color-theme-billw ()
- "Cornsilk on black.
- Includes info, diary, font-lock, eshell, sgml, message, gnus,
- widget, custom, latex, ediff."
- (interactive)
- (color-theme-install
- '(color-theme-billw
- ((foreground-color . "cornsilk")
- (background-color . "black")
- (mouse-color . "black")
- (cursor-color . "white")
- (border-color . "black")
- (background-mode . dark))
- (default ((t (nil))))
- (modeline ((t (:foreground "black" :background "wheat"))))
- (modeline-buffer-id ((t (:foreground "black" :background "wheat"))))
- (modeline-mousable ((t (:foreground "black" :background "wheat"))))
- (modeline-mousable-minor-mode ((t (:foreground "black" :background "wheat"))))
- (highlight ((t (:foreground "wheat" :background "darkslategray"))))
- (bold ((t (:bold t))))
- (italic ((t (:italic t))))
- (bold-italic ((t (:bold t :italic t))))
- (region ((t (:background "dimgray"))))
- (secondary-selection ((t (:background "deepskyblue4"))))
- (underline ((t (:underline t))))
- (info-node ((t (:foreground "yellow" :bold t :italic t))))
- (info-menu-5 ((t (:underline t))))
- (info-xref ((t (:foreground "yellow" :bold t))))
- (diary-face ((t (:foreground "orange"))))
- (calendar-today-face ((t (:underline t))))
- (holiday-face ((t (:background "red"))))
- (show-paren-match-face ((t (:background "deepskyblue4"))))
- (show-paren-mismatch-face ((t (:foreground "white" :background "red"))))
- (font-lock-comment-face ((t (:foreground "gold"))))
- (font-lock-string-face ((t (:foreground "orange"))))
- (font-lock-keyword-face ((t (:foreground "cyan1"))))
- (font-lock-builtin-face ((t (:foreground "LightSteelBlue"))))
- (font-lock-function-name-face ((t (:foreground "mediumspringgreen"))))
- (font-lock-variable-name-face ((t (:foreground "light salmon"))))
- (font-lock-type-face ((t (:foreground "yellow1"))))
- (font-lock-constant-face ((t (:foreground "salmon"))))
- (font-lock-warning-face ((t (:foreground "gold" :bold t))))
- (blank-space-face ((t (:background "LightGray"))))
- (blank-tab-face ((t (:foreground "black" :background "cornsilk"))))
- (highline-face ((t (:background "gray35"))))
- (eshell-ls-directory-face ((t (:foreground "green" :bold t))))
- (eshell-ls-symlink-face ((t (:foreground "Cyan" :bold t))))
- (eshell-ls-executable-face ((t (:foreground "orange" :bold t))))
- (eshell-ls-readonly-face ((t (:foreground "gray"))))
- (eshell-ls-unreadable-face ((t (:foreground "DarkGrey"))))
- (eshell-ls-special-face ((t (:foreground "Magenta" :bold t))))
- (eshell-ls-missing-face ((t (:foreground "Red" :bold t))))
- (eshell-ls-archive-face ((t (:foreground "Orchid" :bold t))))
- (eshell-ls-backup-face ((t (:foreground "LightSalmon"))))
- (eshell-ls-product-face ((t (:foreground "LightSalmon"))))
- (eshell-ls-clutter-face ((t (:foreground "blue" :bold t))))
- (sgml-start-tag-face ((t (:foreground "mediumspringgreen"))))
- (custom-button-face ((t (:foreground "white"))))
- (sgml-ignored-face ((t (:foreground "gray20" :background "gray60"))))
- (sgml-doctype-face ((t (:foreground "orange"))))
- (sgml-sgml-face ((t (:foreground "yellow"))))
- (vc-annotate-face-0046FF ((t (:foreground "wheat" :background "black"))))
- (custom-documentation-face ((t (:foreground "white"))))
- (sgml-end-tag-face ((t (:foreground "greenyellow"))))
- (linemenu-face ((t (:background "gray30"))))
- (sgml-entity-face ((t (:foreground "gold"))))
- (message-header-to-face ((t (:foreground "floral white" :bold t))))
- (message-header-cc-face ((t (:foreground "ivory"))))
- (message-header-subject-face ((t (:foreground "papaya whip" :bold t))))
- (message-header-newsgroups-face ((t (:foreground "lavender blush" :bold t :italic t))))
- (message-header-other-face ((t (:foreground "pale turquoise"))))
- (message-header-name-face ((t (:foreground "light sky blue"))))
- (message-header-xheader-face ((t (:foreground "blue"))))
- (message-separator-face ((t (:foreground "sandy brown"))))
- (message-cited-text-face ((t (:foreground "plum1"))))
- (message-mml-face ((t (:foreground "ForestGreen"))))
- (gnus-group-news-1-face ((t (:foreground "white" :bold t))))
- (gnus-group-news-1-empty-face ((t (:foreground "white"))))
- (gnus-group-news-2-face ((t (:foreground "lightcyan" :bold t))))
- (gnus-group-news-2-empty-face ((t (:foreground "lightcyan"))))
- (gnus-group-news-3-face ((t (:foreground "tan" :bold t))))
- (gnus-group-news-3-empty-face ((t (:foreground "tan"))))
- (gnus-group-news-4-face ((t (:foreground "white" :bold t))))
- (gnus-group-news-4-empty-face ((t (:foreground "white"))))
- (gnus-group-news-5-face ((t (:foreground "wheat" :bold t))))
- (gnus-group-news-5-empty-face ((t (:foreground "wheat"))))
- (gnus-group-news-6-face ((t (:foreground "tan" :bold t))))
- (gnus-group-news-6-empty-face ((t (:foreground "tan"))))
- (gnus-group-news-low-face ((t (:foreground "DarkTurquoise" :bold t))))
- (gnus-group-news-low-empty-face ((t (:foreground "DarkTurquoise"))))
- (gnus-group-mail-1-face ((t (:foreground "white" :bold t))))
- (gnus-group-mail-1-empty-face ((t (:foreground "gray80"))))
- (gnus-group-mail-2-face ((t (:foreground "lightcyan" :bold t))))
- (gnus-group-mail-2-empty-face ((t (:foreground "lightcyan"))))
- (gnus-group-mail-3-face ((t (:foreground "tan" :bold t))))
- (gnus-group-mail-3-empty-face ((t (:foreground "tan"))))
- (gnus-group-mail-low-face ((t (:foreground "aquamarine4" :bold t))))
- (gnus-group-mail-low-empty-face ((t (:foreground "aquamarine4"))))
- (gnus-summary-selected-face ((t (:background "deepskyblue4" :underline t))))
- (gnus-summary-cancelled-face ((t (:foreground "black" :background "gray"))))
- (gnus-summary-high-ticked-face ((t (:foreground "gray70" :bold t))))
- (gnus-summary-low-ticked-face ((t (:foreground "gray70" :bold t))))
- (gnus-summary-normal-ticked-face ((t (:foreground "gray70" :bold t))))
- (gnus-summary-high-ancient-face ((t (:foreground "SkyBlue" :bold t))))
- (gnus-summary-low-ancient-face ((t (:foreground "SkyBlue" :italic t))))
- (gnus-summary-normal-ancient-face ((t (:foreground "SkyBlue"))))
- (gnus-summary-high-unread-face ((t (:bold t))))
- (gnus-summary-low-unread-face ((t (:italic t))))
- (gnus-summary-normal-unread-face ((t (nil))))
- (gnus-summary-high-read-face ((t (:foreground "PaleGreen" :bold t))))
- (gnus-summary-low-read-face ((t (:foreground "PaleGreen" :italic t))))
- (gnus-summary-normal-read-face ((t (:foreground "PaleGreen"))))
- (gnus-splash-face ((t (:foreground "gold"))))
- (font-latex-bold-face ((t (nil))))
- (font-latex-italic-face ((t (nil))))
- (font-latex-math-face ((t (nil))))
- (font-latex-sedate-face ((t (:foreground "Gray85"))))
- (font-latex-string-face ((t (:foreground "orange"))))
- (font-latex-warning-face ((t (:foreground "gold"))))
- (widget-documentation-face ((t (:foreground "lime green"))))
- (widget-button-face ((t (:bold t))))
- (widget-field-face ((t (:background "gray20"))))
- (widget-single-line-field-face ((t (:background "gray20"))))
- (widget-inactive-face ((t (:foreground "wheat"))))
- (widget-button-pressed-face ((t (:foreground "red"))))
- (custom-invalid-face ((t (:foreground "yellow" :background "red"))))
- (custom-rogue-face ((t (:foreground "pink" :background "black"))))
- (custom-modified-face ((t (:foreground "white" :background "blue"))))
- (custom-set-face ((t (:foreground "blue"))))
- (custom-changed-face ((t (:foreground "wheat" :background "skyblue"))))
- (custom-saved-face ((t (:underline t))))
- (custom-state-face ((t (:foreground "light green"))))
- (custom-variable-tag-face ((t (:foreground "skyblue" :underline t))))
- (custom-variable-button-face ((t (:bold t :underline t))))
- (custom-face-tag-face ((t (:foreground "white" :underline t))))
- (custom-group-tag-face-1 ((t (:foreground "pink" :underline t))))
- (custom-group-tag-face ((t (:foreground "skyblue" :underline t))))
- (swbuff-current-buffer-face ((t (:foreground "red" :bold t))))
- (ediff-current-diff-face-A ((t (:foreground "firebrick" :background "pale green"))))
- (ediff-current-diff-face-B ((t (:foreground "DarkOrchid" :background "Yellow"))))
- (ediff-current-diff-face-C ((t (:foreground "white" :background "indianred"))))
- (ediff-current-diff-face-Ancestor ((t (:foreground "Black" :background "VioletRed"))))
- (ediff-fine-diff-face-A ((t (:foreground "Navy" :background "sky blue"))))
- (ediff-fine-diff-face-B ((t (:foreground "Black" :background "cyan"))))
- (ediff-fine-diff-face-C ((t (:foreground "Black" :background "Turquoise"))))
- (ediff-fine-diff-face-Ancestor ((t (:foreground "Black" :background "Green"))))
- (ediff-even-diff-face-A ((t (:foreground "Black" :background "light grey"))))
- (ediff-even-diff-face-B ((t (:foreground "White" :background "Grey"))))
- (ediff-even-diff-face-C ((t (:foreground "Black" :background "light grey"))))
- (ediff-even-diff-face-Ancestor ((t (:foreground "White" :background "Grey"))))
- (ediff-odd-diff-face-A ((t (:foreground "White" :background "Grey"))))
- (ediff-odd-diff-face-B ((t (:foreground "Black" :background "light grey"))))
- (ediff-odd-diff-face-C ((t (:foreground "White" :background "Grey"))))
- (ediff-odd-diff-face-Ancestor ((t (:foreground "Black" :background "light grey"))))
- (gnus-emphasis-bold ((t (:bold t))))
- (gnus-emphasis-italic ((t (:italic t))))
- (gnus-emphasis-underline ((t (:foreground "white" :background "goldenrod4"))))
- (gnus-emphasis-underline-bold ((t (:foreground "black" :background "yellow" :bold t :underline t))))
- (gnus-emphasis-underline-italic ((t (:foreground "black" :background "yellow" :italic t :underline t))))
- (gnus-emphasis-bold-italic ((t (:bold t :italic t))))
- (gnus-emphasis-underline-bold-italic ((t (:foreground "black" :background "yellow" :bold t :italic t :underline t))))
- (gnus-emphasis-highlight-words ((t (:foreground "yellow" :background "black"))))
- (gnus-signature-face ((t (:italic t))))
- (gnus-header-from-face ((t (:foreground "wheat"))))
- (gnus-header-subject-face ((t (:foreground "wheat" :bold t))))
- (gnus-header-newsgroups-face ((t (:foreground "wheat" :italic t))))
- (gnus-header-name-face ((t (:foreground "white"))))
- (gnus-header-content-face ((t (:foreground "tan" :italic t))))
- (gnus-filterhist-face-1 ((t (nil))))
- (gnus-splash ((t (:foreground "Brown"))))
- (gnus-cite-attribution-face ((t (:italic t))))
- (gnus-cite-face-1 ((t (:foreground "light blue"))))
- (gnus-cite-face-2 ((t (:foreground "light cyan"))))
- (gnus-cite-face-3 ((t (:foreground "light yellow"))))
- (gnus-cite-face-4 ((t (:foreground "light pink"))))
- (gnus-cite-face-5 ((t (:foreground "pale green"))))
- (gnus-cite-face-6 ((t (:foreground "beige"))))
- (gnus-cite-face-7 ((t (:foreground "orange"))))
- (gnus-cite-face-8 ((t (:foreground "magenta"))))
- (gnus-cite-face-9 ((t (:foreground "violet"))))
- (gnus-cite-face-10 ((t (:foreground "medium purple"))))
- (gnus-cite-face-11 ((t (:foreground "turquoise")))))))
-
- (defun color-theme-retro-green (&optional color func)
- "Plain green on black faces for those longing for the good old days."
- (interactive)
- ;; Build a list of faces without parameters
- (let ((old-faces (face-list))
- (faces)
- (face)
- (foreground (or color "green")))
- (dolist (face old-faces)
- (cond ((memq face '(bold bold-italic))
- (add-to-list 'faces `(,face (( t (:bold t))))))
- ((memq face '(italic underline show-paren-mismatch-face))
- (add-to-list 'faces `(,face (( t (:underline t))))))
- ((memq face '(modeline modeline-buffer-id modeline-mousable
- modeline-mousable-minor-mode highlight region
- secondary-selection show-paren-match-face))
- (add-to-list 'faces `(,face (( t (:foreground "black"
- :background ,foreground
- :inverse t))))))
- (t
- (add-to-list 'faces `(,face (( t (nil))))))))
- (color-theme-install
- (append
- (list (or func 'color-theme-retro-green)
- (list (cons 'foreground-color foreground)
- (cons 'background-color "black")
- (cons 'mouse-color foreground)
- (cons 'cursor-color foreground)
- (cons 'border-color foreground)
- (cons 'background-mode 'dark)))
- faces))))
-
- (defun color-theme-retro-orange ()
- "Plain orange on black faces for those longing for the good old days."
- (interactive)
- (color-theme-retro-green "orange" 'color-theme-retro-orange))
-
- (defun color-theme-subtle-hacker ()
- "Subtle Hacker Color Theme.
- Based on gnome2, but uses white for important things like comments,
- and less of the unreadable tomato. By Colin Walters <levanti@verbum.org>"
- (interactive)
- (color-theme-gnome2)
- (let ((color-theme-is-cumulative t))
- (color-theme-install
- '(color-theme-subtle-hacker
- nil
- nil
- (custom-state-face ((t (:foreground "Coral"))))
- (diary-face ((t (:bold t :foreground "IndianRed"))))
- (eshell-ls-clutter-face ((t (:bold t :foreground "DimGray"))))
- (eshell-ls-executable-face ((t (:bold t :foreground "Coral"))))
- (eshell-ls-missing-face ((t (:bold t :foreground "black"))))
- (eshell-ls-special-face ((t (:bold t :foreground "Gold"))))
- (eshell-ls-symlink-face ((t (:bold t :foreground "White"))))
- (font-lock-comment-face ((t (:foreground "White"))))
- (font-lock-constant-face ((t (:bold t :foreground "Aquamarine"))))
- (font-lock-function-name-face ((t (:bold t :foreground "MediumSlateBlue"))))
- (font-lock-string-face ((t (:italic t :foreground "LightSalmon"))))
- (font-lock-variable-name-face ((t (:italic t :bold t :foreground "Aquamarine"))))
- (gnus-cite-face-1 ((t (:foreground "dark khaki"))))
- (gnus-cite-face-2 ((t (:foreground "chocolate"))))
- (gnus-cite-face-3 ((t (:foreground "tomato"))))
- (gnus-group-mail-1-empty-face ((t (:foreground "light cyan"))))
- (gnus-group-mail-1-face ((t (:bold t :foreground "light cyan"))))
- (gnus-group-mail-2-empty-face ((t (:foreground "turquoise"))))
- (gnus-group-mail-2-face ((t (:bold t :foreground "turquoise"))))
- (gnus-group-mail-3-empty-face ((t (:foreground "tomato"))))
- (gnus-group-mail-3-face ((t (:bold t :foreground "tomato"))))
- (gnus-group-mail-low-empty-face ((t (:foreground "dodger blue"))))
- (gnus-group-mail-low-face ((t (:bold t :foreground "dodger blue"))))
- (gnus-group-news-1-empty-face ((t (:foreground "green yellow"))))
- (gnus-group-news-1-face ((t (:bold t :foreground "green yellow"))))
- (gnus-group-news-2-empty-face ((t (:foreground "dark orange"))))
- (gnus-group-news-2-face ((t (:bold t :foreground "dark orange"))))
- (gnus-group-news-3-empty-face ((t (:foreground "tomato"))))
- (gnus-group-news-3-face ((t (:bold t :foreground "tomato"))))
- (gnus-group-news-low-empty-face ((t (:foreground "yellow green"))))
- (gnus-group-news-low-face ((t (:bold t :foreground "yellow green"))))
- (gnus-header-name-face ((t (:bold t :foreground "DodgerBlue1"))))
- (gnus-header-newsgroups-face ((t (:italic t :bold t :foreground "LightSkyBlue3"))))
- (gnus-signature-face ((t (:foreground "salmon"))))
- (gnus-summary-cancelled-face ((t (:background "black" :foreground "yellow"))))
- (gnus-summary-high-ancient-face ((t (:bold t :foreground "RoyalBlue"))))
- (gnus-summary-high-read-face ((t (:bold t :foreground "forest green"))))
- (gnus-summary-high-ticked-face ((t (:bold t :foreground "burlywood"))))
- (gnus-summary-high-unread-face ((t (:italic t :bold t :foreground "cyan"))))
- (gnus-summary-low-ancient-face ((t (:italic t :foreground "chocolate"))))
- (gnus-summary-low-read-face ((t (:foreground "light sea green"))))
- (gnus-summary-low-ticked-face ((t (:italic t :foreground "chocolate"))))
- (gnus-summary-low-unread-face ((t (:italic t :foreground "light sea green"))))
- (gnus-summary-normal-ancient-face ((t (:foreground "RoyalBlue"))))
- (gnus-summary-normal-read-face ((t (:foreground "khaki"))))
- (gnus-summary-normal-ticked-face ((t (:foreground "sandy brown"))))
- (gnus-summary-normal-unread-face ((t (:foreground "aquamarine"))))
- (message-cited-text-face ((t (:foreground "White"))))
- (message-header-name-face ((t (:foreground "DodgerBlue1"))))
- (message-header-newsgroups-face ((t (:italic t :bold t :foreground "LightSkyBlue3"))))
- (message-header-other-face ((t (:foreground "LightSkyBlue3"))))
- (message-header-xheader-face ((t (:foreground "DodgerBlue3"))))))))
-
- (defun color-theme-pok-wog ()
- "Low-contrast White-on-Gray by S.Pokrovsky.
-
- The following might be a good addition to your .Xdefaults file:
-
- Emacs.pane.menubar.background: darkGrey
- Emacs.pane.menubar.foreground: black"
- (interactive)
- (color-theme-install
- '(color-theme-pok-wog
- ((foreground-color . "White")
- (background-color . "DarkSlateGray")
- (mouse-color . "gold")
- (cursor-color . "Cyan")
- (border-color . "black")
- (background-mode . dark))
- (default ((t (nil))))
- (bold ((t (:bold t :foreground "Wheat"))))
- (bold-italic ((t (:italic t :bold t :foreground "wheat"))))
- (calendar-today-face ((t (:underline t :foreground "white"))))
- (diary-face ((t (:foreground "red"))))
- (font-lock-builtin-face ((t (:bold t :foreground "cyan"))))
- (font-lock-comment-face ((t (:foreground "Gold"))))
- (font-lock-constant-face ((t (:bold t :foreground "LightSteelBlue"))))
- (font-lock-function-name-face ((t (:bold t :foreground "Yellow"))))
- (font-lock-keyword-face ((t (:bold t :foreground "Cyan"))))
- (font-lock-string-face ((t (:foreground "Khaki"))))
- (font-lock-type-face ((t (:bold t :foreground "Cyan"))))
- (font-lock-variable-name-face ((t (:foreground "LightGoldenrod"))))
- (font-lock-warning-face ((t (:bold t :foreground "Pink"))))
- (gnus-cite-attribution-face ((t (:bold t :foreground "Wheat"))))
- (gnus-cite-face-1 ((t (:foreground "wheat"))))
- (gnus-cite-face-10 ((t (:foreground "wheat"))))
- (gnus-cite-face-11 ((t (:foreground "turquoise"))))
- (gnus-cite-face-2 ((t (:foreground "cyan"))))
- (gnus-cite-face-3 ((t (:foreground "light yellow"))))
- (gnus-cite-face-4 ((t (:foreground "light pink"))))
- (gnus-cite-face-5 ((t (:foreground "pale green"))))
- (gnus-cite-face-6 ((t (:foreground "beige"))))
- (gnus-cite-face-7 ((t (:foreground "orange"))))
- (gnus-cite-face-8 ((t (:foreground "magenta"))))
- (gnus-cite-face-9 ((t (:foreground "violet"))))
- (gnus-emphasis-bold ((t (:bold t :foreground "wheat"))))
- (gnus-emphasis-bold-italic ((t (:italic t :bold t))))
- (gnus-emphasis-highlight-words ((t (:background "black" :foreground "yellow"))))
- (gnus-emphasis-italic ((t (:italic t :foreground "white"))))
- (gnus-emphasis-underline ((t (:underline t :foreground "white"))))
- (gnus-emphasis-underline-bold ((t (:underline t :bold t :foreground "wheat"))))
- (gnus-emphasis-underline-bold-italic ((t (:underline t :italic t :bold t))))
- (gnus-emphasis-underline-italic ((t (:underline t :italic t :foreground "white"))))
- (gnus-group-mail-1-empty-face ((t (:foreground "aquamarine1"))))
- (gnus-group-mail-1-face ((t (:bold t :foreground "aquamarine1"))))
- (gnus-group-mail-2-empty-face ((t (:foreground "aquamarine2"))))
- (gnus-group-mail-2-face ((t (:bold t :foreground "aquamarine2"))))
- (gnus-group-mail-3-empty-face ((t (:foreground "Salmon"))))
- (gnus-group-mail-3-face ((t (:bold t :foreground "gold"))))
- (gnus-group-mail-low-empty-face ((t (:foreground "Wheat"))))
- (gnus-group-mail-low-face ((t (:bold t :foreground "aquamarine4"))))
- (gnus-group-news-1-empty-face ((t (:foreground "PaleTurquoise"))))
- (gnus-group-news-1-face ((t (:bold t :foreground "PaleTurquoise"))))
- (gnus-group-news-2-empty-face ((t (:foreground "turquoise"))))
- (gnus-group-news-2-face ((t (:bold t :foreground "turquoise"))))
- (gnus-group-news-3-empty-face ((t (nil))))
- (gnus-group-news-3-face ((t (:bold t :foreground "Wheat"))))
- (gnus-group-news-4-empty-face ((t (nil))))
- (gnus-group-news-4-face ((t (:bold t))))
- (gnus-group-news-5-empty-face ((t (nil))))
- (gnus-group-news-5-face ((t (:bold t))))
- (gnus-group-news-6-empty-face ((t (nil))))
- (gnus-group-news-6-face ((t (:bold t))))
- (gnus-group-news-low-empty-face ((t (:foreground "DarkTurquoise"))))
- (gnus-group-news-low-face ((t (:bold t :foreground "DarkTurquoise"))))
- (gnus-header-content-face ((t (:italic t :foreground "Wheat"))))
- (gnus-header-from-face ((t (:foreground "light yellow"))))
- (gnus-header-name-face ((t (:foreground "cyan"))))
- (gnus-header-newsgroups-face ((t (:italic t :foreground "yellow"))))
- (gnus-header-subject-face ((t (:bold t :foreground "Gold"))))
- (gnus-signature-face ((t (:italic t :foreground "wheat"))))
- (gnus-splash-face ((t (:foreground "orange"))))
- (gnus-summary-cancelled-face ((t (:background "black" :foreground "yellow"))))
- (gnus-summary-high-ancient-face ((t (:bold t :foreground "SkyBlue"))))
- (gnus-summary-high-read-face ((t (:bold t :foreground "PaleGreen"))))
- (gnus-summary-high-ticked-face ((t (:bold t :foreground "pink"))))
- (gnus-summary-high-unread-face ((t (:bold t :foreground "gold"))))
- (gnus-summary-low-ancient-face ((t (:italic t :foreground "SkyBlue"))))
- (gnus-summary-low-read-face ((t (:italic t :foreground "PaleGreen"))))
- (gnus-summary-low-ticked-face ((t (:italic t :foreground "pink"))))
- (gnus-summary-low-unread-face ((t (:italic t))))
- (gnus-summary-normal-ancient-face ((t (:foreground "SkyBlue"))))
- (gnus-summary-normal-read-face ((t (:foreground "PaleGreen"))))
- (gnus-summary-normal-ticked-face ((t (:foreground "pink"))))
- (gnus-summary-normal-unread-face ((t (:foreground "wheat"))))
- (gnus-summary-selected-face ((t (:underline t :foreground "white"))))
- (highlight ((t (:background "Blue" :foreground "white"))))
- (highline-face ((t (:background "black" :foreground "white"))))
- (holiday-face ((t (:background "pink" :foreground "white"))))
- (info-menu-5 ((t (:underline t))))
- (info-node ((t (:italic t :bold t :foreground "white"))))
- (info-xref ((t (:bold t :foreground "wheat"))))
- (italic ((t (:italic t :foreground "white"))))
- (makefile-space-face ((t (:background "hotpink"))))
- (message-cited-text-face ((t (:foreground "green"))))
- (message-header-cc-face ((t (:bold t :foreground "Aquamarine"))))
- (message-header-name-face ((t (:foreground "Gold"))))
- (message-header-newsgroups-face ((t (:italic t :bold t :foreground "yellow"))))
- (message-header-other-face ((t (:foreground "lightGray"))))
- (message-header-subject-face ((t (:foreground "Yellow"))))
- (message-header-to-face ((t (:bold t :foreground "green2"))))
- (message-header-xheader-face ((t (:foreground "blue"))))
- (message-mml-face ((t (:bold t :foreground "khaki"))))
- (message-separator-face ((t (:background "aquamarine" :foreground "black"))))
- (modeline ((t (:background "DarkGray" :foreground "Black"))))
- (modeline-buffer-id ((t (:background "DarkGray" :foreground "Black"))))
- (modeline-mousable ((t (:background "DarkGray" :foreground "Black"))))
- (modeline-mousable-minor-mode ((t (:background "DarkGray" :foreground "Black"))))
- (paren-mismatch-face ((t (:background "DeepPink" :foreground "white"))))
- (paren-no-match-face ((t (:background "yellow" :foreground "white"))))
- (region ((t (:background "MediumSlateBlue" :foreground "white"))))
- (secondary-selection ((t (:background "Sienna" :foreground "white"))))
- (show-paren-match-face ((t (:background "turquoise" :foreground "white"))))
- (show-paren-mismatch-face ((t (:background "purple" :foreground "white"))))
- (speedbar-button-face ((t (:bold t :foreground "magenta"))))
- (speedbar-directory-face ((t (:bold t :foreground "orchid"))))
- (speedbar-file-face ((t (:foreground "pink"))))
- (speedbar-highlight-face ((t (:background "black"))))
- (speedbar-selected-face ((t (:underline t :foreground "cyan"))))
- (speedbar-tag-face ((t (:foreground "yellow"))))
- (swbuff-current-buffer-face ((t (:bold t :foreground "red"))))
- (underline ((t (:underline t :foreground "white"))))
- (widget-button-face ((t (:bold t :foreground "wheat"))))
- (widget-button-pressed-face ((t (:foreground "red"))))
- (widget-documentation-face ((t (:foreground "lime green"))))
- (widget-field-face ((t (:background "dim gray" :foreground "white"))))
- (widget-inactive-face ((t (:foreground "light gray"))))
- (widget-single-line-field-face ((t (:background "dim gray" :foreground "white")))))))
-
- (defun color-theme-pok-wob ()
- "White-on-Black by S. Pokrovsky.
-
- The following might be a good addition to your .Xdefaults file:
-
- Emacs.pane.menubar.background: darkGrey
- Emacs.pane.menubar.foreground: black"
- (interactive)
- ; (setq term-default-fg-color "white"
- ; term-default-bg "black")
- (color-theme-install
- '(color-theme-pok-wob
- ((foreground-color . "white")
- (background-color . "black")
- (mouse-color . "gold")
- (cursor-color . "yellow")
- (border-color . "black")
- (background-mode . dark))
- (default ((t (nil))))
- (bold ((t (:bold t :foreground "light gray"))))
- (bold-italic ((t (:italic t :bold t :foreground "cyan"))))
- (calendar-today-face ((t (:underline t :foreground "white"))))
- (custom-button-face ((t (nil))))
- (custom-changed-face ((t (:background "blue" :foreground "white"))))
- (custom-documentation-face ((t (nil))))
- (custom-face-tag-face ((t (:underline t))))
- (custom-group-tag-face ((t (:underline t))))
- (custom-group-tag-face-1 ((t (:underline t))))
- (custom-invalid-face ((t (:background "red" :foreground "white"))))
- (custom-modified-face ((t (:background "blue" :foreground "white"))))
- (custom-rogue-face ((t (:background "black" :foreground "pink"))))
- (custom-saved-face ((t (:underline t))))
- (custom-set-face ((t (:background "white" :foreground "blue"))))
- (custom-state-face ((t (nil))))
- (custom-variable-button-face ((t (:underline t :bold t))))
- (custom-variable-tag-face ((t (:underline t))))
- (diary-face ((t (:foreground "gold"))))
- (font-lock-builtin-face ((t (:bold t :foreground "cyan"))))
- (font-lock-comment-face ((t (:foreground "Gold"))))
- (font-lock-constant-face ((t (:bold t :foreground "LightSteelBlue"))))
- (font-lock-function-name-face ((t (:bold t :foreground "gold"))))
- (font-lock-keyword-face ((t (:bold t :foreground "Cyan"))))
- (font-lock-string-face ((t (:foreground "Khaki"))))
- (font-lock-type-face ((t (:bold t :foreground "Cyan"))))
- (font-lock-variable-name-face ((t (:italic t :foreground "gold"))))
- (font-lock-warning-face ((t (:bold t :foreground "Pink"))))
- (gnus-cite-attribution-face ((t (:underline t :foreground "beige"))))
- (gnus-cite-face-1 ((t (:foreground "gold"))))
- (gnus-cite-face-10 ((t (:foreground "coral"))))
- (gnus-cite-face-11 ((t (:foreground "turquoise"))))
- (gnus-cite-face-2 ((t (:foreground "wheat"))))
- (gnus-cite-face-3 ((t (:foreground "light pink"))))
- (gnus-cite-face-4 ((t (:foreground "khaki"))))
- (gnus-cite-face-5 ((t (:foreground "pale green"))))
- (gnus-cite-face-6 ((t (:foreground "beige"))))
- (gnus-cite-face-7 ((t (:foreground "orange"))))
- (gnus-cite-face-8 ((t (:foreground "magenta"))))
- (gnus-cite-face-9 ((t (:foreground "violet"))))
- (gnus-emphasis-bold ((t (:bold t :foreground "light gray"))))
- (gnus-emphasis-bold-italic ((t (:italic t :bold t :foreground "cyan"))))
- (gnus-emphasis-highlight-words ((t (:background "black" :foreground "gold"))))
- (gnus-emphasis-italic ((t (:italic t :foreground "cyan"))))
- (gnus-emphasis-underline ((t (:underline t :foreground "white"))))
- (gnus-emphasis-underline-bold ((t (:underline t :bold t :foreground "white"))))
- (gnus-emphasis-underline-bold-italic ((t (:underline t :italic t :bold t :foreground "white"))))
- (gnus-emphasis-underline-italic ((t (:underline t :italic t :foreground "white"))))
- (gnus-group-mail-1-empty-face ((t (:foreground "Magenta"))))
- (gnus-group-mail-1-face ((t (:bold t :foreground "Magenta"))))
- (gnus-group-mail-2-empty-face ((t (:foreground "aquamarine2"))))
- (gnus-group-mail-2-face ((t (:bold t :foreground "aquamarine2"))))
- (gnus-group-mail-3-empty-face ((t (:foreground "Cyan"))))
- (gnus-group-mail-3-face ((t (:bold t :foreground "Cyan"))))
- (gnus-group-mail-low-empty-face ((t (:foreground "Wheat"))))
- (gnus-group-mail-low-face ((t (:foreground "aquamarine4"))))
- (gnus-group-news-1-empty-face ((t (:foreground "PaleTurquoise"))))
- (gnus-group-news-1-face ((t (:bold t :foreground "PaleTurquoise"))))
- (gnus-group-news-2-empty-face ((t (:foreground "turquoise"))))
- (gnus-group-news-2-face ((t (:bold t :foreground "turquoise"))))
- (gnus-group-news-3-empty-face ((t (:foreground "wheat"))))
- (gnus-group-news-3-face ((t (:bold t :foreground "Wheat"))))
- (gnus-group-news-4-empty-face ((t (nil))))
- (gnus-group-news-4-face ((t (:bold t))))
- (gnus-group-news-5-empty-face ((t (nil))))
- (gnus-group-news-5-face ((t (:bold t))))
- (gnus-group-news-6-empty-face ((t (nil))))
- (gnus-group-news-6-face ((t (:bold t))))
- (gnus-group-news-low-empty-face ((t (:foreground "MediumAquamarine"))))
- (gnus-group-news-low-face ((t (:bold t :foreground "MediumAquamarine"))))
- (gnus-header-content-face ((t (:italic t :foreground "Wheat"))))
- (gnus-header-from-face ((t (:foreground "light yellow"))))
- (gnus-header-name-face ((t (:foreground "Wheat"))))
- (gnus-header-newsgroups-face ((t (:italic t :foreground "gold"))))
- (gnus-header-subject-face ((t (:bold t :foreground "Gold"))))
- (gnus-signature-face ((t (:italic t :foreground "white"))))
- (gnus-splash-face ((t (:foreground "orange"))))
- (gnus-summary-cancelled-face ((t (:background "black" :foreground "orange"))))
- (gnus-summary-high-ancient-face ((t (:bold t :foreground "SkyBlue"))))
- (gnus-summary-high-read-face ((t (:bold t :foreground "red"))))
- (gnus-summary-high-ticked-face ((t (:bold t :foreground "coral"))))
- (gnus-summary-high-unread-face ((t (:bold t :foreground "gold"))))
- (gnus-summary-low-ancient-face ((t (:italic t :foreground "SkyBlue"))))
- (gnus-summary-low-read-face ((t (:italic t :foreground "red"))))
- (gnus-summary-low-ticked-face ((t (:italic t :foreground "coral"))))
- (gnus-summary-low-unread-face ((t (:italic t :foreground "white"))))
- (gnus-summary-normal-ancient-face ((t (:foreground "SkyBlue"))))
- (gnus-summary-normal-read-face ((t (:foreground "PaleGreen"))))
- (gnus-summary-normal-ticked-face ((t (:foreground "pink"))))
- (gnus-summary-normal-unread-face ((t (:foreground "white"))))
- (gnus-summary-selected-face ((t (:underline t :foreground "white"))))
- (highlight ((t (:background "Blue" :foreground "white"))))
- (highline-face ((t (:background "dark slate gray" :foreground "white"))))
- (holiday-face ((t (:background "red" :foreground "white"))))
- (info-menu-5 ((t (:underline t))))
- (info-node ((t (:italic t :bold t :foreground "white"))))
- (info-xref ((t (:bold t :foreground "light gray"))))
- (italic ((t (:italic t :foreground "cyan"))))
- (makefile-space-face ((t (:background "hotpink" :foreground "white"))))
- (message-cited-text-face ((t (:foreground "green"))))
- (message-header-cc-face ((t (:bold t :foreground "Aquamarine"))))
- (message-header-name-face ((t (:foreground "Gold"))))
- (message-header-newsgroups-face ((t (:italic t :bold t :foreground "gold"))))
- (message-header-other-face ((t (:foreground "lightGray"))))
- (message-header-subject-face ((t (:foreground "Yellow"))))
- (message-header-to-face ((t (:bold t :foreground "green2"))))
- (message-header-xheader-face ((t (:foreground "sky blue"))))
- (message-mml-face ((t (:bold t :foreground "khaki"))))
- (message-separator-face ((t (:background "aquamarine" :foreground "black"))))
- (modeline ((t (:background "dark gray" :foreground "black"))))
- (modeline-buffer-id ((t (:background "dark gray" :foreground "black"))))
- (modeline-mousable ((t (:background "dark gray" :foreground "black"))))
- (modeline-mousable-minor-mode ((t (:background "dark gray" :foreground "black"))))
- (paren-mismatch-face ((t (:bold t :background "white" :foreground "red"))))
- (paren-no-match-face ((t (:bold t :background "white" :foreground "red"))))
- (region ((t (:background "MediumSlateBlue" :foreground "white"))))
- (secondary-selection ((t (:background "Sienna" :foreground "white"))))
- (show-paren-match-face ((t (:background "purple" :foreground "white"))))
- (show-paren-mismatch-face ((t (:bold t :background "white" :foreground "red"))))
- (speedbar-button-face ((t (nil))))
- (speedbar-directory-face ((t (nil))))
- (speedbar-file-face ((t (:bold t))))
- (speedbar-highlight-face ((t (nil))))
- (speedbar-selected-face ((t (:underline t))))
- (speedbar-tag-face ((t (nil))))
- (swbuff-current-buffer-face ((t (:bold t :foreground "red"))))
- (underline ((t (:underline t :foreground "white"))))
- (widget-button-face ((t (:bold t :foreground "coral"))))
- (widget-button-pressed-face ((t (:foreground "red"))))
- (widget-documentation-face ((t (:foreground "lime green"))))
- (widget-field-face ((t (:background "dim gray" :foreground "white"))))
- (widget-inactive-face ((t (:foreground "light gray"))))
- (widget-single-line-field-face ((t (:background "dim gray" :foreground "white")))))))
-
- (defun color-theme-blue-sea ()
- "The grey on midnight blue theme.
-
- Includes faces for apropos, font-lock (Emacs and XEmacs), speedbar,
- custom, widget, info, flyspell, gnus, message, man, woman, dired.
-
- This is what you should put in your .Xdefaults file, if you want to
- change the colors of the menus:
-
- emacs*Background: DarkSlateGray
- emacs*Foreground: Wheat"
- (interactive)
- (color-theme-blue-gnus)
- (let ((color-theme-is-cumulative t))
- (color-theme-blue-erc)
- (color-theme-install
- '(color-theme-blue-sea
- ((background-color . "MidnightBlue")
- (background-mode . dark)
- (border-color . "Grey")
- (cursor-color . "Grey")
- (foreground-color . "Grey")
- (mouse-color . "Grey"))
- ((Man-overstrike-face . woman-bold-face)
- (Man-underline-face . woman-italic-face))
- (default ((t (nil))))
- (bold ((t (:bold t))))
- (bold-italic ((t (:bold t :foreground "beige"))))
- (calendar-today-face ((t (:underline t))))
- (cperl-array-face ((t (:foreground "light salmon" :bold t))))
- (cperl-hash-face ((t (:foreground "beige" :bold t :italic t))))
- (cperl-nonoverridable-face ((t (:foreground "aquamarine"))))
- (custom-button-face ((t (:foreground "gainsboro"))))
- (custom-changed-face ((t (:foreground "white" :background "blue"))))
- (custom-documentation-face ((t (:foreground "light blue"))))
- (custom-face-tag-face ((t (:underline t))))
- (custom-group-tag-face ((t (:foreground "pale turquoise" :bold t))))
- (custom-group-tag-face-1 ((t (:foreground "pale turquoise" :underline t))))
- (custom-invalid-face ((t (:foreground "yellow" :background "red"))))
- (custom-modified-face ((t (:foreground "white" :background "blue"))))
- (custom-rogue-face ((t (:foreground "pink" :background "black"))))
- (custom-saved-face ((t (:underline t))))
- (custom-set-face ((t (:foreground "blue" :background "white"))))
- (custom-state-face ((t (:foreground "light salmon"))))
- (custom-variable-button-face ((t (:bold t :underline t))))
- (custom-variable-tag-face ((t (:foreground "turquoise" :bold t))))
- (diary-face ((t (:foreground "red"))))
- (dired-face-directory ((t (:bold t :foreground "sky blue"))))
- (dired-face-permissions ((t (:foreground "aquamarine"))))
- (dired-face-flagged ((t (:foreground "tomato"))))
- (dired-face-marked ((t (:foreground "light salmon"))))
- (dired-face-executable ((t (:foreground "green yellow"))))
- (eshell-ls-archive-face ((t (:bold t :foreground "medium purple"))))
- (eshell-ls-backup-face ((t (:foreground "dim gray"))))
- (eshell-ls-clutter-face ((t (:foreground "dim gray"))))
- (eshell-ls-directory-face ((t (:bold t :foreground "medium slate blue"))))
- (eshell-ls-executable-face ((t (:bold t :foreground "aquamarine"))))
- (eshell-ls-missing-face ((t (:foreground "black"))))
- (eshell-ls-picture-face ((t (:foreground "violet"))))
- (eshell-ls-product-face ((t (:foreground "light steel blue"))))
- (eshell-ls-readonly-face ((t (:foreground "aquamarine"))))
- (eshell-ls-special-face ((t (:foreground "gold"))))
- (eshell-ls-symlink-face ((t (:foreground "white"))))
- (eshell-ls-unreadable-face ((t (:foreground "dim gray"))))
- (eshell-prompt-face ((t (:foreground "light sky blue" :bold t))))
- (excerpt ((t (:italic t))))
- (fixed ((t (:bold t))))
- (flyspell-duplicate-face ((t (:foreground "Gold3" :bold t :underline t))))
- (flyspell-incorrect-face ((t (:foreground "OrangeRed" :bold t :underline t))))
- (font-lock-builtin-face ((t (:foreground "aquamarine"))))
- (font-lock-comment-face ((t (:foreground "light blue"))))
- (font-lock-constant-face ((t (:foreground "pale green"))))
- (font-lock-doc-string-face ((t (:foreground "sky blue"))))
- (font-lock-function-name-face ((t (:bold t :foreground "aquamarine"))))
- (font-lock-keyword-face ((t (:foreground "pale turquoise" :bold t))))
- (font-lock-reference-face ((t (:foreground "pale green"))))
- (font-lock-string-face ((t (:foreground "light sky blue"))))
- (font-lock-type-face ((t (:foreground "sky blue" :bold t))))
- (font-lock-variable-name-face ((t (:foreground "turquoise" :bold t))))
- (font-lock-warning-face ((t (:foreground "Red" :bold t))))
- (fringe ((t (:background "MidnightBlue"))))
- (header-line ((t (:background "#002" :foreground "cornflower blue"))))
- (highlight ((t (:background "dark slate blue" :foreground "light blue"))))
- (highline-face ((t (:background "DeepSkyBlue4"))))
- (holiday-face ((t (:background "pink"))))
- (info-menu-5 ((t (:underline t))))
- (info-node ((t (:bold t))))
- (info-xref ((t (:bold t :foreground "sky blue"))))
- (isearch ((t (:background "slate blue"))))
- (italic ((t (:foreground "sky blue"))))
- (makefile-space-face ((t (:background "hotpink"))))
- (menu ((t (:background "MidnightBlue" :foreground "Grey"))))
- (modeline ((t (:foreground "wheat" :background "slate blue"))))
- (mode-line-inactive ((t (:background "dark slate blue" :foreground "wheat"))))
- (modeline-buffer-id ((t (:foreground "beige" :background "slate blue"))))
- (modeline-mousable ((t (:foreground "light cyan" :background "slate blue"))))
- (modeline-mousable-minor-mode ((t (:foreground "wheat" :background "slate blue"))))
- (region ((t (:background "DarkSlateBlue"))))
- (secondary-selection ((t (:background "steel blue"))))
- (show-paren-match-face ((t (:foreground "white" :background "light slate blue"))))
- (show-paren-mismatch-face ((t (:foreground "white" :background "red"))))
- (speedbar-button-face ((t (:foreground "seashell2"))))
- (speedbar-directory-face ((t (:foreground "seashell3"))))
- (speedbar-file-face ((t (:foreground "seashell4"))))
- (speedbar-highlight-face ((t (:background "dark slate blue" :foreground "wheat"))))
- (speedbar-selected-face ((t (:foreground "seashell1" :underline t))))
- (speedbar-tag-face ((t (:foreground "antique white"))))
- (tool-bar ((t (:background "MidnightBlue" :foreground "Grey" :box (:line-width 1 :style released-button)))))
- (underline ((t (:underline t))))
- (widget-button-face ((t (:bold t))))
- (widget-button-pressed-face ((t (:foreground "red"))))
- (widget-documentation-face ((t (:foreground "light blue"))))
- (widget-field-face ((t (:background "RoyalBlue4" :foreground "wheat"))))
- (widget-inactive-face ((t (:foreground "dim gray"))))
- (widget-single-line-field-face ((t (:background "slate blue" :foreground "wheat"))))
- (woman-bold-face ((t (:foreground "sky blue" :bold t))))
- (woman-italic-face ((t (:foreground "deep sky blue"))))
- (woman-unknown-face ((t (:foreground "LightSalmon"))))
- (zmacs-region ((t (:background "DarkSlateBlue"))))))))
-
- (defun color-theme-rotor ()
- "Black on Beige color theme by Jinwei Shen, created 2000-06-08.
- Supports default faces, font-lock, custom, widget, message, man,
- show-paren, viper."
- (interactive)
- (color-theme-install
- '(color-theme-rotor
- ((background-color . "Beige")
- (background-mode . light)
- (border-color . "black")
- (cursor-color . "Maroon")
- (foreground-color . "Black")
- (mouse-color . "Black"))
- ((Man-overstrike-face . font-lock-function-name-face)
- (Man-underline-face . font-lock-type-face)
- (list-matching-lines-face . bold)
- (rmail-highlight-face . font-lock-function-name-face)
- (watson-attribution-face . italic)
- (watson-url-face . bold)
- (watson-url-mouse-face . highlight))
- (default ((t (nil))))
- (bold ((t (:bold t :background "grey40" :foreground "yellow"))))
- (bold-italic ((t (:italic t :bold t :foreground "yellow green"))))
- (custom-button-face ((t (nil))))
- (custom-changed-face ((t (:background "blue" :foreground "white"))))
- (custom-documentation-face ((t (nil))))
- (custom-face-tag-face ((t (:underline t))))
- (custom-group-tag-face ((t (:underline t :foreground "blue"))))
- (custom-group-tag-face-1 ((t (:underline t :foreground "red"))))
- (custom-invalid-face ((t (:background "red" :foreground "yellow"))))
- (custom-modified-face ((t (:background "blue" :foreground "white"))))
- (custom-rogue-face ((t (:background "black" :foreground "pink"))))
- (custom-saved-face ((t (:underline t))))
- (custom-set-face ((t (:background "white" :foreground "blue"))))
- (custom-state-face ((t (:foreground "dark green"))))
- (custom-variable-button-face ((t (:underline t :bold t))))
- (custom-variable-tag-face ((t (:underline t :foreground "blue"))))
- (font-lock-builtin-face ((t (:foreground "Orchid"))))
- (font-lock-comment-face ((t (:foreground "MediumBlue"))))
- (font-lock-constant-face ((t (:foreground "CadetBlue"))))
- (font-lock-function-name-face ((t (:foreground "MediumSlateBlue"))))
- (font-lock-keyword-face ((t (:foreground "#80a0ff"))))
- (font-lock-string-face ((t (:foreground "red"))))
- (font-lock-type-face ((t (:foreground "ForestGreen"))))
- (font-lock-variable-name-face ((t (:foreground "DarkGoldenrod"))))
- (font-lock-warning-face ((t (:bold t :foreground "Red"))))
- (highlight ((t (:background "PaleGreen" :foreground "black"))))
- (italic ((t (:italic t :foreground "yellow3"))))
- (message-cited-text-face ((t (:foreground "red"))))
- (message-header-cc-face ((t (:foreground "MidnightBlue"))))
- (message-header-name-face ((t (:foreground "cornflower blue"))))
- (message-header-newsgroups-face ((t (:italic t :bold t :foreground "blue4"))))
- (message-header-other-face ((t (:foreground "steel blue"))))
- (message-header-subject-face ((t (:bold t :foreground "navy blue"))))
- (message-header-to-face ((t (:bold t :foreground "MidnightBlue"))))
- (message-header-xheader-face ((t (:foreground "blue"))))
- (message-separator-face ((t (:foreground "brown"))))
- (modeline ((t (:background "wheat" :foreground "DarkOliveGreen"))))
- (modeline-buffer-id ((t (:background "wheat" :foreground "DarkOliveGreen"))))
- (modeline-mousable ((t (:background "wheat" :foreground "DarkOliveGreen"))))
- (modeline-mousable-minor-mode ((t (:background "wheat" :foreground "DarkOliveGreen"))))
- (nil ((t (nil))))
- (region ((t (:background "dark cyan" :foreground "cyan"))))
- (secondary-selection ((t (:background "Turquoise" :foreground "black"))))
- (show-paren-match-face ((t (:background "turquoise"))))
- (show-paren-mismatch-face ((t (:background "purple" :foreground "white"))))
- (underline ((t (:underline t))))
- (viper-minibuffer-emacs-face ((t (:background "darkseagreen2" :foreground "Black"))))
- (viper-minibuffer-insert-face ((t (:background "pink" :foreground "Black"))))
- (viper-minibuffer-vi-face ((t (:background "grey" :foreground "DarkGreen"))))
- (viper-replace-overlay-face ((t (:background "darkseagreen2" :foreground "Black"))))
- (viper-search-face ((t (:background "khaki" :foreground "Black"))))
- (widget-button-face ((t (:bold t))))
- (widget-button-pressed-face ((t (:foreground "red"))))
- (widget-documentation-face ((t (:foreground "dark green"))))
- (widget-field-face ((t (:background "gray85"))))
- (widget-inactive-face ((t (:foreground "dim gray"))))
- (widget-single-line-field-face ((t (:background "gray85")))))))
-
- (defun color-theme-pierson ()
- "Black on White color theme by Dan L. Pierson, created 2000-06-08.
- Supports default faces, font-lock, show-paren."
- (interactive)
- (color-theme-install
- '(color-theme-pierson
- ((background-color . "AntiqueWhite")
- (background-mode . light)
- (border-color . "black")
- (cursor-color . "Orchid")
- (foreground-color . "black")
- (mouse-color . "Orchid"))
- ((list-matching-lines-face . bold))
- (default ((t (nil))))
- (bold ((t (:bold t))))
- (bold-italic ((t (:italic t :bold t))))
- (font-lock-builtin-face ((t (:foreground "Orchid"))))
- (font-lock-comment-face ((t (:foreground "ForestGreen"))))
- (font-lock-constant-face ((t (:foreground "CadetBlue"))))
- (font-lock-function-name-face ((t (:foreground "blue3"))))
- (font-lock-keyword-face ((t (:foreground "Blue"))))
- (font-lock-string-face ((t (:foreground "Firebrick"))))
- (font-lock-type-face ((t (:foreground "Purple"))))
- (font-lock-variable-name-face ((t (:foreground "blue3"))))
- (font-lock-warning-face ((t (:bold t :foreground "Red"))))
- (highlight ((t (:background "darkseagreen2"))))
- (italic ((t (:italic t))))
- (modeline ((t (:foreground "antiquewhite" :background "black"))))
- (modeline-mousable-minor-mode ((t (:foreground "antiquewhite" :background "black"))))
- (modeline-mousable ((t (:foreground "antiquewhite" :background "black"))))
- (modeline-buffer-id ((t (:foreground "antiquewhite" :background "black"))))
- (region ((t (:background "gray"))))
- (secondary-selection ((t (:background "paleturquoise"))))
- (show-paren-match-face ((t (:background "turquoise"))))
- (show-paren-mismatch-face ((t (:background "purple" :foreground "white"))))
- (underline ((t (:underline t)))))))
-
- (defun color-theme-xemacs ()
- "XEmacs standard colors.
- If you are missing standard faces in this theme, please notify the maintainer.
- Currently, this theme includes the standard faces and font-lock faces, including
- some faces used in Emacs only but which are needed to recreate the look of the
- XEmacs color theme."
- (interactive)
- (color-theme-install
- '(color-theme-xemacs
- ((background-color . "gray80")
- (background-mode . light)
- (background-toolbar-color . "#cf3ccf3ccf3c")
- (border-color . "#000000000000")
- (bottom-toolbar-shadow-color . "#79e77df779e7")
- (cursor-color . "Red3")
- (foreground-color . "black")
- (top-toolbar-shadow-color . "#fffffbeeffff"))
- (default ((t (nil))))
- (blue ((t (:foreground "blue"))))
- (bold ((t (:bold t))))
- (bold-italic ((t (:italic t :bold t))))
- (border-glyph ((t (nil))))
- (custom-button-face ((t (:bold t))))
- (custom-changed-face ((t (:background "blue" :foreground "white"))))
- (custom-documentation-face ((t (nil))))
- (custom-face-tag-face ((t (:underline t))))
- (custom-group-tag-face ((t (:underline t :foreground "blue"))))
- (custom-group-tag-face-1 ((t (:underline t :foreground "red"))))
- (custom-invalid-face ((t (:background "red" :foreground "yellow"))))
- (custom-modified-face ((t (:background "blue" :foreground "white"))))
- (custom-rogue-face ((t (:background "black" :foreground "pink"))))
- (custom-saved-face ((t (:underline t))))
- (custom-set-face ((t (:background "white" :foreground "blue"))))
- (custom-state-face ((t (:foreground "dark green"))))
- (custom-variable-button-face ((t (:underline t :bold t))))
- (custom-variable-tag-face ((t (:underline t :foreground "blue"))))
- (dired-face-boring ((t (:foreground "Gray65"))))
- (dired-face-directory ((t (:bold t))))
- (dired-face-executable ((t (:foreground "SeaGreen"))))
- (dired-face-flagged ((t (:background "LightSlateGray"))))
- (dired-face-marked ((t (:background "PaleVioletRed"))))
- (dired-face-permissions ((t (:background "grey75" :foreground "black"))))
- (dired-face-setuid ((t (:foreground "Red"))))
- (dired-face-socket ((t (:foreground "magenta"))))
- (dired-face-symlink ((t (:foreground "cyan"))))
- (font-lock-builtin-face ((t (:foreground "red3"))))
- (font-lock-comment-face ((t (:foreground "blue4"))))
- (font-lock-constant-face ((t (:foreground "red3"))))
- (font-lock-doc-string-face ((t (:foreground "green4"))))
- (font-lock-function-name-face ((t (:foreground "brown4"))))
- (font-lock-keyword-face ((t (:foreground "red4"))))
- (font-lock-preprocessor-face ((t (:foreground "blue3"))))
- (font-lock-reference-face ((t (:foreground "red3"))))
- (font-lock-string-face ((t (:foreground "green4"))))
- (font-lock-type-face ((t (:foreground "steelblue"))))
- (font-lock-variable-name-face ((t (:foreground "magenta4"))))
- (font-lock-warning-face ((t (:bold t :foreground "Red"))))
- (green ((t (:foreground "green"))))
- (gui-button-face ((t (:background "grey75" :foreground "black"))))
- (gui-element ((t (:background "Gray80"))))
- (highlight ((t (:background "darkseagreen2"))))
- (info-node ((t (:italic t :bold t))))
- (info-xref ((t (:bold t))))
- (isearch ((t (:background "paleturquoise"))))
- (italic ((t (:italic t))))
- (left-margin ((t (nil))))
- (list-mode-item-selected ((t (:background "gray68"))))
- (modeline ((t (:background "Gray80"))))
- (modeline-buffer-id ((t (:background "Gray80" :foreground "blue4"))))
- (modeline-mousable ((t (:background "Gray80" :foreground "firebrick"))))
- (modeline-mousable-minor-mode ((t (:background "Gray80" :foreground "green4"))))
- (paren-blink-off ((t (:foreground "gray80"))))
- (paren-match ((t (:background "darkseagreen2"))))
- (paren-mismatch ((t (:background "DeepPink" :foreground "black"))))
- (pointer ((t (nil))))
- (primary-selection ((t (:background "gray65"))))
- (red ((t (:foreground "red"))))
- (region ((t (:background "gray65"))))
- (right-margin ((t (nil))))
- (secondary-selection ((t (:background "paleturquoise"))))
- (text-cursor ((t (:background "Red3" :foreground "gray80"))))
- (toolbar ((t (:background "Gray80"))))
- (underline ((t (:underline t))))
- (vertical-divider ((t (:background "Gray80"))))
- (widget-button-face ((t (:bold t))))
- (widget-button-pressed-face ((t (:foreground "red"))))
- (widget-documentation-face ((t (:foreground "dark green"))))
- (widget-field-face ((t (:background "gray85"))))
- (widget-inactive-face ((t (:foreground "dim gray"))))
- (yellow ((t (:foreground "yellow"))))
- (zmacs-region ((t (:background "gray65")))))))
-
- (defun color-theme-jsc-light ()
- "Color theme by John S Cooper, created 2000-06-08."
- (interactive)
- (color-theme-install
- '(color-theme-jsc-light
- ((background-color . "white")
- (background-mode . light)
- (border-color . "black")
- (cursor-color . "Red")
- (foreground-color . "black")
- (mouse-color . "black"))
- ((gnus-mouse-face . highlight)
- (list-matching-lines-face . bold)
- (view-highlight-face . highlight))
- (default ((t (nil))))
- (bold ((t (:bold t :foreground "red3"))))
- (bold-italic ((t (:italic t :bold t :foreground "red"))))
- (custom-button-face ((t (nil))))
- (custom-changed-face ((t (:background "blue" :foreground "white"))))
- (custom-documentation-face ((t (nil))))
- (custom-face-tag-face ((t (:underline t))))
- (custom-group-tag-face ((t (:underline t :foreground "blue"))))
- (custom-group-tag-face-1 ((t (:underline t :foreground "red"))))
- (custom-invalid-face ((t (:background "red" :foreground "yellow"))))
- (custom-modified-face ((t (:background "blue" :foreground "white"))))
- (custom-rogue-face ((t (:background "black" :foreground "pink"))))
- (custom-saved-face ((t (:underline t))))
- (custom-set-face ((t (:background "white" :foreground "blue"))))
- (custom-state-face ((t (:foreground "dark green"))))
- (custom-variable-button-face ((t (:underline t :bold t))))
- (custom-variable-tag-face ((t (:underline t :foreground "blue"))))
- (font-lock-builtin-face ((t (:foreground "Orchid"))))
- (font-lock-comment-face ((t (:italic t :bold t :foreground "Red3"))))
- (font-lock-constant-face ((t (:foreground "navy"))))
- (font-lock-function-name-face ((t (:bold t :foreground "Blue"))))
- (font-lock-keyword-face ((t (:bold t :foreground "Purple"))))
- (font-lock-string-face ((t (:foreground "Green4"))))
- (font-lock-type-face ((t (:foreground "Navy"))))
- (font-lock-variable-name-face ((t (:foreground "Tan4"))))
- (font-lock-warning-face ((t (:bold t :foreground "Red"))))
- (gnus-cite-attribution-face ((t (:italic t))))
- (gnus-cite-face-1 ((t (:foreground "MidnightBlue"))))
- (gnus-cite-face-10 ((t (:foreground "medium purple"))))
- (gnus-cite-face-11 ((t (:foreground "turquoise"))))
- (gnus-cite-face-2 ((t (:foreground "firebrick"))))
- (gnus-cite-face-3 ((t (:foreground "dark green"))))
- (gnus-cite-face-4 ((t (:foreground "OrangeRed"))))
- (gnus-cite-face-5 ((t (:foreground "dark khaki"))))
- (gnus-cite-face-6 ((t (:foreground "dark violet"))))
- (gnus-cite-face-7 ((t (:foreground "SteelBlue4"))))
- (gnus-cite-face-8 ((t (:foreground "magenta"))))
- (gnus-cite-face-9 ((t (:foreground "violet"))))
- (gnus-emphasis-bold ((t (:bold t))))
- (gnus-emphasis-bold-italic ((t (:italic t :bold t))))
- (gnus-emphasis-highlight-words ((t (:background "black" :foreground "yellow"))))
- (gnus-emphasis-italic ((t (:italic t))))
- (gnus-emphasis-underline ((t (:underline t))))
- (gnus-emphasis-underline-bold ((t (:underline t :bold t))))
- (gnus-emphasis-underline-bold-italic ((t (:underline t :italic t :bold t))))
- (gnus-emphasis-underline-italic ((t (:underline t :italic t))))
- (gnus-group-mail-1-empty-face ((t (:foreground "DeepPink3"))))
- (gnus-group-mail-1-face ((t (:bold t :foreground "DeepPink3"))))
- (gnus-group-mail-2-empty-face ((t (:foreground "HotPink3"))))
- (gnus-group-mail-2-face ((t (:bold t :foreground "HotPink3"))))
- (gnus-group-mail-3-empty-face ((t (:foreground "magenta4"))))
- (gnus-group-mail-3-face ((t (:bold t :foreground "magenta4"))))
- (gnus-group-mail-low-empty-face ((t (:foreground "DeepPink4"))))
- (gnus-group-mail-low-face ((t (:bold t :foreground "DeepPink4"))))
- (gnus-group-news-1-empty-face ((t (:foreground "blue2"))))
- (gnus-group-news-1-face ((t (:bold t :foreground "blue2"))))
- (gnus-group-news-2-empty-face ((t (:foreground "CadetBlue4"))))
- (gnus-group-news-2-face ((t (:bold t :foreground "CadetBlue4"))))
- (gnus-group-news-3-empty-face ((t (nil))))
- (gnus-group-news-3-face ((t (:bold t))))
- (gnus-group-news-4-empty-face ((t (nil))))
- (gnus-group-news-4-face ((t (:bold t))))
- (gnus-group-news-5-empty-face ((t (nil))))
- (gnus-group-news-5-face ((t (:bold t))))
- (gnus-group-news-6-empty-face ((t (nil))))
- (gnus-group-news-6-face ((t (:bold t))))
- (gnus-group-news-low-empty-face ((t (:foreground "DarkGreen"))))
- (gnus-group-news-low-face ((t (:bold t :foreground "DarkGreen"))))
- (gnus-header-content-face ((t (:italic t :foreground "blue"))))
- (gnus-header-from-face ((t (:foreground "red3"))))
- (gnus-header-name-face ((t (:foreground "red3"))))
- (gnus-header-newsgroups-face ((t (:italic t :foreground "MidnightBlue"))))
- (gnus-header-subject-face ((t (:bold t :foreground "red"))))
- (gnus-signature-face ((t (:foreground "pink"))))
- (gnus-splash-face ((t (:foreground "Brown"))))
- (gnus-summary-cancelled-face ((t (:background "black" :foreground "yellow"))))
- (gnus-summary-high-ancient-face ((t (:bold t :foreground "RoyalBlue"))))
- (gnus-summary-high-read-face ((t (:bold t :foreground "navy"))))
- (gnus-summary-high-ticked-face ((t (:bold t :foreground "firebrick"))))
- (gnus-summary-high-unread-face ((t (:bold t :foreground "blue"))))
- (gnus-summary-low-ancient-face ((t (:italic t :foreground "RoyalBlue"))))
- (gnus-summary-low-read-face ((t (:italic t :foreground "DarkGreen"))))
- (gnus-summary-low-ticked-face ((t (:italic t :foreground "firebrick"))))
- (gnus-summary-low-unread-face ((t (:italic t))))
- (gnus-summary-normal-ancient-face ((t (:foreground "RoyalBlue"))))
- (gnus-summary-normal-read-face ((t (:foreground "red3"))))
- (gnus-summary-normal-ticked-face ((t (:foreground "black"))))
- (gnus-summary-normal-unread-face ((t (:bold t :foreground "red3"))))
- (gnus-summary-selected-face ((t (:underline t))))
- (highlight ((t (:background "antiquewhite" :foreground "blue"))))
- (italic ((t (:italic t))))
- (makefile-space-face ((t (:background "hotpink"))))
- (message-cited-text-face ((t (:foreground "red"))))
- (message-header-cc-face ((t (:foreground "MidnightBlue"))))
- (message-header-name-face ((t (:foreground "cornflower blue"))))
- (message-header-newsgroups-face ((t (:italic t :bold t :foreground "blue4"))))
- (message-header-other-face ((t (:foreground "steel blue"))))
- (message-header-subject-face ((t (:bold t :foreground "navy blue"))))
- (message-header-to-face ((t (:bold t :foreground "MidnightBlue"))))
- (message-header-xheader-face ((t (:foreground "blue"))))
- (message-mml-face ((t (:foreground "ForestGreen"))))
- (message-separator-face ((t (:foreground "brown"))))
- (modeline ((t (:background "plum" :foreground "black"))))
- (modeline-buffer-id ((t (:background "plum" :foreground "black"))))
- (modeline-mousable ((t (:background "plum" :foreground "black"))))
- (modeline-mousable-minor-mode ((t (:background "plum" :foreground "black"))))
- (region ((t (:background "plum"))))
- (secondary-selection ((t (:background "palegreen"))))
- (show-paren-match-face ((t (:background "plum"))))
- (show-paren-mismatch-face ((t (:background "navy" :foreground "white"))))
- (speedbar-button-face ((t (:foreground "green4"))))
- (speedbar-directory-face ((t (:foreground "blue4"))))
- (speedbar-file-face ((t (:foreground "cyan4"))))
- (speedbar-highlight-face ((t (:background "green"))))
- (speedbar-selected-face ((t (:underline t :foreground "red"))))
- (speedbar-tag-face ((t (:foreground "brown"))))
- (underline ((t (:underline t))))
- (widget-button-face ((t (:bold t))))
- (widget-button-pressed-face ((t (:foreground "red"))))
- (widget-documentation-face ((t (:foreground "dark green"))))
- (widget-field-face ((t (:background "gray85"))))
- (widget-inactive-face ((t (:foreground "dim gray"))))
- (widget-single-line-field-face ((t (:background "gray85")))))))
-
- (defun color-theme-jsc-dark ()
- "Color theme by John S Cooper, created 2000-06-11."
- (interactive)
- (color-theme-install
- '(color-theme-jsc-dark
- ((background-color . "black")
- (background-mode . dark)
- (border-color . "black")
- (cursor-color . "white")
- (foreground-color . "cornsilk")
- (mouse-color . "black"))
- ((gnus-mouse-face . highlight)
- (goto-address-mail-face . italic)
- (goto-address-mail-mouse-face . secondary-selection)
- (goto-address-url-face . bold)
- (goto-address-url-mouse-face . highlight)
- (list-matching-lines-face . bold)
- (view-highlight-face . highlight))
- (blank-space-face ((t (:background "LightGray"))))
- (blank-tab-face ((t (:background "cornsilk" :foreground "black"))))
- (default ((t (nil))))
- (bold ((t (:bold t :foreground "white"))))
- (bold-italic ((t (:italic t :bold t))))
- (calendar-today-face ((t (:underline t))))
- (cperl-array-face ((t (:bold t :background "lightyellow2" :foreground "Blue"))))
- (cperl-hash-face ((t (:italic t :bold t :background "lightyellow2" :foreground "Red"))))
- (cperl-nonoverridable-face ((t (:foreground "chartreuse3"))))
- (custom-button-face ((t (:foreground "white"))))
- (custom-changed-face ((t (:background "skyblue" :foreground "wheat"))))
- (custom-documentation-face ((t (:foreground "white"))))
- (custom-face-tag-face ((t (:underline t :foreground "white"))))
- (custom-group-tag-face ((t (:underline t :foreground "skyblue"))))
- (custom-group-tag-face-1 ((t (:underline t :foreground "pink"))))
- (custom-invalid-face ((t (:background "red" :foreground "yellow"))))
- (custom-modified-face ((t (:background "blue" :foreground "white"))))
- (custom-rogue-face ((t (:background "black" :foreground "pink"))))
- (custom-saved-face ((t (:underline t))))
- (custom-set-face ((t (:foreground "blue"))))
- (custom-state-face ((t (:foreground "light green"))))
- (custom-variable-button-face ((t (:underline t :bold t))))
- (custom-variable-tag-face ((t (:underline t :foreground "skyblue"))))
- (diary-face ((t (:bold t :foreground "orange"))))
- (font-lock-builtin-face ((t (:bold t :foreground "LightSteelBlue"))))
- (font-lock-comment-face ((t (:italic t :foreground "red"))))
- (font-lock-constant-face ((t (:bold t :foreground "salmon"))))
- (font-lock-function-name-face ((t (:bold t :foreground "orange"))))
- (font-lock-keyword-face ((t (:bold t :foreground "gold"))))
- (font-lock-string-face ((t (:italic t :foreground "orange"))))
- (font-lock-type-face ((t (:bold t :foreground "gold"))))
- (font-lock-variable-name-face ((t (:italic t :bold t :foreground "light salmon"))))
- (font-lock-warning-face ((t (:bold t :foreground "gold"))))
- (gnus-cite-attribution-face ((t (:italic t))))
- (gnus-cite-face-1 ((t (:foreground "light cyan"))))
- (gnus-cite-face-10 ((t (:foreground "medium purple"))))
- (gnus-cite-face-11 ((t (:foreground "turquoise"))))
- (gnus-cite-face-2 ((t (:foreground "light blue"))))
- (gnus-cite-face-3 ((t (:foreground "light yellow"))))
- (gnus-cite-face-4 ((t (:foreground "light pink"))))
- (gnus-cite-face-5 ((t (:foreground "pale green"))))
- (gnus-cite-face-6 ((t (:foreground "beige"))))
- (gnus-cite-face-7 ((t (:foreground "orange"))))
- (gnus-cite-face-8 ((t (:foreground "magenta"))))
- (gnus-cite-face-9 ((t (:foreground "violet"))))
- (gnus-emphasis-bold ((t (:bold t))))
- (gnus-emphasis-bold-italic ((t (:italic t :bold t))))
- (gnus-emphasis-highlight-words ((t (:background "black" :foreground "yellow"))))
- (gnus-emphasis-italic ((t (:italic t))))
- (gnus-emphasis-underline ((t (:background "goldenrod4" :foreground "white"))))
- (gnus-emphasis-underline-bold ((t (:underline t :bold t :background "yellow" :foreground "black"))))
- (gnus-emphasis-underline-bold-italic ((t (:underline t :italic t :bold t :background "yellow" :foreground "black"))))
- (gnus-emphasis-underline-italic ((t (:underline t :italic t :background "yellow" :foreground "black"))))
- (gnus-filterhist-face-1 ((t (nil))))
- (gnus-group-mail-1-empty-face ((t (:foreground "gray80"))))
- (gnus-group-mail-1-face ((t (:bold t :foreground "white"))))
- (gnus-group-mail-2-empty-face ((t (:foreground "lightcyan"))))
- (gnus-group-mail-2-face ((t (:bold t :foreground "lightcyan"))))
- (gnus-group-mail-3-empty-face ((t (:foreground "tan"))))
- (gnus-group-mail-3-face ((t (:bold t :foreground "tan"))))
- (gnus-group-mail-low-empty-face ((t (:foreground "aquamarine4"))))
- (gnus-group-mail-low-face ((t (:bold t :foreground "aquamarine4"))))
- (gnus-group-news-1-empty-face ((t (:foreground "white"))))
- (gnus-group-news-1-face ((t (:bold t :foreground "white"))))
- (gnus-group-news-2-empty-face ((t (:foreground "lightcyan"))))
- (gnus-group-news-2-face ((t (:bold t :foreground "lightcyan"))))
- (gnus-group-news-3-empty-face ((t (:foreground "tan"))))
- (gnus-group-news-3-face ((t (:bold t :foreground "tan"))))
- (gnus-group-news-4-empty-face ((t (:foreground "white"))))
- (gnus-group-news-4-face ((t (:bold t :foreground "white"))))
- (gnus-group-news-5-empty-face ((t (:foreground "wheat"))))
- (gnus-group-news-5-face ((t (:bold t :foreground "wheat"))))
- (gnus-group-news-6-empty-face ((t (:foreground "tan"))))
- (gnus-group-news-6-face ((t (:bold t :foreground "tan"))))
- (gnus-group-news-low-empty-face ((t (:foreground "DarkTurquoise"))))
- (gnus-group-news-low-face ((t (:bold t :foreground "DarkTurquoise"))))
- (gnus-header-content-face ((t (:italic t :foreground "plum1"))))
- (gnus-header-from-face ((t (:bold t :foreground "wheat"))))
- (gnus-header-name-face ((t (:bold t :foreground "gold"))))
- (gnus-header-newsgroups-face ((t (:italic t :bold t :foreground "wheat"))))
- (gnus-header-subject-face ((t (:bold t :foreground "red"))))
- (gnus-signature-face ((t (:italic t :foreground "maroon"))))
- (gnus-splash ((t (:foreground "Brown"))))
- (gnus-splash-face ((t (:foreground "gold"))))
- (gnus-summary-cancelled-face ((t (:background "gray" :foreground "black"))))
- (gnus-summary-high-ancient-face ((t (:bold t :foreground "SkyBlue"))))
- (gnus-summary-high-read-face ((t (:bold t :foreground "PaleGreen"))))
- (gnus-summary-high-ticked-face ((t (:bold t :foreground "gray70"))))
- (gnus-summary-high-unread-face ((t (:italic t :bold t))))
- (gnus-summary-low-ancient-face ((t (:italic t :foreground "SkyBlue"))))
- (gnus-summary-low-read-face ((t (:italic t :foreground "PaleGreen"))))
- (gnus-summary-low-ticked-face ((t (:italic t :bold t :foreground "gray70"))))
- (gnus-summary-low-unread-face ((t (:italic t))))
- (gnus-summary-normal-ancient-face ((t (:foreground "SkyBlue"))))
- (gnus-summary-normal-read-face ((t (:foreground "PaleGreen"))))
- (gnus-summary-normal-ticked-face ((t (:bold t :foreground "gray70"))))
- (gnus-summary-normal-unread-face ((t (:bold t))))
- (gnus-summary-selected-face ((t (:underline t :background "deepskyblue4"))))
- (highlight ((t (:background "darkslategray" :foreground "wheat"))))
- (highlight-changes-delete-face ((t (:underline t :foreground "red"))))
- (highlight-changes-face ((t (:foreground "red"))))
- (highline-face ((t (:background "gray35"))))
- (holiday-face ((t (:background "red"))))
- (info-menu-5 ((t (:underline t))))
- (info-node ((t (:italic t :bold t :foreground "yellow"))))
- (info-xref ((t (:bold t :foreground "plum"))))
- (italic ((t (:italic t))))
- (lazy-highlight-face ((t (:bold t :foreground "dark magenta"))))
- (linemenu-face ((t (:background "gray30"))))
- (makefile-space-face ((t (:background "hotpink"))))
- (message-cited-text-face ((t (:foreground "plum1"))))
- (message-header-cc-face ((t (:bold t :foreground "ivory"))))
- (message-header-name-face ((t (:foreground "light sky blue"))))
- (message-header-newsgroups-face ((t (:italic t :bold t :foreground "lavender blush"))))
- (message-header-other-face ((t (:foreground "pale turquoise"))))
- (message-header-subject-face ((t (:bold t :foreground "papaya whip"))))
- (message-header-to-face ((t (:bold t :foreground "floral white"))))
- (message-header-xheader-face ((t (:foreground "blue"))))
- (message-mml-face ((t (:bold t :foreground "ForestGreen"))))
- (message-separator-face ((t (:foreground "sandy brown"))))
- (modeline ((t (:background "tan" :foreground "black"))))
- (modeline-buffer-id ((t (:background "tan" :foreground "black"))))
- (modeline-mousable ((t (:background "tan" :foreground "black"))))
- (modeline-mousable-minor-mode ((t (:background "tan" :foreground "black"))))
- (paren-mismatch-face ((t (:bold t :background "white" :foreground "red"))))
- (paren-no-match-face ((t (:bold t :background "white" :foreground "red"))))
- (region ((t (:background "slategrey"))))
- (secondary-selection ((t (:background "deepskyblue4"))))
- (sgml-doctype-face ((t (:foreground "orange"))))
- (sgml-end-tag-face ((t (:foreground "greenyellow"))))
- (sgml-entity-face ((t (:foreground "gold"))))
- (sgml-ignored-face ((t (:background "gray60" :foreground "gray20"))))
- (sgml-sgml-face ((t (:foreground "yellow"))))
- (sgml-start-tag-face ((t (:foreground "mediumspringgreen"))))
- (show-paren-match-face ((t (:background "deepskyblue4"))))
- (show-paren-mismatch-face ((t (:bold t :background "red" :foreground "white"))))
- (speedbar-button-face ((t (:foreground "green4"))))
- (speedbar-directory-face ((t (:foreground "blue4"))))
- (speedbar-file-face ((t (:bold t :foreground "cyan4"))))
- (speedbar-highlight-face ((t (:background "green"))))
- (speedbar-selected-face ((t (:underline t :foreground "red"))))
- (speedbar-tag-face ((t (:foreground "brown"))))
- (underline ((t (:underline t))))
- (widget-button-face ((t (:bold t))))
- (widget-button-pressed-face ((t (:foreground "red"))))
- (widget-documentation-face ((t (:foreground "lime green"))))
- (widget-field-face ((t (:background "gray20"))))
- (widget-inactive-face ((t (:foreground "wheat"))))
- (widget-single-line-field-face ((t (:background "gray20"))))
- (woman-bold-face ((t (:bold t))))
- (woman-italic-face ((t (:foreground "beige"))))
- (woman-unknown-face ((t (:foreground "LightSalmon")))))))
-
- (defun color-theme-greiner ()
- "Color theme by Kevin Greiner, created 2000-06-13.
- Black on Beige, supports default, font-lock, speedbar, custom, widget
- faces. Designed to be easy on the eyes, particularly on Win32
- computers which commonly have white window backgrounds."
- (interactive)
- (color-theme-install
- '(color-theme-greiner
- ((background-color . "beige")
- (background-mode . light)
- (border-color . "black")
- (cursor-color . "black")
- (foreground-color . "black")
- (mouse-color . "black"))
- ((list-matching-lines-face . bold))
- (default ((t (nil))))
- (bold ((t (:bold t))))
- (bold-italic ((t (:italic t :bold t))))
- (custom-button-face ((t (nil))))
- (custom-changed-face ((t (:background "blue" :foreground "white"))))
- (custom-documentation-face ((t (nil))))
- (custom-face-tag-face ((t (:underline t))))
- (custom-group-tag-face ((t (:underline t :foreground "blue"))))
- (custom-group-tag-face-1 ((t (:underline t :foreground "red"))))
- (custom-invalid-face ((t (:background "red" :foreground "yellow"))))
- (custom-modified-face ((t (:background "blue" :foreground "white"))))
- (custom-rogue-face ((t (:background "black" :foreground "pink"))))
- (custom-saved-face ((t (:underline t))))
- (custom-set-face ((t (:background "white" :foreground "blue"))))
- (custom-state-face ((t (:foreground "dark green"))))
- (custom-variable-button-face ((t (:underline t :bold t))))
- (custom-variable-tag-face ((t (:underline t :foreground "blue"))))
- (font-lock-builtin-face ((t (:foreground "blue4"))))
- (font-lock-comment-face ((t (:foreground "Firebrick"))))
- (font-lock-constant-face ((t (:foreground "CadetBlue"))))
- (font-lock-function-name-face ((t (:foreground "Blue"))))
- (font-lock-keyword-face ((t (:foreground "royal blue"))))
- (font-lock-string-face ((t (:foreground "RosyBrown"))))
- (font-lock-type-face ((t (:foreground "ForestGreen"))))
- (font-lock-variable-name-face ((t (:foreground "DarkGoldenrod"))))
- (font-lock-warning-face ((t (:bold t :foreground "Red"))))
- (highlight ((t (:background "darkseagreen2"))))
- (info-menu-5 ((t (:underline t))))
- (info-node ((t (:italic t :bold t))))
- (info-xref ((t (:bold t))))
- (italic ((t (:italic t))))
- (modeline ((t (:background "black" :foreground "white"))))
- (modeline-mousable-minor-mode ((t (:background "black" :foreground "white"))))
- (modeline-mousable ((t (:background "black" :foreground "white"))))
- (modeline-buffer-id ((t (:background "black" :foreground "white"))))
- (region ((t (:background "gray"))))
- (secondary-selection ((t (:background "paleturquoise"))))
- (show-paren-match-face ((t (:background "turquoise"))))
- (show-paren-mismatch-face ((t (:background "purple" :foreground "white"))))
- (speedbar-button-face ((t (:foreground "green4"))))
- (speedbar-directory-face ((t (:foreground "blue4"))))
- (speedbar-file-face ((t (:foreground "cyan4"))))
- (speedbar-highlight-face ((t (:background "green"))))
- (speedbar-selected-face ((t (:underline t :foreground "red"))))
- (speedbar-tag-face ((t (:foreground "brown"))))
- (underline ((t (:underline t))))
- (widget-button-face ((t (:bold t))))
- (widget-button-pressed-face ((t (:foreground "red"))))
- (widget-documentation-face ((t (:foreground "dark green"))))
- (widget-field-face ((t (:background "gray85"))))
- (widget-inactive-face ((t (:foreground "dim gray"))))
- (widget-single-line-field-face ((t (:background "gray85")))))))
-
- (defun color-theme-jb-simple ()
- "Color theme by jeff, created 2000-06-14.
- Uses white background and bold for many things"
- (interactive)
- (color-theme-install
- '(color-theme-jb-simple
- ((background-color . "white")
- (background-mode . light)
- (background-toolbar-color . "#cf3ccf3ccf3c")
- (border-color . "black")
- (bottom-toolbar-shadow-color . "#79e77df779e7")
- (cursor-color . "black")
- (foreground-color . "black")
- (mouse-color . "black")
- (top-toolbar-shadow-color . "#fffffbeeffff"))
- ((gnus-mouse-face . highlight)
- (list-matching-lines-face . bold)
- (rmail-highlight-face . font-lock-function-name-face)
- (view-highlight-face . highlight))
- (default ((t (nil))))
- (blank-space-face ((t (nil))))
- (blank-tab-face ((t (nil))))
- (blue ((t (nil))))
- (bold ((t (:bold t))))
- (bold-italic ((t (:italic t :bold t))))
- (border-glyph ((t (nil))))
- (calendar-today-face ((t (:underline t))))
- (cperl-array-face ((t (:bold t :background "lightyellow2" :foreground "Blue"))))
- (cperl-hash-face ((t (:italic t :bold t :background "lightyellow2" :foreground "Red"))))
- (cperl-nonoverridable-face ((t (:foreground "chartreuse3"))))
- (custom-button-face ((t (:bold t))))
- (custom-changed-face ((t (:background "blue" :foreground "white"))))
- (custom-documentation-face ((t (nil))))
- (custom-face-tag-face ((t (:underline t))))
- (custom-group-tag-face ((t (:underline t :bold t :foreground "blue"))))
- (custom-group-tag-face-1 ((t (:underline t :foreground "red"))))
- (custom-invalid-face ((t (:background "red" :foreground "yellow"))))
- (custom-modified-face ((t (:background "blue" :foreground "white"))))
- (custom-rogue-face ((t (:background "black" :foreground "pink"))))
- (custom-saved-face ((t (:underline t))))
- (custom-set-face ((t (:background "white" :foreground "blue"))))
- (custom-state-face ((t (:foreground "dark green"))))
- (custom-variable-button-face ((t (:underline t :bold t))))
- (custom-variable-tag-face ((t (:underline t :bold t :foreground "blue"))))
- (diary-face ((t (:bold t :foreground "red"))))
- (ediff-current-diff-face-A ((t (:background "pale green" :foreground "firebrick"))))
- (ediff-current-diff-face-Ancestor ((t (:background "VioletRed" :foreground "Black"))))
- (ediff-current-diff-face-B ((t (:background "Yellow" :foreground "DarkOrchid"))))
- (ediff-current-diff-face-C ((t (:background "Pink" :foreground "Navy"))))
- (ediff-even-diff-face-A ((t (:background "light grey" :foreground "Black"))))
- (ediff-even-diff-face-Ancestor ((t (:background "Grey" :foreground "White"))))
- (ediff-even-diff-face-B ((t (:background "Grey" :foreground "White"))))
- (ediff-even-diff-face-C ((t (:background "light grey" :foreground "Black"))))
- (ediff-fine-diff-face-A ((t (:background "sky blue" :foreground "Navy"))))
- (ediff-fine-diff-face-Ancestor ((t (:background "Green" :foreground "Black"))))
- (ediff-fine-diff-face-B ((t (:background "cyan" :foreground "Black"))))
- (ediff-fine-diff-face-C ((t (:background "Turquoise" :foreground "Black"))))
- (ediff-odd-diff-face-A ((t (:background "Grey" :foreground "White"))))
- (ediff-odd-diff-face-Ancestor ((t (:background "light grey" :foreground "Black"))))
- (ediff-odd-diff-face-B ((t (:background "light grey" :foreground "Black"))))
- (ediff-odd-diff-face-C ((t (:background "Grey" :foreground "White"))))
- (erc-action-face ((t (:bold t))))
- (erc-bold-face ((t (:bold t))))
- (erc-default-face ((t (nil))))
- (erc-direct-msg-face ((t (nil))))
- (erc-error-face ((t (:bold t))))
- (erc-input-face ((t (nil))))
- (erc-inverse-face ((t (nil))))
- (erc-notice-face ((t (nil))))
- (erc-pal-face ((t (nil))))
- (erc-prompt-face ((t (nil))))
- (erc-underline-face ((t (nil))))
- (eshell-ls-archive-face ((t (:bold t :foreground "Orchid"))))
- (eshell-ls-backup-face ((t (:foreground "OrangeRed"))))
- (eshell-ls-clutter-face ((t (:bold t :foreground "OrangeRed"))))
- (eshell-ls-directory-face ((t (:bold t :foreground "Blue"))))
- (eshell-ls-executable-face ((t (:bold t :foreground "ForestGreen"))))
- (eshell-ls-missing-face ((t (:bold t :foreground "Red"))))
- (eshell-ls-picture-face ((t (nil))))
- (eshell-ls-product-face ((t (:foreground "OrangeRed"))))
- (eshell-ls-readonly-face ((t (:foreground "Brown"))))
- (eshell-ls-special-face ((t (:bold t :foreground "Magenta"))))
- (eshell-ls-symlink-face ((t (:bold t :foreground "DarkCyan"))))
- (eshell-ls-unreadable-face ((t (:foreground "Grey30"))))
- (eshell-prompt-face ((t (:bold t :foreground "Red"))))
- (eshell-test-failed-face ((t (:bold t :foreground "OrangeRed"))))
- (eshell-test-ok-face ((t (:bold t :foreground "Green"))))
- (excerpt ((t (:italic t))))
- (ff-paths-non-existant-file-face ((t (:bold t :foreground "NavyBlue"))))
- (fixed ((t (:bold t))))
- (flyspell-duplicate-face ((t (:underline t :bold t :foreground "Gold3"))))
- (flyspell-incorrect-face ((t (:underline t :bold t :foreground "OrangeRed"))))
- (font-latex-bold-face ((t (nil))))
- (font-latex-italic-face ((t (nil))))
- (font-latex-math-face ((t (nil))))
- (font-latex-sedate-face ((t (nil))))
- (font-latex-string-face ((t (nil))))
- (font-latex-warning-face ((t (nil))))
- (font-lock-builtin-face ((t (:bold t :foreground "Orchid"))))
- (font-lock-comment-face ((t (:italic t :bold t :foreground "blue4"))))
- (font-lock-constant-face ((t (:bold t :foreground "CadetBlue"))))
- (font-lock-doc-string-face ((t (:italic t :bold t :foreground "blue4"))))
- (font-lock-exit-face ((t (nil))))
- (font-lock-function-name-face ((t (:bold t :foreground "brown4"))))
- (font-lock-keyword-face ((t (:bold t :foreground "black"))))
- (font-lock-preprocessor-face ((t (:foreground "blue3"))))
- (font-lock-reference-face ((t (:foreground "red3"))))
- (font-lock-string-face ((t (:italic t :bold t :foreground "green4"))))
- (font-lock-type-face ((t (:bold t :foreground "steelblue"))))
- (font-lock-variable-name-face ((t (:italic t :bold t :foreground "magenta4"))))
- (font-lock-warning-face ((t (:bold t :foreground "Red"))))
- (gnus-cite-attribution-face ((t (:italic t :bold t))))
- (gnus-cite-face-1 ((t (:foreground "MidnightBlue"))))
- (gnus-cite-face-10 ((t (:foreground "medium purple"))))
- (gnus-cite-face-11 ((t (:foreground "turquoise"))))
- (gnus-cite-face-2 ((t (:foreground "firebrick"))))
- (gnus-cite-face-3 ((t (:foreground "dark green"))))
- (gnus-cite-face-4 ((t (:foreground "OrangeRed"))))
- (gnus-cite-face-5 ((t (:foreground "dark khaki"))))
- (gnus-cite-face-6 ((t (:foreground "dark violet"))))
- (gnus-cite-face-7 ((t (:foreground "SteelBlue4"))))
- (gnus-cite-face-8 ((t (:foreground "magenta"))))
- (gnus-cite-face-9 ((t (:foreground "violet"))))
- (gnus-emphasis-bold ((t (:bold t))))
- (gnus-emphasis-bold-italic ((t (:italic t :bold t))))
- (gnus-emphasis-highlight-words ((t (nil))))
- (gnus-emphasis-italic ((t (:italic t))))
- (gnus-emphasis-underline ((t (:underline t))))
- (gnus-emphasis-underline-bold ((t (:underline t :bold t))))
- (gnus-emphasis-underline-bold-italic ((t (:underline t :italic t :bold t))))
- (gnus-emphasis-underline-italic ((t (:underline t :italic t))))
- (gnus-filterhist-face-1 ((t (nil))))
- (gnus-group-mail-1-empty-face ((t (:foreground "DeepPink3"))))
- (gnus-group-mail-1-face ((t (:bold t :foreground "DeepPink3"))))
- (gnus-group-mail-2-empty-face ((t (:foreground "HotPink3"))))
- (gnus-group-mail-2-face ((t (:bold t :foreground "HotPink3"))))
- (gnus-group-mail-3-empty-face ((t (:foreground "magenta4"))))
- (gnus-group-mail-3-face ((t (:bold t :foreground "magenta4"))))
- (gnus-group-mail-low-empty-face ((t (:foreground "DeepPink4"))))
- (gnus-group-mail-low-face ((t (:bold t :foreground "DeepPink4"))))
- (gnus-group-news-1-empty-face ((t (:foreground "ForestGreen"))))
- (gnus-group-news-1-face ((t (:bold t :foreground "ForestGreen"))))
- (gnus-group-news-2-empty-face ((t (:foreground "CadetBlue4"))))
- (gnus-group-news-2-face ((t (:bold t :foreground "CadetBlue4"))))
- (gnus-group-news-3-empty-face ((t (nil))))
- (gnus-group-news-3-face ((t (:bold t))))
- (gnus-group-news-4-empty-face ((t (nil))))
- (gnus-group-news-4-face ((t (:bold t))))
- (gnus-group-news-5-empty-face ((t (nil))))
- (gnus-group-news-5-face ((t (:bold t))))
- (gnus-group-news-6-empty-face ((t (nil))))
- (gnus-group-news-6-face ((t (:bold t))))
- (gnus-group-news-low-empty-face ((t (:foreground "DarkGreen"))))
- (gnus-group-news-low-face ((t (:bold t :foreground "DarkGreen"))))
- (gnus-header-content-face ((t (:italic t :foreground "indianred4"))))
- (gnus-header-from-face ((t (:bold t :foreground "red3"))))
- (gnus-header-name-face ((t (:bold t :foreground "maroon"))))
- (gnus-header-newsgroups-face ((t (:italic t :bold t :foreground "MidnightBlue"))))
- (gnus-header-subject-face ((t (:bold t :foreground "red4"))))
- (gnus-signature-face ((t (:italic t))))
- (gnus-splash ((t (nil))))
- (gnus-splash-face ((t (:foreground "ForestGreen"))))
- (gnus-summary-cancelled-face ((t (:background "black" :foreground "yellow"))))
- (gnus-summary-high-ancient-face ((t (:bold t :foreground "RoyalBlue"))))
- (gnus-summary-high-read-face ((t (:bold t :foreground "DarkGreen"))))
- (gnus-summary-high-ticked-face ((t (:bold t :foreground "firebrick"))))
- (gnus-summary-high-unread-face ((t (:italic t :bold t))))
- (gnus-summary-low-ancient-face ((t (:italic t :foreground "RoyalBlue"))))
- (gnus-summary-low-read-face ((t (:italic t :foreground "DarkGreen"))))
- (gnus-summary-low-ticked-face ((t (:italic t :bold t :foreground "firebrick"))))
- (gnus-summary-low-unread-face ((t (:italic t))))
- (gnus-summary-normal-ancient-face ((t (:foreground "RoyalBlue"))))
- (gnus-summary-normal-read-face ((t (:foreground "DarkGreen"))))
- (gnus-summary-normal-ticked-face ((t (:bold t :foreground "firebrick"))))
- (gnus-summary-normal-unread-face ((t (:bold t))))
- (gnus-summary-selected-face ((t (:underline t))))
- (green ((t (nil))))
- (gui-button-face ((t (:background "grey75"))))
- (gui-element ((t (:background "Gray80"))))
- (highlight ((t (:background "darkseagreen2"))))
- (highlight-changes-delete-face ((t (:underline t :foreground "red"))))
- (highlight-changes-face ((t (:foreground "red"))))
- (highline-face ((t (:background "paleturquoise"))))
- (holiday-face ((t (:background "pink"))))
- (html-helper-italic-face ((t (:italic t))))
- (info-menu-5 ((t (:underline t))))
- (info-node ((t (:italic t :bold t))))
- (info-xref ((t (:bold t))))
- (isearch ((t (nil))))
- (italic ((t (:italic t))))
- (lazy-highlight-face ((t (:bold t :foreground "dark magenta"))))
- (left-margin ((t (nil))))
- (linemenu-face ((t (nil))))
- (list-mode-item-selected ((t (nil))))
- (makefile-space-face ((t (:background "hotpink"))))
- (message-cited-text-face ((t (:foreground "red"))))
- (message-header-cc-face ((t (:bold t :foreground "MidnightBlue"))))
- (message-header-name-face ((t (:foreground "cornflower blue"))))
- (message-header-newsgroups-face ((t (:italic t :bold t :foreground "blue4"))))
- (message-header-other-face ((t (:foreground "steel blue"))))
- (message-header-subject-face ((t (:bold t :foreground "navy blue"))))
- (message-header-to-face ((t (:bold t :foreground "MidnightBlue"))))
- (message-header-xheader-face ((t (:foreground "blue"))))
- (message-mml-face ((t (:bold t))))
- (message-separator-face ((t (:foreground "brown"))))
- (modeline ((t (:background "darkblue" :foreground "yellow"))))
- (modeline-buffer-id ((t (:background "black" :foreground "white"))))
- (modeline-mousable ((t (:background "black" :foreground "white"))))
- (modeline-mousable-minor-mode ((t (:background "black" :foreground "white"))))
- (nil ((t (nil))))
- (paren-mismatch-face ((t (:bold t))))
- (paren-no-match-face ((t (:bold t))))
- (pointer ((t (nil))))
- (primary-selection ((t (nil))))
- (red ((t (nil))))
- (region ((t (:background "gray"))))
- (right-margin ((t (nil))))
- (secondary-selection ((t (:background "paleturquoise"))))
- (sgml-doctype-face ((t (nil))))
- (sgml-end-tag-face ((t (nil))))
- (sgml-entity-face ((t (nil))))
- (sgml-ignored-face ((t (nil))))
- (sgml-sgml-face ((t (nil))))
- (sgml-start-tag-face ((t (nil))))
- (show-paren-match-face ((t (:background "turquoise"))))
- (show-paren-mismatch-face ((t (:bold t :background "purple" :foreground "white"))))
- (speedbar-button-face ((t (:bold t :foreground "green4"))))
- (speedbar-directory-face ((t (:bold t :foreground "blue4"))))
- (speedbar-file-face ((t (:bold t :foreground "cyan4"))))
- (speedbar-highlight-face ((t (:background "green"))))
- (speedbar-selected-face ((t (:underline t :foreground "red"))))
- (speedbar-tag-face ((t (:foreground "brown"))))
- (swbuff-current-buffer-face ((t (:bold t))))
- (term-black ((t (:foreground "black"))))
- (term-blackbg ((t (:background "black"))))
- (term-blue ((t (:foreground "blue"))))
- (term-bluebg ((t (:background "blue"))))
- (term-bold ((t (:bold t))))
- (term-cyan ((t (:foreground "cyan"))))
- (term-cyanbg ((t (:background "cyan"))))
- (term-default-bg ((t (nil))))
- (term-default-bg-inv ((t (nil))))
- (term-default-fg ((t (nil))))
- (term-default-fg-inv ((t (nil))))
- (term-green ((t (:foreground "green"))))
- (term-greenbg ((t (:background "green"))))
- (term-invisible ((t (nil))))
- (term-invisible-inv ((t (nil))))
- (term-magenta ((t (:foreground "magenta"))))
- (term-magentabg ((t (:background "magenta"))))
- (term-red ((t (:foreground "red"))))
- (term-redbg ((t (:background "red"))))
- (term-underline ((t (:underline t))))
- (term-white ((t (:foreground "white"))))
- (term-whitebg ((t (:background "white"))))
- (term-yellow ((t (:foreground "yellow"))))
- (term-yellowbg ((t (:background "yellow"))))
- (text-cursor ((t (nil))))
- (toolbar ((t (nil))))
- (underline ((t (:underline t))))
- (vc-annotate-face-0046FF ((t (nil))))
- (vcursor ((t (:underline t :background "cyan" :foreground "blue"))))
- (vertical-divider ((t (nil))))
- (vhdl-font-lock-attribute-face ((t (:foreground "Orchid"))))
- (vhdl-font-lock-directive-face ((t (:foreground "CadetBlue"))))
- (vhdl-font-lock-enumvalue-face ((t (:foreground "Gold4"))))
- (vhdl-font-lock-function-face ((t (:foreground "Orchid4"))))
- (vhdl-font-lock-prompt-face ((t (:bold t :foreground "Red"))))
- (vhdl-font-lock-reserved-words-face ((t (:bold t :foreground "Orange"))))
- (vhdl-font-lock-translate-off-face ((t (:background "LightGray"))))
- (vhdl-speedbar-architecture-face ((t (:foreground "Blue"))))
- (vhdl-speedbar-architecture-selected-face ((t (:underline t :foreground "Blue"))))
- (vhdl-speedbar-configuration-face ((t (:foreground "DarkGoldenrod"))))
- (vhdl-speedbar-configuration-selected-face ((t (:underline t :foreground "DarkGoldenrod"))))
- (vhdl-speedbar-entity-face ((t (:foreground "ForestGreen"))))
- (vhdl-speedbar-entity-selected-face ((t (:underline t :foreground "ForestGreen"))))
- (vhdl-speedbar-instantiation-face ((t (:foreground "Brown"))))
- (vhdl-speedbar-instantiation-selected-face ((t (:underline t :foreground "Brown"))))
- (vhdl-speedbar-package-face ((t (:foreground "Grey50"))))
- (vhdl-speedbar-package-selected-face ((t (:underline t :foreground "Grey50"))))
- (viper-minibuffer-emacs-face ((t (:background "darkseagreen2" :foreground "Black"))))
- (viper-minibuffer-insert-face ((t (:background "pink" :foreground "Black"))))
- (viper-minibuffer-vi-face ((t (:background "grey" :foreground "DarkGreen"))))
- (viper-replace-overlay-face ((t (:background "darkseagreen2" :foreground "Black"))))
- (viper-search-face ((t (:background "khaki" :foreground "Black"))))
- (widget-button-face ((t (:bold t))))
- (widget-button-pressed-face ((t (:foreground "red"))))
- (widget-documentation-face ((t (:foreground "dark green"))))
- (widget-field-face ((t (:background "gray85"))))
- (widget-inactive-face ((t (:foreground "dim gray"))))
- (widget-single-line-field-face ((t (:background "gray85"))))
- (woman-bold-face ((t (:bold t))))
- (woman-italic-face ((t (nil))))
- (woman-unknown-face ((t (nil))))
- (yellow ((t (nil))))
- (zmacs-region ((t (nil)))))))
-
- (defun color-theme-beige-diff ()
- "Brownish faces for diff and change-log modes.
- This is intended for other color themes to use (eg. `color-theme-gnome2'
- and `color-theme-blue-sea')."
- (color-theme-install
- '(color-theme-beige-diff
- nil
- (change-log-acknowledgement-face ((t (:foreground "firebrick"))))
- (change-log-conditionals-face ((t (:foreground "khaki" :background "sienna"))))
- (change-log-date-face ((t (:foreground "gold"))))
- (change-log-email-face ((t (:foreground "khaki" :underline t))))
- (change-log-file-face ((t (:bold t :foreground "lemon chiffon"))))
- (change-log-function-face ((t (:foreground "khaki" :background "sienna"))))
- (change-log-list-face ((t (:foreground "wheat"))))
- (change-log-name-face ((t (:bold t :foreground "light goldenrod"))))
- (diff-added-face ((t (nil))))
- (diff-changed-face ((t (nil))))
- (diff-context-face ((t (:foreground "grey50"))))
- (diff-file-header-face ((t (:bold t :foreground "lemon chiffon"))))
- (diff-function-face ((t (:foreground "grey50"))))
- (diff-header-face ((t (:foreground "lemon chiffon"))))
- (diff-hunk-header-face ((t (:foreground "light goldenrod"))))
- (diff-index-face ((t (:bold t :underline t))))
- (diff-nonexistent-face ((t (:bold t :background "grey70" :weight bold))))
- (diff-removed-face ((t (nil))))
- (log-view-message-face ((t (:foreground "lemon chiffon")))))))
-
- (defun color-theme-standard-ediff ()
- "Standard colors for ediff faces.
- This is intended for other color themes to use
- \(eg. `color-theme-goldenrod')."
- (color-theme-install
- '(color-theme-beige-diff
- nil
- (ediff-current-diff-face-A ((t (:background "pale green" :foreground "firebrick"))))
- (ediff-current-diff-face-Ancestor ((t (:background "VioletRed" :foreground "Black"))))
- (ediff-current-diff-face-B ((t (:background "Yellow" :foreground "DarkOrchid"))))
- (ediff-current-diff-face-C ((t (:background "Pink" :foreground "Navy"))))
- (ediff-even-diff-face-A ((t (:background "light grey" :foreground "Black"))))
- (ediff-even-diff-face-Ancestor ((t (:background "Grey" :foreground "White"))))
- (ediff-even-diff-face-B ((t (:background "Grey" :foreground "White"))))
- (ediff-even-diff-face-C ((t (:background "light grey" :foreground "Black"))))
- (ediff-fine-diff-face-A ((t (:background "sky blue" :foreground "Navy"))))
- (ediff-fine-diff-face-Ancestor ((t (:background "Green" :foreground "Black"))))
- (ediff-fine-diff-face-B ((t (:background "cyan" :foreground "Black"))))
- (ediff-fine-diff-face-C ((t (:background "Turquoise" :foreground "Black"))))
- (ediff-odd-diff-face-A ((t (:background "Grey" :foreground "White"))))
- (ediff-odd-diff-face-Ancestor ((t (:background "light grey" :foreground "Black"))))
- (ediff-odd-diff-face-B ((t (:background "light grey" :foreground "Black"))))
- (ediff-odd-diff-face-C ((t (:background "Grey" :foreground "White")))))))
-
- (defun color-theme-beige-eshell ()
- "Brownish colors for eshell faces only.
- This is intended for other color themes to use (eg. `color-theme-goldenrod')."
- (color-theme-install
- '(color-theme-beige-eshell
- nil
- (eshell-ls-archive-face ((t (:bold t :foreground "IndianRed"))))
- (eshell-ls-backup-face ((t (:foreground "Grey"))))
- (eshell-ls-clutter-face ((t (:foreground "DimGray"))))
- (eshell-ls-directory-face ((t (:bold t :foreground "dark khaki"))))
- (eshell-ls-executable-face ((t (:foreground "Coral"))))
- (eshell-ls-missing-face ((t (:foreground "black"))))
- (eshell-ls-picture-face ((t (:foreground "gold")))) ; non-standard face
- (eshell-ls-product-face ((t (:foreground "dark sea green"))))
- (eshell-ls-readonly-face ((t (:foreground "light steel blue"))))
- (eshell-ls-special-face ((t (:foreground "gold"))))
- (eshell-ls-symlink-face ((t (:foreground "peach puff"))))
- (eshell-ls-text-face ((t (:foreground "moccasin")))) ; non-standard face
- (eshell-ls-todo-face ((t (:bold t :foreground "yellow green")))) ; non-standard face
- (eshell-ls-unreadable-face ((t (:foreground "DimGray"))))
- (eshell-prompt-face ((t (:foreground "lemon chiffon")))))))
-
- (defun color-theme-goldenrod ()
- "Brown color theme. Very different from the others.
- Supports standard, font-lock and info faces, and it uses
- `color-theme-blue-gnus', `color-theme-blue-erc' , and
- `color-theme-beige-diff'."
- (interactive)
- (color-theme-blue-gnus)
- (let ((color-theme-is-cumulative t))
- (color-theme-blue-erc)
- (color-theme-beige-diff)
- (color-theme-beige-eshell)
- (color-theme-install
- '(color-theme-goldenrod
- ((background-color . "black")
- (background-mode . dark)
- (border-color . "black")
- (cursor-color . "light goldenrod")
- (foreground-color . "goldenrod")
- (mouse-color . "goldenrod"))
- ((goto-address-mail-face . info-xref)
- (list-matching-lines-face . bold)
- (view-highlight-face . highlight))
- (default ((t (nil))))
- (bold ((t (:bold t))))
- (bold-italic ((t (:italic t :bold t :foreground "lavender"))))
- (font-lock-builtin-face ((t (:foreground "pale goldenrod"))))
- (font-lock-comment-face ((t (:foreground "indian red"))))
- (font-lock-constant-face ((t (:foreground "pale green"))))
- (font-lock-function-name-face ((t (:bold t :foreground "lemon chiffon"))))
- (font-lock-keyword-face ((t (:foreground "wheat"))))
- (font-lock-string-face ((t (:foreground "gold"))))
- (font-lock-type-face ((t (:foreground "dark khaki" :bold t))))
- (font-lock-variable-name-face ((t (:bold t :foreground "khaki"))))
- (font-lock-warning-face ((t (:bold t :foreground "orange red"))))
- (fringe ((t (:background "gray25"))))
- (header-line ((t (:background "gray20" :foreground "gray70"))))
- (highlight ((t (:background "dark slate blue"))))
- (info-menu-5 ((t (:underline t))))
- (info-node ((t (:bold t))))
- (info-xref ((t (:bold t :foreground "pale goldenrod"))))
- (isearch ((t (:background "SeaGreen4"))))
- (isearch-lazy-highlight-face ((t (:background "DarkOliveGreen4"))))
- (italic ((t (:italic t :foreground "lavender"))))
- (menu ((t (:background "gray25" :foreground "lemon chiffon"))))
- (modeline ((t (:background "gray40" :foreground "lemon chiffon" :box (:line-width 1 :style released-button)))))
- (modeline-buffer-id ((t (:background "AntiqueWhite4" :foreground "lemon chiffon"))))
- (modeline-mousable ((t (:background "AntiqueWhite4" :foreground "lemon chiffon"))))
- (modeline-mousable-minor-mode ((t (:background "wheat" :foreground "lemon chiffon"))))
- (mode-line-inactive ((t (:background "gray20" :foreground "lemon chiffon" :box (:line-width 1 :style released-button)))))
- (region ((t (:background "dark olive green"))))
- (secondary-selection ((t (:background "dark green"))))
- (tool-bar ((t (:background "gray25" :foreground "lemon chiffon" :box (:line-width 1 :style released-button)))))
- (underline ((t (:underline t))))))))
-
- (defun color-theme-ramangalahy ()
- "Color theme by Solofo Ramangalahy, created 2000-10-18.
- Black on light grey, includes faces for vm, ispell, gnus,
- dired, display-time, cperl, font-lock, widget, x-symbol."
- (interactive)
- (color-theme-install
- '(color-theme-ramangalahy
- ((background-color . "lightgrey")
- (background-mode . light)
- (background-toolbar-color . "#bfbfbfbfbfbf")
- (border-color . "#000000000000")
- (bottom-toolbar-shadow-color . "#737373737373")
- (cursor-color . "blue")
- (foreground-color . "black")
- (top-toolbar-shadow-color . "#e6e6e6e6e6e6"))
- ((gnus-mouse-face . highlight)
- (goto-address-mail-face . info-xref)
- (ispell-highlight-face . highlight)
- (notes-bold-face . notes-bold-face)
- (setnu-line-number-face . bold)
- (tinyreplace-:face . highlight)
- (vm-highlight-url-face . bold-italic)
- (vm-highlighted-header-face . bold)
- (vm-mime-button-face . gui-button-face)
- (vm-summary-highlight-face . bold))
- (default ((t (nil))))
- (bbdb-company ((t (nil))))
- (blue ((t (:foreground "blue"))))
- (bold ((t (:bold t))))
- (bold-italic ((t (:italic t :bold t))))
- (border-glyph ((t (nil))))
- (cperl-here-face ((t (:foreground "green4"))))
- (cperl-pod-face ((t (:foreground "brown4"))))
- (cperl-pod-head-face ((t (:foreground "steelblue"))))
- (custom-button-face ((t (:bold t))))
- (custom-changed-face ((t (:background "blue" :foreground "white"))))
- (custom-documentation-face ((t (nil))))
- (custom-face-tag-face ((t (:underline t))))
- (custom-group-tag-face ((t (:underline t :foreground "blue"))))
- (custom-group-tag-face-1 ((t (:underline t :foreground "red"))))
- (custom-invalid-face ((t (:background "red" :foreground "yellow"))))
- (custom-modified-face ((t (:background "blue" :foreground "white"))))
- (custom-rogue-face ((t (:background "black" :foreground "pink"))))
- (custom-saved-face ((t (:underline t))))
- (custom-set-face ((t (:background "white" :foreground "blue"))))
- (custom-state-face ((t (:foreground "dark green"))))
- (custom-variable-button-face ((t (:underline t :bold t))))
- (custom-variable-tag-face ((t (:underline t :foreground "blue"))))
- (dired-face-boring ((t (:foreground "Gray65"))))
- (dired-face-directory ((t (:bold t))))
- (dired-face-executable ((t (:foreground "SeaGreen"))))
- (dired-face-flagged ((t (:background "LightSlateGray"))))
- (dired-face-marked ((t (:background "PaleVioletRed"))))
- (dired-face-permissions ((t (:background "grey75" :foreground "black"))))
- (dired-face-setuid ((t (:foreground "Red"))))
- (dired-face-socket ((t (:foreground "magenta"))))
- (dired-face-symlink ((t (:foreground "blue"))))
- (display-time-mail-balloon-enhance-face ((t (:background "orange"))))
- (display-time-mail-balloon-gnus-group-face ((t (:foreground "blue"))))
- (display-time-time-balloon-face ((t (:foreground "red"))))
- (ff-paths-non-existant-file-face ((t (:bold t :foreground "NavyBlue"))))
- (font-lock-comment-face ((t (:bold t :foreground "purple"))))
- (font-lock-doc-string-face ((t (:bold t :foreground "slateblue"))))
- (font-lock-emphasized-face ((t (:bold t :background "lightyellow2"))))
- (font-lock-function-name-face ((t (:bold t :foreground "blue"))))
- (font-lock-keyword-face ((t (:bold t :foreground "violetred"))))
- (font-lock-other-emphasized-face ((t (:italic t :bold t :background "lightyellow2"))))
- (font-lock-other-type-face ((t (:bold t :foreground "orange3"))))
- (font-lock-preprocessor-face ((t (:bold t :foreground "mediumblue"))))
- (font-lock-reference-face ((t (:foreground "red3"))))
- (font-lock-string-face ((t (:foreground "green4"))))
- (font-lock-type-face ((t (:bold t :foreground "steelblue"))))
- (font-lock-variable-name-face ((t (:foreground "magenta4"))))
- (font-lock-warning-face ((t (:bold t :background "yellow" :foreground "Red"))))
- (gnus-emphasis-bold ((t (:bold t))))
- (gnus-emphasis-bold-italic ((t (nil))))
- (gnus-emphasis-italic ((t (nil))))
- (gnus-emphasis-underline ((t (:underline t))))
- (gnus-emphasis-underline-bold ((t (:underline t :bold t))))
- (gnus-emphasis-underline-bold-italic ((t (:underline t))))
- (gnus-emphasis-underline-italic ((t (:underline t))))
- (gnus-group-mail-1-empty-face ((t (:foreground "DeepPink3"))))
- (gnus-group-mail-1-face ((t (:bold t :foreground "DeepPink3"))))
- (gnus-group-mail-2-empty-face ((t (:foreground "HotPink3"))))
- (gnus-group-mail-2-face ((t (:bold t :foreground "HotPink3"))))
- (gnus-group-mail-3-empty-face ((t (:foreground "magenta4"))))
- (gnus-group-mail-3-face ((t (:bold t :foreground "magenta4"))))
- (gnus-group-mail-low-empty-face ((t (:foreground "DeepPink4"))))
- (gnus-group-mail-low-face ((t (:bold t :foreground "DeepPink4"))))
- (gnus-group-news-1-empty-face ((t (:foreground "ForestGreen"))))
- (gnus-group-news-1-face ((t (:bold t :foreground "ForestGreen"))))
- (gnus-group-news-2-empty-face ((t (:foreground "CadetBlue4"))))
- (gnus-group-news-2-face ((t (:bold t :foreground "CadetBlue4"))))
- (gnus-group-news-3-empty-face ((t (:foreground "DeepPink4"))))
- (gnus-group-news-3-face ((t (:bold t :foreground "DeepPink4"))))
- (gnus-group-news-low-empty-face ((t (:foreground "DarkGreen"))))
- (gnus-group-news-low-face ((t (:bold t :foreground "DarkGreen"))))
- (gnus-header-content-face ((t (:foreground "indianred4"))))
- (gnus-header-from-face ((t (:foreground "red3"))))
- (gnus-header-name-face ((t (:foreground "maroon"))))
- (gnus-header-newsgroups-face ((t (:foreground "MidnightBlue"))))
- (gnus-header-subject-face ((t (:foreground "red4"))))
- (gnus-signature-face ((t (:bold t))))
- (gnus-splash-face ((t (:foreground "ForestGreen"))))
- (gnus-summary-cancelled-face ((t (:background "black" :foreground "yellow"))))
- (gnus-summary-high-ancient-face ((t (:bold t :foreground "RoyalBlue"))))
- (gnus-summary-high-read-face ((t (:bold t :foreground "DarkGreen"))))
- (gnus-summary-high-ticked-face ((t (:bold t :foreground "firebrick"))))
- (gnus-summary-high-unread-face ((t (:bold t))))
- (gnus-summary-low-ancient-face ((t (:foreground "RoyalBlue"))))
- (gnus-summary-low-read-face ((t (:foreground "DarkGreen"))))
- (gnus-summary-low-ticked-face ((t (:foreground "firebrick"))))
- (gnus-summary-low-unread-face ((t (nil))))
- (gnus-summary-normal-ancient-face ((t (:foreground "RoyalBlue"))))
- (gnus-summary-normal-read-face ((t (:foreground "DarkGreen"))))
- (gnus-summary-normal-ticked-face ((t (:foreground "firebrick"))))
- (gnus-summary-normal-unread-face ((t (nil))))
- (gnus-summary-selected-face ((t (:underline t))))
- (gnus-x-face ((t (:background "lightgrey" :foreground "black"))))
- (green ((t (:foreground "green"))))
- (gui-button-face ((t (:background "grey75" :foreground "black"))))
- (gui-element ((t (:background "lightgrey"))))
- (highlight ((t (:background "darkseagreen2"))))
- (info-node ((t (:underline t :bold t :foreground "mediumpurple"))))
- (info-xref ((t (:underline t :bold t :foreground "#0000ee"))))
- (isearch ((t (:background "paleturquoise"))))
- (italic ((t (:italic t))))
- (left-margin ((t (nil))))
- (list-mode-item-selected ((t (:background "gray68" :foreground "black"))))
- (message-cited-text ((t (:foreground "slategrey"))))
- (message-cited-text-face ((t (:foreground "red"))))
- (message-header-cc-face ((t (:foreground "MidnightBlue"))))
- (message-header-contents ((t (:italic t))))
- (message-header-name-face ((t (:foreground "cornflower blue"))))
- (message-header-newsgroups-face ((t (:bold t :foreground "blue4"))))
- (message-header-other-face ((t (:foreground "steel blue"))))
- (message-header-subject-face ((t (:bold t :foreground "navy blue"))))
- (message-header-to-face ((t (:bold t :foreground "MidnightBlue"))))
- (message-header-xheader-face ((t (:foreground "blue"))))
- (message-headers ((t (:bold t))))
- (message-highlighted-header-contents ((t (:bold t))))
- (message-separator-face ((t (:foreground "brown"))))
- (message-url ((t (:bold t))))
- (modeline ((t (:bold t :background "Gray75" :foreground "Black"))))
- (modeline-buffer-id ((t (:bold t :background "Gray75" :foreground "blue4"))))
- (modeline-mousable ((t (:bold t :background "Gray75" :foreground "firebrick"))))
- (modeline-mousable-minor-mode ((t (:bold t :background "Gray75" :foreground "green4"))))
- (paren-blink-off ((t (:foreground "lightgrey"))))
- (paren-match ((t (:background "darkseagreen2"))))
- (paren-mismatch ((t (:background "DeepPink" :foreground "black"))))
- (pointer ((t (:foreground "blue"))))
- (primary-selection ((t (:background "gray65"))))
- (red ((t (:foreground "red"))))
- (region ((t (:background "black" :foreground "white"))))
- (right-margin ((t (nil))))
- (searchm-buffer ((t (:bold t :background "white" :foreground "red"))))
- (searchm-button ((t (:bold t :background "CadetBlue" :foreground "white"))))
- (searchm-field ((t (:background "grey89"))))
- (searchm-field-label ((t (:bold t))))
- (searchm-highlight ((t (:bold t :background "darkseagreen2" :foreground "black"))))
- (secondary-selection ((t (:background "paleturquoise"))))
- (template-message-face ((t (:bold t))))
- (text-cursor ((t (:background "blue" :foreground "lightgrey"))))
- (toolbar ((t (nil))))
- (underline ((t (:underline t))))
- (vertical-divider ((t (nil))))
- (widget-button-face ((t (:bold t))))
- (widget-button-pressed-face ((t (:foreground "red"))))
- (widget-documentation-face ((t (:foreground "dark green"))))
- (widget-field-face ((t (:background "gray85"))))
- (widget-inactive-face ((t (:foreground "dim gray"))))
- (x-face ((t (:background "white" :foreground "black"))))
- (x-symbol-adobe-fontspecific-face ((t (nil))))
- (x-symbol-face ((t (nil))))
- (x-symbol-heading-face ((t (:underline t :bold t :foreground "green4"))))
- (x-symbol-info-face ((t (:foreground "green4"))))
- (x-symbol-invisible-face ((t (nil))))
- (x-symbol-revealed-face ((t (:background "pink"))))
- (yellow ((t (:foreground "yellow"))))
- (zmacs-region ((t (:background "yellow")))))))
-
- (defun color-theme-raspopovic ()
- "Color theme by Pedja Raspopovic, created 2000-10-19.
- Includes faces for dired, font-lock, info, paren."
- (interactive)
- (color-theme-install
- '(color-theme-raspopovic
- ((background-color . "darkblue")
- (background-mode . light)
- (background-toolbar-color . "#bfbfbfbfbfbf")
- (border-color . "#000000000000")
- (bottom-toolbar-shadow-color . "#737373737373")
- (cursor-color . "Red3")
- (foreground-color . "yellow")
- (top-toolbar-shadow-color . "#e6e6e6e6e6e6"))
- ((setnu-line-number-face . bold)
- (goto-address-mail-face . info-xref))
- (default ((t (nil))))
- (blue ((t (:background "darkblue" :foreground "blue"))))
- (bold ((t (:bold t :background "darkblue" :foreground "yellow"))))
- (bold-italic ((t (:bold t :background "darkblue" :foreground "red3"))))
- (comint-input-face ((t (:foreground "deepskyblue"))))
- (dired-face-boring ((t (:foreground "Gray65"))))
- (dired-face-directory ((t (:foreground "lightgreen"))))
- (dired-face-executable ((t (:foreground "indianred"))))
- (dired-face-flagged ((t (:background "LightSlateGray"))))
- (dired-face-marked ((t (:background "darkblue" :foreground "deepskyblue"))))
- (dired-face-permissions ((t (:background "darkblue" :foreground "white"))))
- (dired-face-setuid ((t (:foreground "Red"))))
- (dired-face-socket ((t (:foreground "magenta"))))
- (dired-face-symlink ((t (:foreground "grey95"))))
- (font-lock-comment-face ((t (:background "darkblue" :foreground "lightgreen"))))
- (font-lock-doc-string-face ((t (:background "darkblue" :foreground "darkseagreen"))))
- (font-lock-function-name-face ((t (:bold t :background "darkblue" :foreground "indianred"))))
- (font-lock-keyword-face ((t (:background "darkblue" :foreground "skyblue"))))
- (font-lock-preprocessor-face ((t (:background "darkblue" :foreground "orange"))))
- (font-lock-reference-face ((t (:background "darkblue" :foreground "deepskyblue"))))
- (font-lock-string-face ((t (:background "darkblue" :foreground "lightgrey"))))
- (font-lock-type-face ((t (:background "darkblue" :foreground "orange"))))
- (font-lock-variable-name-face ((t (:background "darkblue" :foreground "white"))))
- (green ((t (:background "darkblue" :foreground "green"))))
- (gui-button-face ((t (:background "grey75" :foreground "black"))))
- (highlight ((t (:background "yellow" :foreground "darkblue"))))
- (info-node ((t (:bold t :background "darkblue" :foreground "red3"))))
- (info-xref ((t (:bold t :background "darkblue" :foreground "yellow"))))
- (isearch ((t (:background "yellow" :foreground "darkblue"))))
- (isearch-secondary ((t (:foreground "red3"))))
- (italic ((t (:background "darkblue" :foreground "red3"))))
- (left-margin ((t (:background "darkblue" :foreground "yellow"))))
- (list-mode-item-selected ((t (:background "gray68" :foreground "yellow"))))
- (makefile-space-face ((t (:background "hotpink"))))
- (modeline ((t (:background "Gray75" :foreground "Black"))))
- (modeline-buffer-id ((t (:background "Gray75" :foreground "blue"))))
- (modeline-mousable ((t (:background "Gray75" :foreground "red"))))
- (modeline-mousable-minor-mode ((t (:background "Gray75" :foreground "green4"))))
- (paren-blink-off ((t (:foreground "darkblue"))))
- (paren-match ((t (:background "yellow" :foreground "darkblue"))))
- (paren-mismatch ((t (:background "DeepPink" :foreground "yellow"))))
- (pointer ((t (:background "darkblue" :foreground "red3"))))
- (primary-selection ((t (:background "yellow" :foreground "darkblue"))))
- (red ((t (:background "darkblue" :foreground "red"))))
- (right-margin ((t (:background "darkblue" :foreground "yellow"))))
- (secondary-selection ((t (:background "darkblue" :foreground "yellow"))))
- (shell-option-face ((t (:background "darkblue" :foreground "cyan2"))))
- (shell-output-2-face ((t (:background "darkblue" :foreground "darkseagreen"))))
- (shell-output-3-face ((t (:background "darkblue" :foreground "lightgrey"))))
- (shell-output-face ((t (:background "darkblue" :foreground "white"))))
- (shell-prompt-face ((t (:background "darkblue" :foreground "red"))))
- (text-cursor ((t (:background "Red3" :foreground "white"))))
- (underline ((t (:underline t :background "darkblue" :foreground "yellow"))))
- (vvb-face ((t (:background "pink" :foreground "black"))))
- (yellow ((t (:background "darkblue" :foreground "yellow"))))
- (zmacs-region ((t (:background "gray" :foreground "black")))))))
-
- (defun color-theme-taylor ()
- "Color theme by Art Taylor, created 2000-10-20.
- Wheat on black. Includes faces for font-lock, gnus, paren."
- (interactive)
- (color-theme-install
- '(color-theme-taylor
- ((background-color . "black")
- (background-mode . dark)
- (border-color . "black")
- (cursor-color . "red")
- (foreground-color . "wheat")
- (mouse-color . "black"))
- ((gnus-mouse-face . highlight)
- (list-matching-lines-face . bold)
- (view-highlight-face . highlight))
- (default ((t (nil))))
- (bold ((t (:bold t :background "grey40" :foreground "yellow"))))
- (bold-italic ((t (:italic t :bold t :foreground "yellow green"))))
- (fl-comment-face ((t (:foreground "medium purple"))))
- (fl-function-name-face ((t (:foreground "green"))))
- (fl-keyword-face ((t (:foreground "LightGreen"))))
- (fl-string-face ((t (:foreground "light coral"))))
- (fl-type-face ((t (:foreground "cyan"))))
- (font-lock-builtin-face ((t (:foreground "LightSteelBlue"))))
- (font-lock-comment-face ((t (:foreground "OrangeRed"))))
- (font-lock-constant-face ((t (:foreground "Aquamarine"))))
- (font-lock-function-name-face ((t (:foreground "LightSkyBlue"))))
- (font-lock-keyword-face ((t (:foreground "Cyan"))))
- (font-lock-string-face ((t (:foreground "LightSalmon"))))
- (font-lock-type-face ((t (:foreground "PaleGreen"))))
- (font-lock-variable-name-face ((t (:foreground "LightGoldenrod"))))
- (font-lock-warning-face ((t (:bold t :foreground "Pink"))))
- (gnus-group-mail-1-empty-face ((t (:foreground "aquamarine1"))))
- (gnus-group-mail-1-face ((t (:bold t :foreground "aquamarine1"))))
- (gnus-group-mail-2-empty-face ((t (:foreground "aquamarine2"))))
- (gnus-group-mail-2-face ((t (:bold t :foreground "aquamarine2"))))
- (gnus-group-mail-3-empty-face ((t (:foreground "aquamarine3"))))
- (gnus-group-mail-3-face ((t (:bold t :foreground "aquamarine3"))))
- (gnus-group-mail-low-empty-face ((t (:foreground "aquamarine4"))))
- (gnus-group-mail-low-face ((t (:bold t :foreground "aquamarine4"))))
- (gnus-group-news-1-empty-face ((t (:foreground "PaleTurquoise"))))
- (gnus-group-news-1-face ((t (:bold t :foreground "PaleTurquoise"))))
- (gnus-group-news-2-empty-face ((t (:foreground "turquoise"))))
- (gnus-group-news-2-face ((t (:bold t :foreground "turquoise"))))
- (gnus-group-news-3-empty-face ((t (nil))))
- (gnus-group-news-3-face ((t (:bold t))))
- (gnus-group-news-4-empty-face ((t (nil))))
- (gnus-group-news-4-face ((t (:bold t))))
- (gnus-group-news-5-empty-face ((t (nil))))
- (gnus-group-news-5-face ((t (:bold t))))
- (gnus-group-news-6-empty-face ((t (nil))))
- (gnus-group-news-6-face ((t (:bold t))))
- (gnus-group-news-low-empty-face ((t (:foreground "DarkTurquoise"))))
- (gnus-group-news-low-face ((t (:bold t :foreground "DarkTurquoise"))))
- (gnus-splash-face ((t (:foreground "Brown"))))
- (gnus-summary-cancelled-face ((t (:background "black" :foreground "yellow"))))
- (gnus-summary-high-ancient-face ((t (:bold t :foreground "SkyBlue"))))
- (gnus-summary-high-read-face ((t (:bold t :foreground "PaleGreen"))))
- (gnus-summary-high-ticked-face ((t (:bold t :foreground "pink"))))
- (gnus-summary-high-unread-face ((t (:bold t))))
- (gnus-summary-low-ancient-face ((t (:italic t :foreground "SkyBlue"))))
- (gnus-summary-low-read-face ((t (:italic t :foreground "PaleGreen"))))
- (gnus-summary-low-ticked-face ((t (:italic t :foreground "pink"))))
- (gnus-summary-low-unread-face ((t (:italic t))))
- (gnus-summary-normal-ancient-face ((t (:foreground "SkyBlue"))))
- (gnus-summary-normal-read-face ((t (:foreground "PaleGreen"))))
- (gnus-summary-normal-ticked-face ((t (:foreground "pink"))))
- (gnus-summary-normal-unread-face ((t (nil))))
- (gnus-summary-selected-face ((t (:underline t))))
- (highlight ((t (:background "black" :foreground "black"))))
- (italic ((t (:italic t :foreground "yellow3"))))
- (message-cited-text-face ((t (:foreground "red"))))
- (message-header-cc-face ((t (:bold t :foreground "green4"))))
- (message-header-name-face ((t (:foreground "DarkGreen"))))
- (message-header-newsgroups-face ((t (:italic t :bold t :foreground "yellow"))))
- (message-header-other-face ((t (:foreground "#b00000"))))
- (message-header-subject-face ((t (:foreground "green3"))))
- (message-header-to-face ((t (:bold t :foreground "green2"))))
- (message-header-xheader-face ((t (:foreground "blue"))))
- (message-mml-face ((t (:foreground "ForestGreen"))))
- (message-separator-face ((t (:foreground "blue3"))))
- (modeline ((t (:background "wheat" :foreground "black"))))
- (modeline-buffer-id ((t (:background "wheat" :foreground "black"))))
- (modeline-mousable ((t (:background "wheat" :foreground "black"))))
- (modeline-mousable-minor-mode ((t (:background "wheat" :foreground "black"))))
- (region ((t (:background "blue"))))
- (secondary-selection ((t (:background "darkslateblue" :foreground "black"))))
- (show-paren-match-face ((t (:background "turquoise"))))
- (show-paren-mismatch-face ((t (:background "purple" :foreground "white"))))
- (underline ((t (:underline t))))
- (xref-keyword-face ((t (:foreground "blue"))))
- (xref-list-default-face ((t (nil))))
- (xref-list-pilot-face ((t (:foreground "navy"))))
- (xref-list-symbol-face ((t (:foreground "navy")))))))
-
- (defun color-theme-marquardt ()
- "Color theme by Colin Marquardt, created 2000-10-25.
- Black on bisque, a light color. Based on some settings from Robin S. Socha.
- Features some color changes to programming languages, especially vhdl-mode.
- You might also want to put something like
- Emacs*Foreground: Black
- Emacs*Background: bisque2
- in your ~/.Xdefaults."
- (interactive)
- (color-theme-install
- '(color-theme-marquardt
- ((background-color . "bisque")
- (background-mode . light)
- (background-toolbar-color . "bisque")
- (border-color . "#000000000000")
- (bottom-toolbar-shadow-color . "#909099999999")
- (cursor-color . "Red3")
- (foreground-color . "black")
- (top-toolbar-shadow-color . "#ffffffffffff"))
- (default ((t (nil))))
- (blue ((t (:foreground "blue"))))
- (bold ((t (:bold t))))
- (bold-italic ((t (:bold t))))
- (border-glyph ((t (nil))))
- (calendar-today-face ((t (:underline t))))
- (diary-face ((t (:foreground "red"))))
- (display-time-mail-balloon-enhance-face ((t (:background "orange"))))
- (display-time-mail-balloon-gnus-group-face ((t (:foreground "blue"))))
- (display-time-time-balloon-face ((t (:foreground "red"))))
- (ff-paths-non-existant-file-face ((t (:bold t :foreground "NavyBlue"))))
- (font-lock-comment-face ((t (:foreground "gray50"))))
- (font-lock-doc-string-face ((t (:foreground "green4"))))
- (font-lock-function-name-face ((t (:foreground "darkorange"))))
- (font-lock-keyword-face ((t (:foreground "blue3"))))
- (font-lock-preprocessor-face ((t (:foreground "blue3"))))
- (font-lock-reference-face ((t (:foreground "red3"))))
- (font-lock-special-comment-face ((t (:foreground "blue4"))))
- (font-lock-special-keyword-face ((t (:foreground "red4"))))
- (font-lock-string-face ((t (:foreground "green4"))))
- (font-lock-type-face ((t (:foreground "steelblue"))))
- (font-lock-variable-name-face ((t (:foreground "black"))))
- (font-lock-warning-face ((t (:bold t :foreground "Red"))))
- (green ((t (:foreground "green"))))
- (gui-button-face ((t (:background "grey75" :foreground "black"))))
- (gui-element ((t (:background "azure1" :foreground "Black"))))
- (highlight ((t (:background "darkseagreen2" :foreground "blue"))))
- (holiday-face ((t (:background "pink" :foreground "black"))))
- (info-node ((t (:bold t))))
- (info-xref ((t (:bold t))))
- (isearch ((t (:background "yellow" :foreground "red"))))
- (italic ((t (:bold t))))
- (left-margin ((t (nil))))
- (list-mode-item-selected ((t (:background "gray68" :foreground "black"))))
- (message-cited-text-face ((t (:foreground "red"))))
- (message-header-cc-face ((t (:foreground "MidnightBlue"))))
- (message-header-name-face ((t (:foreground "cornflower blue"))))
- (message-header-newsgroups-face ((t (:bold t :foreground "blue4"))))
- (message-header-other-face ((t (:foreground "steel blue"))))
- (message-header-subject-face ((t (:bold t :foreground "navy blue"))))
- (message-header-to-face ((t (:bold t :foreground "MidnightBlue"))))
- (message-header-xheader-face ((t (:foreground "blue"))))
- (message-mml-face ((t (:foreground "ForestGreen"))))
- (message-separator-face ((t (:foreground "brown"))))
- (modeline ((t (:background "bisque2" :foreground "steelblue4"))))
- (modeline-buffer-id ((t (:background "bisque2" :foreground "blue4"))))
- (modeline-mousable ((t (:background "bisque2" :foreground "firebrick"))))
- (modeline-mousable-minor-mode ((t (:background "bisque2" :foreground "green4"))))
- (paren-blink-off ((t (:foreground "azure1"))))
- (paren-face ((t (:background "lightgoldenrod"))))
- (paren-match ((t (:background "bisque2"))))
- (paren-mismatch ((t (:background "DeepPink" :foreground "black"))))
- (paren-mismatch-face ((t (:background "DeepPink"))))
- (paren-no-match-face ((t (:background "yellow"))))
- (pointer ((t (:background "white" :foreground "blue"))))
- (primary-selection ((t (:background "gray65"))))
- (red ((t (:foreground "red"))))
- (right-margin ((t (nil))))
- (secondary-selection ((t (:background "paleturquoise"))))
- (shell-option-face ((t (:foreground "gray50"))))
- (shell-output-2-face ((t (:foreground "green4"))))
- (shell-output-3-face ((t (:foreground "green4"))))
- (shell-output-face ((t (:bold t))))
- (shell-prompt-face ((t (:foreground "blue3"))))
- (speedbar-button-face ((t (:foreground "green4"))))
- (speedbar-directory-face ((t (:foreground "blue4"))))
- (speedbar-file-face ((t (:foreground "cyan4"))))
- (speedbar-highlight-face ((t (:background "green"))))
- (speedbar-selected-face ((t (:underline t :foreground "red"))))
- (speedbar-tag-face ((t (:foreground "brown"))))
- (text-cursor ((t (:background "Red3" :foreground "bisque"))))
- (toolbar ((t (:background "Gray80"))))
- (underline ((t (:underline t))))
- (vertical-divider ((t (nil))))
- (vhdl-font-lock-attribute-face ((t (:foreground "Orchid"))))
- (vhdl-font-lock-directive-face ((t (:foreground "CadetBlue"))))
- (vhdl-font-lock-enumvalue-face ((t (:foreground "SaddleBrown"))))
- (vhdl-font-lock-function-face ((t (:foreground "DarkCyan"))))
- (vhdl-font-lock-generic-/constant-face ((t (:foreground "Gold3"))))
- (vhdl-font-lock-prompt-face ((t (:bold t :foreground "Red"))))
- (vhdl-font-lock-reserved-words-face ((t (:bold t :foreground "Orange"))))
- (vhdl-font-lock-translate-off-face ((t (:background "LightGray"))))
- (vhdl-font-lock-type-face ((t (:foreground "ForestGreen"))))
- (vhdl-font-lock-variable-face ((t (:foreground "Grey50"))))
- (vhdl-speedbar-architecture-face ((t (:foreground "Blue"))))
- (vhdl-speedbar-architecture-selected-face ((t (:underline t :foreground "Blue"))))
- (vhdl-speedbar-configuration-face ((t (:foreground "DarkGoldenrod"))))
- (vhdl-speedbar-configuration-selected-face ((t (:underline t :foreground "DarkGoldenrod"))))
- (vhdl-speedbar-entity-face ((t (:foreground "ForestGreen"))))
- (vhdl-speedbar-entity-selected-face ((t (:underline t :foreground "ForestGreen"))))
- (vhdl-speedbar-instantiation-face ((t (:foreground "Brown"))))
- (vhdl-speedbar-instantiation-selected-face ((t (:underline t :foreground "Brown"))))
- (vhdl-speedbar-package-face ((t (:foreground "Grey50"))))
- (vhdl-speedbar-package-selected-face ((t (:underline t :foreground "Grey50"))))
- (vhdl-speedbar-subprogram-face ((t (:foreground "Orchid4"))))
- (widget-button-face ((t (:bold t))))
- (widget-button-pressed-face ((t (:foreground "red"))))
- (widget-documentation-face ((t (:foreground "dark green"))))
- (widget-field-face ((t (:background "gray85"))))
- (widget-inactive-face ((t (:foreground "dim gray"))))
- (yellow ((t (:foreground "yellow"))))
- (zmacs-region ((t (:background "steelblue" :foreground "yellow")))))))
-
- (defun color-theme-parus ()
- "Color theme by Jon K Hellan, created 2000-11-01.
- White on dark blue color theme.
-
- There is some redundancy in the X resources, but I do not have time to
- find out which should go or which should stay:
-
- Emacs*dialog*Background: midnightblue
- Emacs*dialog*Foreground: white
- Emacs*popup*Background: midnightblue
- Emacs*popup*Foreground: white
- emacs*background: #00005a
- emacs*cursorColor: gray90
- emacs*foreground: White
- emacs.dialog*.background: midnightblue
- emacs.menu*.background: midnightblue
- emacs.pane.menubar.background: midnightblue"
- (interactive)
- (color-theme-install
- '(color-theme-parus
- ((background-color . "#00005a")
- (background-mode . dark)
- (border-color . "black")
- (cursor-color . "yellow")
- (foreground-color . "White")
- (mouse-color . "yellow"))
- ((gnus-mouse-face . highlight)
- (list-matching-lines-face . bold)
- (paren-face . bold)
- (paren-mismatch-face . paren-mismatch-face)
- (paren-no-match-face . paren-no-match-face)
- (view-highlight-face . highlight))
- (default ((t (nil))))
- (bold ((t (:bold t))))
- (bold-italic ((t (:italic t :bold t))))
- (font-latex-bold-face ((t (:bold t :foreground "OliveDrab"))))
- (font-latex-italic-face ((t (:italic t :foreground "OliveDrab"))))
- (font-latex-math-face ((t (:foreground "burlywood"))))
- (font-latex-sedate-face ((t (:foreground "LightGray"))))
- (font-latex-string-face ((t (:foreground "LightSalmon"))))
- (font-latex-warning-face ((t (:foreground "Pink"))))
- (font-lock-builtin-face ((t (:foreground "#e0e0ff"))))
- (font-lock-reference-face ((t (:foreground "#e0e0ff"))))
- (font-lock-comment-face ((t (:foreground "#FFd1d1"))))
- (font-lock-constant-face ((t (:foreground "Aquamarine"))))
- (font-lock-preprocessor-face ((t (:foreground "Aquamarine"))))
- (font-lock-function-name-face ((t (:foreground "#b2e4ff"))))
- (font-lock-keyword-face ((t (:foreground "#a0ffff"))))
- (font-lock-string-face ((t (:foreground "#efca10"))))
- (font-lock-doc-string-face ((t (:foreground "#efca10"))))
- (font-lock-type-face ((t (:foreground "PaleGreen"))))
- (font-lock-variable-name-face ((t (:foreground "LightGoldenrod"))))
- (font-lock-warning-face ((t (:bold t :foreground "Pink"))))
- (gnus-cite-attribution-face ((t (:italic t))))
- (gnus-cite-face-1 ((t (:foreground "#dfdfff"))))
- (gnus-cite-face-10 ((t (:foreground "medium purple"))))
- (gnus-cite-face-11 ((t (:foreground "turquoise"))))
- (gnus-cite-face-2 ((t (:foreground "light cyan"))))
- (gnus-cite-face-3 ((t (:foreground "light yellow"))))
- (gnus-cite-face-4 ((t (:foreground "light pink"))))
- (gnus-cite-face-5 ((t (:foreground "pale green"))))
- (gnus-cite-face-6 ((t (:foreground "beige"))))
- (gnus-cite-face-7 ((t (:foreground "orange"))))
- (gnus-cite-face-8 ((t (:foreground "magenta"))))
- (gnus-cite-face-9 ((t (:foreground "violet"))))
- (gnus-emphasis-bold ((t (:bold t))))
- (gnus-emphasis-bold-italic ((t (:italic t :bold t))))
- (gnus-emphasis-highlight-words ((t (:background "black" :foreground "yellow"))))
- (gnus-emphasis-italic ((t (:italic t))))
- (gnus-emphasis-underline ((t (:underline t))))
- (gnus-emphasis-underline-bold ((t (:underline t :bold t))))
- (gnus-emphasis-underline-bold-italic ((t (:underline t :italic t :bold t))))
- (gnus-emphasis-underline-italic ((t (:underline t :italic t))))
- (gnus-group-mail-1-empty-face ((t (:foreground "aquamarine1"))))
- (gnus-group-mail-1-face ((t (:bold t :foreground "aquamarine1"))))
- (gnus-group-mail-2-empty-face ((t (:foreground "aquamarine2"))))
- (gnus-group-mail-2-face ((t (:bold t :foreground "aquamarine2"))))
- (gnus-group-mail-3-empty-face ((t (:foreground "aquamarine3"))))
- (gnus-group-mail-3-face ((t (:bold t :foreground "aquamarine3"))))
- (gnus-group-mail-low-empty-face ((t (:foreground "aquamarine4"))))
- (gnus-group-mail-low-face ((t (:bold t :foreground "aquamarine4"))))
- (gnus-group-news-1-empty-face ((t (:foreground "PaleTurquoise"))))
- (gnus-group-news-1-face ((t (:bold t :foreground "PaleTurquoise"))))
- (gnus-group-news-2-empty-face ((t (:foreground "turquoise"))))
- (gnus-group-news-2-face ((t (:bold t :foreground "turquoise"))))
- (gnus-group-news-3-empty-face ((t (nil))))
- (gnus-group-news-3-face ((t (:bold t))))
- (gnus-group-news-4-empty-face ((t (nil))))
- (gnus-group-news-4-face ((t (:bold t))))
- (gnus-group-news-5-empty-face ((t (nil))))
- (gnus-group-news-5-face ((t (:bold t))))
- (gnus-group-news-6-empty-face ((t (nil))))
- (gnus-group-news-6-face ((t (:bold t))))
- (gnus-group-news-low-empty-face ((t (:foreground "DarkTurquoise"))))
- (gnus-group-news-low-face ((t (:bold t :foreground "DarkTurquoise"))))
- (gnus-header-content-face ((t (:italic t :foreground "#90f490"))))
- (gnus-header-from-face ((t (:foreground "#aaffaa"))))
- (gnus-header-name-face ((t (:foreground "#c7e3c7"))))
- (gnus-header-newsgroups-face ((t (:italic t :foreground "yellow"))))
- (gnus-header-subject-face ((t (:foreground "#a0f0a0"))))
- (gnus-signature-face ((t (:italic t))))
- (gnus-splash-face ((t (:foreground "Brown"))))
- (gnus-summary-cancelled-face ((t (:background "black" :foreground "yellow"))))
- (gnus-summary-high-ancient-face ((t (:bold t :foreground "SkyBlue"))))
- (gnus-summary-high-read-face ((t (:bold t :foreground "PaleGreen"))))
- (gnus-summary-high-ticked-face ((t (:bold t :foreground "pink"))))
- (gnus-summary-high-unread-face ((t (:bold t))))
- (gnus-summary-low-ancient-face ((t (:italic t :foreground "SkyBlue"))))
- (gnus-summary-low-read-face ((t (:italic t :foreground "PaleGreen"))))
- (gnus-summary-low-ticked-face ((t (:italic t :foreground "pink"))))
- (gnus-summary-low-unread-face ((t (:italic t))))
- (gnus-summary-normal-ancient-face ((t (:foreground "SkyBlue"))))
- (gnus-summary-normal-read-face ((t (:foreground "PaleGreen"))))
- (gnus-summary-normal-ticked-face ((t (:foreground "pink"))))
- (gnus-summary-normal-unread-face ((t (nil))))
- (gnus-summary-selected-face ((t (:underline t))))
- (highlight ((t (:background "darkolivegreen"))))
- (italic ((t (:italic t))))
- (message-cited-text-face ((t (:foreground "#dfdfff"))))
- (message-header-cc-face ((t (:bold t :foreground "#a0f0a0"))))
- (message-header-name-face ((t (:foreground "#c7e3c7"))))
- (message-header-newsgroups-face ((t (:italic t :bold t :foreground "yellow"))))
- (message-header-other-face ((t (:foreground "#db9b9b"))))
- (message-header-subject-face ((t (:foreground "#a0f0a0"))))
- (message-header-to-face ((t (:bold t :foreground "#aaffaa"))))
- (message-header-xheader-face ((t (:foreground "#e2e2ff"))))
- (message-mml-face ((t (:foreground "#abdbab"))))
- (message-separator-face ((t (:foreground "#dfdfff"))))
- (modeline ((t (:background "White" :foreground "#00005a"))))
- (modeline-buffer-id ((t (:background "White" :foreground "#00005a"))))
- (modeline-mousable ((t (:background "White" :foreground "#00005a"))))
- (modeline-mousable-minor-mode ((t (:background "White" :foreground "#00005a"))))
- (paren-mismatch-face ((t (:background "DeepPink"))))
- (paren-no-match-face ((t (:background "yellow"))))
- (region ((t (:background "blue"))))
- (primary-selection ((t (:background "blue"))))
- (isearch ((t (:background "blue"))))
- (secondary-selection ((t (:background "darkslateblue"))))
- (underline ((t (:underline t))))
- (widget-button-face ((t (:bold t))))
- (widget-button-pressed-face ((t (:foreground "red"))))
- (widget-documentation-face ((t (:foreground "lime green"))))
- (widget-field-face ((t (:background "dim gray"))))
- (widget-inactive-face ((t (:foreground "light gray"))))
- (widget-single-line-field-face ((t (:background "dim gray")))))))
-
- (defun color-theme-high-contrast ()
- "High contrast color theme, maybe for the visually impaired.
- Watch out! This will set a very large font-size!
-
- If you want to modify the font as well, you should customize variable
- `color-theme-legal-frame-parameters' to \"\\(color\\|mode\\|font\\|height\\|width\\)$\".
- The default setting will prevent color themes from installing specific
- fonts."
- (interactive)
- (color-theme-standard)
- (let ((color-theme-is-cumulative t))
- (color-theme-install
- '(color-theme-high-contrast
- ((cursor-color . "red")
- (width . 60)
- (height . 25)
- (background . dark))
- (default ((t (:stipple nil :background "white" :foreground "black" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight bold :height 240 :width normal :family "adobe-courier"))))
-
- (bold ((t (:bold t :underline t))))
- (bold-italic ((t (:bold t :underline t))))
- (font-lock-builtin-face ((t (:bold t :foreground "Red"))))
- (font-lock-comment-face ((t (:bold t :foreground "Firebrick"))))
- (font-lock-constant-face ((t (:bold t :underline t :foreground "Blue"))))
- (font-lock-function-name-face ((t (:bold t :foreground "Blue"))))
- (font-lock-keyword-face ((t (:bold t :foreground "Purple"))))
- (font-lock-string-face ((t (:bold t :foreground "DarkGreen"))))
- (font-lock-type-face ((t (:bold t :foreground "ForestGreen"))))
- (font-lock-variable-name-face ((t (:bold t :foreground "DarkGoldenrod"))))
- (font-lock-warning-face ((t (:bold t :foreground "Red"))))
- (highlight ((t (:background "black" :foreground "white" :bold 1))))
- (info-menu-5 ((t (:underline t :bold t))))
- (info-node ((t (:bold t))))
- (info-xref ((t (:bold t ))))
- (italic ((t (:bold t :underline t))))
- (modeline ((t (:background "black" :foreground "white" :bold 1))))
- (modeline-buffer-id ((t (:background "black" :foreground "white" :bold 1))))
- (modeline-mousable ((t (:background "black" :foreground "white" :bold 1))))
- (modeline-mousable-minor-mode ((t (:background "black" :foreground "white" :bold 1))))
- (region ((t (:background "black" :foreground "white" :bold 1))))
- (secondary-selection ((t (:background "black" :foreground "white" :bold 1))))
- (underline ((t (:bold t :underline t))))))))
-
- (defun color-theme-infodoc ()
- "Color theme by Frederic Giroud, created 2001-01-18.
- Black on wheat scheme. Based on infodoc (xemacs variant distribution),
- with my favorit fontlock color."
- (interactive)
- (color-theme-install
- '(color-theme-infodoc
- ((background-color . "wheat")
- (background-mode . light)
- (background-toolbar-color . "#000000000000")
- (border-color . "#000000000000")
- (bottom-toolbar-shadow-color . "#000000000000")
- (cursor-color . "red")
- (foreground-color . "black")
- (top-toolbar-shadow-color . "#ffffffffffff"))
- nil
- (default ((t (:bold t))))
- (blue ((t (:bold t :foreground "blue"))))
- (bold ((t (:background "wheat" :foreground "black"))))
- (bold-italic ((t (:bold t :background "wheat" :foreground "black"))))
- (border-glyph ((t (:bold t))))
- (calendar-today-face ((t (:underline t :bold t))))
- (custom-button-face ((t (nil))))
- (custom-changed-face ((t (:bold t :background "blue" :foreground "white"))))
- (custom-documentation-face ((t (:bold t :background "wheat" :foreground "purple4"))))
- (custom-face-tag-face ((t (:underline t :bold t))))
- (custom-group-tag-face ((t (:underline t :bold t :background "wheat" :foreground "blue"))))
- (custom-group-tag-face-1 ((t (:underline t :bold t :background "wheat" :foreground "red"))))
- (custom-invalid-face ((t (:bold t :background "red" :foreground "yellow"))))
- (custom-modified-face ((t (:bold t :background "blue" :foreground "white"))))
- (custom-rogue-face ((t (:bold t :background "black" :foreground "pink"))))
- (custom-saved-face ((t (:underline t :bold t))))
- (custom-set-face ((t (:bold t :background "white" :foreground "blue"))))
- (custom-state-face ((t (:bold t :background "wheat" :foreground "dark green"))))
- (custom-variable-button-face ((t (:underline t))))
- (custom-variable-tag-face ((t (:underline t :bold t :background "wheat" :foreground "blue"))))
- (diary-face ((t (:bold t :foreground "red"))))
- (display-time-mail-balloon-enhance-face ((t (:bold t :background "wheat" :foreground "black"))))
- (display-time-mail-balloon-gnus-group-face ((t (:bold t :background "wheat" :foreground "blue"))))
- (display-time-time-balloon-face ((t (:bold t :background "light salmon" :foreground "dark green"))))
- (font-lock-comment-face ((t (:bold t :background "wheat" :foreground "turquoise4"))))
- (font-lock-doc-string-face ((t (:bold t :background "wheat" :foreground "purple4"))))
- (font-lock-function-name-face ((t (:bold t :background "wheat" :foreground "blue4"))))
- (font-lock-keyword-face ((t (:bold t :background "wheat" :foreground "dark orchid"))))
- (font-lock-preprocessor-face ((t (:bold t :background "wheat" :foreground "orchid4"))))
- (font-lock-reference-face ((t (:bold t :background "wheat" :foreground "red3"))))
- (font-lock-string-face ((t (:bold t :background "wheat" :foreground "dark goldenrod"))))
- (font-lock-type-face ((t (:bold t :background "wheat" :foreground "brown"))))
- (font-lock-variable-name-face ((t (:bold t :background "wheat" :foreground "chocolate"))))
- (font-lock-warning-face ((t (:bold t :background "wheat" :foreground "black"))))
- (gdb-arrow-face ((t (:bold t :background "LightGreen" :foreground "black"))))
- (green ((t (:bold t :foreground "green"))))
- (gui-button-face ((t (:bold t :background "wheat" :foreground "red"))))
- (gui-element ((t (:bold t :background "wheat" :foreground "black"))))
- (highlight ((t (:bold t :background "darkseagreen2" :foreground "dark green"))))
- (holiday-face ((t (:bold t :background "pink" :foreground "black"))))
- (hproperty:but-face ((t (:bold t :background "wheat" :foreground "medium violet red"))))
- (hproperty:flash-face ((t (:bold t :background "wheat" :foreground "gray80"))))
- (hproperty:highlight-face ((t (:bold t :background "wheat" :foreground "red"))))
- (hproperty:item-face ((t (:bold t))))
- (isearch ((t (:bold t :background "pale turquoise" :foreground "blue"))))
- (italic ((t (:bold t :background "wheat" :foreground "black"))))
- (left-margin ((t (:bold t :background "wheat" :foreground "black"))))
- (list-mode-item-selected ((t (:bold t :background "gray68" :foreground "black"))))
- (message-cited-text ((t (:bold t :background "wheat" :foreground "brown"))))
- (message-header-contents ((t (:bold t :background "wheat" :foreground "black"))))
- (message-headers ((t (:bold t :background "wheat" :foreground "black"))))
- (message-highlighted-header-contents ((t (:bold t :background "wheat" :foreground "blue"))))
- (message-url ((t (nil))))
- (modeline ((t (:bold t :background "light salmon" :foreground "dark green"))))
- (modeline-buffer-id ((t (:bold t :background "light salmon" :foreground "blue4"))))
- (modeline-mousable ((t (:bold t :background "light salmon" :foreground "firebrick"))))
- (modeline-mousable-minor-mode ((t (:bold t :background "light salmon" :foreground "green4"))))
- (pointer ((t (:bold t :background "wheat" :foreground "red"))))
- (primary-selection ((t (:bold t :background "medium sea green"))))
- (red ((t (:bold t :foreground "red"))))
- (right-margin ((t (:bold t :background "wheat" :foreground "black"))))
- (secondary-selection ((t (:bold t :background "paleturquoise" :foreground "black"))))
- (shell-input-face ((t (:bold t :background "wheat" :foreground "blue"))))
- (shell-option-face ((t (:bold t :background "wheat" :foreground "turquoise4"))))
- (shell-output-2-face ((t (:bold t :background "wheat" :foreground "dark goldenrod"))))
- (shell-output-3-face ((t (:bold t :background "wheat" :foreground "dark goldenrod"))))
- (shell-output-face ((t (:bold t :background "wheat" :foreground "black"))))
- (shell-prompt-face ((t (:bold t :background "wheat" :foreground "dark orchid"))))
- (text-cursor ((t (:bold t :background "red" :foreground "wheat"))))
- (toolbar ((t (:bold t :background "wheat" :foreground "black"))))
- (underline ((t (:underline t :bold t :background "wheat" :foreground "black"))))
- (vertical-divider ((t (:bold t))))
- (widget-button-face ((t (nil))))
- (widget-button-pressed-face ((t (:bold t :background "wheat" :foreground "red"))))
- (widget-documentation-face ((t (:bold t :background "wheat" :foreground "dark green"))))
- (widget-field-face ((t (:bold t :background "gray85"))))
- (widget-inactive-face ((t (:bold t :background "wheat" :foreground "dim gray"))))
- (x-face ((t (:bold t :background "wheat" :foreground "black"))))
- (yellow ((t (:bold t :foreground "yellow"))))
- (zmacs-region ((t (:bold t :background "lightyellow" :foreground "darkgreen")))))))
-
- (defun color-theme-classic ()
- "Color theme by Frederic Giroud, created 2001-01-18.
- AntiqueWhite on darkslategrey scheme. Based on Gnome 2, with my favorit
- color foreground-color and fontlock color."
- (interactive)
- (color-theme-blue-gnus)
- (let ((color-theme-is-cumulative t))
- (color-theme-install
- '(color-theme-classic
- ((foreground-color . "AntiqueWhite")
- (background-color . "darkslategrey")
- (mouse-color . "Grey")
- (cursor-color . "Red")
- (border-color . "black")
- (background-mode . dark))
- ((apropos-keybinding-face . underline)
- (apropos-label-face . italic)
- (apropos-match-face . secondary-selection)
- (apropos-property-face . bold-italic)
- (apropos-symbol-face . info-xref)
- (goto-address-mail-face . message-header-to-face)
- (goto-address-mail-mouse-face . secondary-selection)
- (goto-address-url-face . info-xref)
- (goto-address-url-mouse-face . highlight)
- (list-matching-lines-face . bold)
- (view-highlight-face . highlight))
- (default ((t (nil))))
- (bold ((t (:bold t))))
- (bold-italic ((t (:italic t :bold t :foreground "beige"))))
- (calendar-today-face ((t (:underline t))))
- (cperl-array-face ((t (:foreground "Yellow"))))
- (cperl-hash-face ((t (:foreground "White"))))
- (cperl-nonoverridable-face ((t (:foreground "SkyBlue"))))
- (custom-button-face ((t (:underline t :foreground "MediumSlateBlue"))))
- (custom-documentation-face ((t (:foreground "Grey"))))
- (custom-group-tag-face ((t (:foreground "MediumAquamarine"))))
- (custom-state-face ((t (:foreground "LightSalmon"))))
- (custom-variable-tag-face ((t (:foreground "Aquamarine"))))
- (diary-face ((t (:foreground "IndianRed"))))
- (erc-action-face ((t (:bold t))))
- (erc-bold-face ((t (:bold t))))
- (erc-default-face ((t (nil))))
- (erc-direct-msg-face ((t (:foreground "LightSalmon"))))
- (erc-error-face ((t (:bold t :foreground "IndianRed"))))
- (erc-input-face ((t (:foreground "Beige"))))
- (erc-inverse-face ((t (:background "wheat" :foreground "darkslategrey"))))
- (erc-notice-face ((t (:foreground "MediumAquamarine"))))
- (erc-pal-face ((t (:foreground "pale green"))))
- (erc-prompt-face ((t (:foreground "MediumAquamarine"))))
- (erc-underline-face ((t (:underline t))))
- (eshell-ls-archive-face ((t (:bold t :foreground "IndianRed"))))
- (eshell-ls-backup-face ((t (:foreground "Grey"))))
- (eshell-ls-clutter-face ((t (:foreground "DimGray"))))
- (eshell-ls-directory-face ((t (:bold t :foreground "MediumSlateBlue"))))
- (eshell-ls-executable-face ((t (:foreground "Coral"))))
- (eshell-ls-missing-face ((t (:foreground "black"))))
- (eshell-ls-picture-face ((t (:foreground "Violet"))))
- (eshell-ls-product-face ((t (:foreground "LightSalmon"))))
- (eshell-ls-readonly-face ((t (:foreground "Aquamarine"))))
- (eshell-ls-special-face ((t (:foreground "Gold"))))
- (eshell-ls-symlink-face ((t (:foreground "White"))))
- (eshell-ls-unreadable-face ((t (:foreground "DimGray"))))
- (eshell-prompt-face ((t (:foreground "MediumAquamarine"))))
- (font-lock-builtin-face ((t (:bold t :foreground "PaleGreen"))))
- (font-lock-comment-face ((t (:foreground "tomato3"))))
- (font-lock-constant-face ((t (:foreground "Aquamarine"))))
- (font-lock-doc-string-face ((t (:foreground "LightSalmon3"))))
- (font-lock-function-name-face ((t (:foreground "SteelBlue1"))))
- (font-lock-keyword-face ((t (:foreground "cyan1"))))
- (font-lock-reference-face ((t (:foreground "LightSalmon2"))))
- (font-lock-string-face ((t (:foreground "LightSalmon3"))))
- (font-lock-type-face ((t (:foreground "PaleGreen3"))))
- (font-lock-variable-name-face ((t (:foreground "khaki1"))))
- (font-lock-warning-face ((t (:bold t :foreground "IndianRed"))))
- (font-lock-preprocessor-face ((t (:foreground "SkyBlue3"))))
- (widget-field-face ((t (:background "DarkCyan"))))
- (custom-group-tag-face ((t(:foreground "brown" :underline t))))
- (custom-state-face ((t (:foreground "khaki"))))
- (highlight ((t (:background "PaleGreen" :foreground "DarkGreen"))))
- (highline-face ((t (:background "SeaGreen"))))
- (holiday-face ((t (:background "DimGray"))))
- (info-menu-5 ((t (:underline t))))
- (info-node ((t (:underline t :bold t :foreground "DodgerBlue1"))))
- (info-xref ((t (:underline t :foreground "DodgerBlue1"))))
- (isearch ((t (:foreground "red" :background "CornflowerBlue"))))
- (italic ((t (:italic t))))
- (modeline ((t (:background "LightSlateGray" :foreground "AntiqueWhite"))))
- (modeline-buffer-id ((t (:background "LightSlateGray" :foreground "DarkBlue"))))
- (modeline-mousable ((t (:background "LightSlateGray" :foreground "firebrick"))))
- (modeline-mousable-minor-mode ((t (:background "LightSlateGray" :foreground "wheat"))))
- (region ((t (:background "dark cyan" :foreground "cyan"))))
- (secondary-selection ((t (:background "Aquamarine" :foreground "SlateBlue"))))
- (show-paren-match-face ((t (:background "Aquamarine" :foreground "SlateBlue"))))
- (show-paren-mismatch-face ((t (:background "Red" :foreground "White"))))
- (underline ((t (:underline t))))
- (widget-field-face ((t (:foreground "LightBlue"))))
- (widget-inactive-face ((t (:foreground "DimGray"))))
- (widget-single-line-field-face ((t (:foreground "LightBlue"))))
- (woman-bold-face ((t (:bold t))))
- (woman-italic-face ((t (:foreground "beige"))))
- (woman-unknown-face ((t (:foreground "LightSalmon"))))))))
-
- (defun color-theme-scintilla ()
- "Color theme by Gordon Messmer, created 2001-02-07.
- Based on the Scintilla editor.
-
- If you want to modify the font as well, you should customize variable
- `color-theme-legal-frame-parameters' to \"\\(color\\|mode\\|font\\|height\\|width\\)$\".
- The default setting will prevent color themes from installing specific
- fonts."
- (interactive)
- (color-theme-install
- ;; The light editor style doesn't seem to look right with
- ;; the same font that works in the dark editor style.
- ;; Dark letters on light background just isn't as visible.
- '(color-theme-scintilla
- ((font . "-monotype-courier new-bold-r-normal-*-*-140-*-*-m-*-iso8859-1")
- (width . 95)
- (height . 40)
- (background-color . "white")
- (foreground-color . "black")
- (background-mode . light)
- (mouse-color . "grey15")
- (cursor-color . "grey15"))
- (default ((t nil)))
- (font-lock-comment-face ((t (:italic t :foreground "ForestGreen"))))
- (font-lock-string-face ((t (:foreground "DarkMagenta"))))
- (font-lock-keyword-face ((t (:foreground "NavyBlue"))))
- (font-lock-warning-face ((t (:bold t :foreground "VioletRed"))))
- (font-lock-constant-face ((t (:foreground "Blue"))))
- (font-lock-type-face ((t (:foreground "NavyBlue"))))
- (font-lock-variable-name-face ((t (:foreground "DarkCyan"))))
- (font-lock-function-name-face ((t (:foreground "DarkCyan"))))
- (font-lock-builtin-face ((t (:foreground "NavyBlue"))))
- (highline-face ((t (:background "Grey95"))))
- (show-paren-match-face ((t (:background "Grey80"))))
- (region ((t (:background "Grey80"))))
- (highlight ((t (:foreground "ForestGreen"))))
- (secondary-selection ((t (:background "NavyBlue" :foreground "white"))))
- (widget-field-face ((t (:background "NavyBlue"))))
- (widget-single-line-field-face ((t (:background "RoyalBlue")))))) )
-
- (defun color-theme-gtk-ide ()
- "Color theme by Gordon Messmer, created 2001-02-07.
- Inspired by a GTK IDE whose name I've forgotten.
-
- If you want to modify the font as well, you should customize variable
- `color-theme-legal-frame-parameters' to \"\\(color\\|mode\\|font\\|height\\|width\\)$\".
- The default setting will prevent color themes from installing specific
- fonts."
- ;; The light editor style doesn't seem to look right with
- ;; the same font that works in the dark editor style.
- ;; Dark letters on light background just isn't as visible.
- (interactive)
- (color-theme-install
- '(color-theme-gtk-ide
- ((font . "-monotype-courier new-medium-r-normal-*-*-120-*-*-m-*-iso8859-15")
- (width . 95)
- (height . 45)
- (background-color . "white")
- (foreground-color . "black")
- (background-mode . light)
- (mouse-color . "grey15")
- (cursor-color . "grey15"))
- (default ((t nil)))
- (font-lock-comment-face ((t (:italic t :foreground "grey55"))))
- (font-lock-string-face ((t (:foreground "DarkRed"))))
- (font-lock-keyword-face ((t (:foreground "DarkBlue"))))
- (font-lock-warning-face ((t (:bold t :foreground "VioletRed"))))
- (font-lock-constant-face ((t (:foreground "OliveDrab"))))
- (font-lock-type-face ((t (:foreground "SteelBlue4"))))
- (font-lock-variable-name-face ((t (:foreground "DarkGoldenrod"))))
- (font-lock-function-name-face ((t (:foreground "SlateBlue"))))
- (font-lock-builtin-face ((t (:foreground "ForestGreen"))))
- (highline-face ((t (:background "grey95"))))
- (show-paren-match-face ((t (:background "grey80"))))
- (region ((t (:background "grey80"))))
- (highlight ((t (:background "LightSkyBlue"))))
- (secondary-selection ((t (:background "grey55"))))
- (widget-field-face ((t (:background "navy"))))
- (widget-single-line-field-face ((t (:background "royalblue")))))) )
-
- (defun color-theme-midnight ()
- "Color theme by Gordon Messmer, created 2001-02-07.
- A color theme inspired by a certain IDE for Windows. It's all from memory,
- since I only used that software in college.
-
- If you want to modify the font as well, you should customize variable
- `color-theme-legal-frame-parameters' to \"\\(color\\|mode\\|font\\|height\\|width\\)$\".
- The default setting will prevent color themes from installing specific
- fonts."
- (interactive)
- (color-theme-install
- '(color-theme-midnight
- ((font . "fixed")
- (width . 130)
- (height . 50)
- (background-color . "black")
- (foreground-color . "grey85")
- (background-mode . dark)
- (mouse-color . "grey85")
- (cursor-color . "grey85"))
- (default ((t (nil))))
- (font-lock-comment-face ((t (:italic t :foreground "grey60"))))
- (font-lock-string-face ((t (:foreground "Magenta"))))
- (font-lock-keyword-face ((t (:foreground "Cyan"))))
- (font-lock-warning-face ((t (:bold t :foreground "Pink"))))
- (font-lock-constant-face ((t (:foreground "OliveDrab"))))
- (font-lock-type-face ((t (:foreground "DarkCyan"))))
- (font-lock-variable-name-face ((t (:foreground "DarkGoldenrod"))))
- (font-lock-function-name-face ((t (:foreground "SlateBlue"))))
- (font-lock-builtin-face ((t (:foreground "SkyBlue"))))
- (highline-face ((t (:background "grey12"))))
- (setnu-line-number-face ((t (:background "Grey15" :foreground "White" :bold t))))
- (show-paren-match-face ((t (:background "grey30"))))
- (region ((t (:background "grey15"))))
- (highlight ((t (:background "blue"))))
- (secondary-selection ((t (:background "navy"))))
- (widget-field-face ((t (:background "navy"))))
- (widget-single-line-field-face ((t (:background "royalblue")))))) )
-
- (defun color-theme-jedit-grey ()
- "Color theme by Gordon Messmer, created 2001-02-07.
- Based on a screenshot of jedit.
-
- If you want to modify the font as well, you should customize variable
- `color-theme-legal-frame-parameters' to \"\\(color\\|mode\\|font\\|height\\|width\\)$\".
- The default setting will prevent color themes from installing specific
- fonts."
- (interactive)
- (color-theme-install
- '(color-theme-jedit-grey
- ((font . "fixed")
- (width . 130)
- (height . 50)
- (background-color . "grey77")
- (foreground-color . "black")
- (background-mode . light)
- (mouse-color . "black")
- (cursor-color . "black"))
- (default ((t (nil))))
- (font-lock-comment-face ((t (:italic t :foreground "RoyalBlue4"))))
- (font-lock-string-face ((t (:foreground "Gold4"))))
- (font-lock-keyword-face ((t (:bold t :foreground "DarkRed"))))
- (font-lock-warning-face ((t (:bold t :foreground "Pink"))))
- (font-lock-constant-face ((t (:foreground "DarkCyan"))))
- (font-lock-type-face ((t (:foreground "DarkRed"))))
- (font-lock-function-name-face ((t (:foreground "Green4"))))
- (font-lock-builtin-face ((t (:bold t :foreground "DarkRed"))))
- (highline-face ((t (:background "grey84"))))
- (setnu-line-number-face ((t (:background "White" :foreground "MediumPurple3" :italic t))))
- (show-paren-match-face ((t (:background "grey60"))))
- (region ((t (:background "grey70"))))
- (highlight ((t (:background "grey90"))))
- (secondary-selection ((t (:background "white"))))
- (widget-field-face ((t (:background "royalblue"))))
- (widget-single-line-field-face ((t (:background "royalblue")))))) )
-
- (defun color-theme-snow ()
- "Color theme by Nicolas Rist, created 2001-03-08.
- Black on gainsboro. In Emacs, the text background is a shade darker
- than the frame background: Gainsboro instead of snow. This makes the
- structure of the text clearer without being too agressive on the eyes.
- On XEmacs, this doesn't really work as the frame and the default face
- allways use the same foreground and background colors.
- The color theme includes gnus, message, font-lock, sgml, and speedbar."
- (interactive)
- (color-theme-install
- '(color-theme-snow
- ((background-color . "snow2")
- (background-mode . light)
- (border-color . "black")
- (cursor-color . "RoyalBlue2")
- (foreground-color . "black")
- (mouse-color . "black"))
- ((gnus-mouse-face . highlight)
- (list-matching-lines-face . bold)
- (view-highlight-face . highlight))
- (default ((t (:background "gainsboro" :foreground "dark slate gray"))))
- (bold ((t (:bold t))))
- (bold-italic ((t (:italic t :bold t))))
- (calendar-today-face ((t (:underline t))))
- (custom-button-face ((t (:background "gainsboro" :foreground "dark cyan"))))
- (custom-documentation-face ((t (:background "gainsboro"))))
- (diary-face ((t (:foreground "red"))))
- (fg:black ((t (:foreground "black"))))
- (font-lock-builtin-face ((t (:background "gainsboro" :foreground "medium orchid"))))
- (font-lock-comment-face ((t (:background "gainsboro" :foreground "SteelBlue3"))))
- (font-lock-constant-face ((t (:background "gainsboro" :foreground "orange3"))))
- (font-lock-function-name-face ((t (:background "gainsboro" :foreground "blue3"))))
- (font-lock-keyword-face ((t (:background "gainsboro" :foreground "red3"))))
- (font-lock-string-face ((t (:background "gainsboro" :foreground "SpringGreen3"))))
- (font-lock-type-face ((t (:background "gainsboro" :foreground "dark cyan"))))
- (font-lock-variable-name-face ((t (:background "gainsboro" :foreground "purple2"))))
- (font-lock-warning-face ((t (:bold t :background "gainsboro" :foreground "red"))))
- (gnus-group-mail-1-empty-face ((t (:foreground "DeepPink3"))))
- (gnus-group-mail-1-face ((t (:bold t :foreground "DeepPink3"))))
- (gnus-group-mail-2-empty-face ((t (:foreground "HotPink3"))))
- (gnus-group-mail-2-face ((t (:bold t :foreground "HotPink3"))))
- (gnus-group-mail-3-empty-face ((t (:foreground "magenta4"))))
- (gnus-group-mail-3-face ((t (:bold t :foreground "magenta4"))))
- (gnus-group-mail-low-empty-face ((t (:foreground "DeepPink4"))))
- (gnus-group-mail-low-face ((t (:bold t :foreground "DeepPink4"))))
- (gnus-group-news-1-empty-face ((t (:foreground "ForestGreen"))))
- (gnus-group-news-1-face ((t (:bold t :foreground "ForestGreen"))))
- (gnus-group-news-2-empty-face ((t (:foreground "CadetBlue4"))))
- (gnus-group-news-2-face ((t (:bold t :foreground "CadetBlue4"))))
- (gnus-group-news-3-empty-face ((t (nil))))
- (gnus-group-news-3-face ((t (:bold t))))
- (gnus-group-news-low-empty-face ((t (:foreground "DarkGreen"))))
- (gnus-group-news-low-face ((t (:bold t :foreground "DarkGreen"))))
- (gnus-splash-face ((t (:foreground "ForestGreen"))))
- (gnus-summary-cancelled-face ((t (:background "black" :foreground "yellow"))))
- (gnus-summary-high-ancient-face ((t (:bold t :foreground "RoyalBlue"))))
- (gnus-summary-high-read-face ((t (:bold t :foreground "DarkGreen"))))
- (gnus-summary-high-ticked-face ((t (:bold t :foreground "firebrick"))))
- (gnus-summary-high-unread-face ((t (:bold t))))
- (gnus-summary-low-ancient-face ((t (:italic t :foreground "RoyalBlue"))))
- (gnus-summary-low-read-face ((t (:italic t :foreground "DarkGreen"))))
- (gnus-summary-low-ticked-face ((t (:italic t :foreground "firebrick"))))
- (gnus-summary-low-unread-face ((t (:italic t))))
- (gnus-summary-normal-ancient-face ((t (:foreground "RoyalBlue"))))
- (gnus-summary-normal-read-face ((t (:foreground "DarkGreen"))))
- (gnus-summary-normal-ticked-face ((t (:foreground "firebrick"))))
- (gnus-summary-normal-unread-face ((t (nil))))
- (gnus-summary-selected-face ((t (:underline t))))
- (gui-button-face ((t (:foreground "light grey"))))
- (highlight ((t (:background "LightSteelBlue1"))))
- (holiday-face ((t (:background "pink"))))
- (ibuffer-marked-face ((t (:foreground "red"))))
- (italic ((t (:italic t))))
- (message-cited-text-face ((t (:foreground "red"))))
- (message-header-cc-face ((t (:foreground "MidnightBlue"))))
- (message-header-name-face ((t (:foreground "cornflower blue"))))
- (message-header-newsgroups-face ((t (:italic t :bold t :foreground "blue4"))))
- (message-header-other-face ((t (:foreground "steel blue"))))
- (message-header-subject-face ((t (:bold t :foreground "navy blue"))))
- (message-header-to-face ((t (:bold t :foreground "MidnightBlue"))))
- (message-header-xheader-face ((t (:foreground "blue"))))
- (message-separator-face ((t (:foreground "brown"))))
- (modeline ((t (:background "dark slate gray" :foreground "gainsboro"))))
- (modeline-buffer-id ((t (:background "dark slate gray" :foreground "gainsboro"))))
- (modeline-mousable ((t (:background "dark slate gray" :foreground "gainsboro"))))
- (modeline-mousable-minor-mode ((t (:background "dark slate gray" :foreground "gainsboro"))))
- (region ((t (:background "lavender"))))
- (secondary-selection ((t (:background "paleturquoise"))))
- (sgml-comment-face ((t (:foreground "dark green"))))
- (sgml-doctype-face ((t (:foreground "maroon"))))
- (sgml-end-tag-face ((t (:foreground "blue2"))))
- (sgml-entity-face ((t (:foreground "red2"))))
- (sgml-ignored-face ((t (:background "gray90" :foreground "maroon"))))
- (sgml-ms-end-face ((t (:foreground "maroon"))))
- (sgml-ms-start-face ((t (:foreground "maroon"))))
- (sgml-pi-face ((t (:foreground "maroon"))))
- (sgml-sgml-face ((t (:foreground "maroon"))))
- (sgml-short-ref-face ((t (:foreground "goldenrod"))))
- (sgml-start-tag-face ((t (:foreground "blue2"))))
- (show-paren-match-face ((t (:background "SlateGray1"))))
- (show-paren-mismatch-face ((t (:background "purple" :foreground "white"))))
- (speedbar-button-face ((t (:foreground "green4"))))
- (speedbar-directory-face ((t (:foreground "blue4"))))
- (speedbar-file-face ((t (:foreground "cyan4"))))
- (speedbar-highlight-face ((t (:background "dark turquoise" :foreground "white"))))
- (speedbar-selected-face ((t (:underline t :foreground "red"))))
- (speedbar-tag-face ((t (:foreground "brown"))))
- (underline ((t (:underline t)))))))
-
- (defun color-theme-montz ()
- "Color theme by Brady Montz, created 2001-03-08.
- Black on Gray.
- Includes dired, bbdb, font-lock, gnus, message, viper, and widget."
- (interactive)
- (color-theme-install
- '(color-theme-montz
- ((background-color . "gray80")
- (background-mode . light)
- (background-toolbar-color . "#cccccccccccc")
- (border-color . "#000000000000")
- (bottom-toolbar-shadow-color . "#7a7a7a7a7a7a")
- (cursor-color . "Red3")
- (foreground-color . "black")
- (top-toolbar-shadow-color . "#f5f5f5f5f5f5")
- (viper-saved-cursor-color-in-replace-mode . "Red3"))
- ((gnus-mouse-face . highlight)
- (paren-match-face . paren-face-match)
- (paren-mismatch-face . paren-face-mismatch)
- (paren-no-match-face . paren-face-no-match)
- (smiley-mouse-face . highlight))
- (default ((t (nil))))
- (bbdb-company ((t (:italic t))))
- (bbdb-field-name ((t (:bold t))))
- (bbdb-field-value ((t (nil))))
- (bbdb-name ((t (:underline t))))
- (blue ((t (:foreground "blue"))))
- (bold ((t (:bold t))))
- (bold-italic ((t (:italic t :bold t))))
- (border-glyph ((t (nil))))
- (dired-face-boring ((t (:foreground "Gray65"))))
- (dired-face-directory ((t (:bold t))))
- (dired-face-executable ((t (:foreground "SeaGreen"))))
- (dired-face-flagged ((t (:background "LightSlateGray"))))
- (dired-face-marked ((t (:background "PaleVioletRed"))))
- (dired-face-permissions ((t (:background "grey75" :foreground "black"))))
- (dired-face-setuid ((t (:foreground "Red"))))
- (dired-face-socket ((t (:foreground "magenta"))))
- (dired-face-symlink ((t (:foreground "cyan"))))
- (display-time-mail-balloon-enhance-face ((t (:background "orange"))))
- (display-time-mail-balloon-gnus-group-face ((t (:foreground "blue"))))
- (display-time-time-balloon-face ((t (:foreground "red"))))
- (font-lock-builtin-face ((t (:foreground "red3"))))
- (font-lock-comment-face ((t (:foreground "blue"))))
- (font-lock-constant-face ((t (:foreground "red3"))))
- (font-lock-doc-string-face ((t (:foreground "mediumvioletred"))))
- (font-lock-function-name-face ((t (:foreground "firebrick"))))
- (font-lock-keyword-face ((t (:bold t :foreground "black"))))
- (font-lock-preprocessor-face ((t (:foreground "blue3"))))
- (font-lock-reference-face ((t (:foreground "red3"))))
- (font-lock-string-face ((t (:foreground "mediumvioletred"))))
- (font-lock-type-face ((t (:foreground "darkgreen"))))
- (font-lock-variable-name-face ((t (:foreground "black"))))
- (font-lock-warning-face ((t (:bold t :foreground "Red"))))
- (gnus-cite-attribution-face ((t (:italic t))))
- (gnus-cite-face-1 ((t (:foreground "MidnightBlue"))))
- (gnus-cite-face-10 ((t (:foreground "medium purple"))))
- (gnus-cite-face-11 ((t (:foreground "turquoise"))))
- (gnus-cite-face-2 ((t (:foreground "firebrick"))))
- (gnus-cite-face-3 ((t (:foreground "dark green"))))
- (gnus-cite-face-4 ((t (:foreground "OrangeRed"))))
- (gnus-cite-face-5 ((t (:foreground "dark khaki"))))
- (gnus-cite-face-6 ((t (:foreground "dark violet"))))
- (gnus-cite-face-7 ((t (:foreground "SteelBlue4"))))
- (gnus-cite-face-8 ((t (:foreground "magenta"))))
- (gnus-cite-face-9 ((t (:foreground "violet"))))
- (gnus-emphasis-bold ((t (:bold t))))
- (gnus-emphasis-bold-italic ((t (:bold t))))
- (gnus-emphasis-highlight-words ((t (:background "black" :foreground "yellow"))))
- (gnus-emphasis-italic ((t (:italic t))))
- (gnus-emphasis-underline ((t (:underline t))))
- (gnus-emphasis-underline-bold ((t (:underline t :bold t))))
- (gnus-emphasis-underline-bold-italic ((t (:underline t :bold t))))
- (gnus-emphasis-underline-italic ((t (:underline t :italic t))))
- (gnus-group-mail-1-empty-face ((t (:foreground "DeepPink3"))))
- (gnus-group-mail-1-face ((t (:bold t :foreground "DeepPink3"))))
- (gnus-group-mail-2-empty-face ((t (:foreground "HotPink3"))))
- (gnus-group-mail-2-face ((t (:bold t :foreground "HotPink3"))))
- (gnus-group-mail-3-empty-face ((t (:foreground "magenta4"))))
- (gnus-group-mail-3-face ((t (:bold t :foreground "magenta4"))))
- (gnus-group-mail-low-empty-face ((t (:foreground "DeepPink4"))))
- (gnus-group-mail-low-face ((t (:bold t :foreground "DeepPink4"))))
- (gnus-group-news-1-empty-face ((t (:foreground "ForestGreen"))))
- (gnus-group-news-1-face ((t (:bold t :foreground "ForestGreen"))))
- (gnus-group-news-2-empty-face ((t (:foreground "CadetBlue4"))))
- (gnus-group-news-2-face ((t (:bold t :foreground "CadetBlue4"))))
- (gnus-group-news-3-empty-face ((t (nil))))
- (gnus-group-news-3-face ((t (:bold t))))
- (gnus-group-news-4-empty-face ((t (nil))))
- (gnus-group-news-4-face ((t (:bold t))))
- (gnus-group-news-5-empty-face ((t (nil))))
- (gnus-group-news-5-face ((t (:bold t))))
- (gnus-group-news-6-empty-face ((t (nil))))
- (gnus-group-news-6-face ((t (:bold t))))
- (gnus-group-news-low-empty-face ((t (:foreground "DarkGreen"))))
- (gnus-group-news-low-face ((t (:bold t :foreground "DarkGreen"))))
- (gnus-header-content-face ((t (:italic t :foreground "indianred4"))))
- (gnus-header-from-face ((t (:foreground "red3"))))
- (gnus-header-name-face ((t (:foreground "maroon"))))
- (gnus-header-newsgroups-face ((t (:italic t :foreground "MidnightBlue"))))
- (gnus-header-subject-face ((t (:foreground "red4"))))
- (gnus-picons-face ((t (:background "white" :foreground "black"))))
- (gnus-picons-xbm-face ((t (:background "white" :foreground "black"))))
- (gnus-signature-face ((t (:italic t))))
- (gnus-splash-face ((t (:foreground "Brown"))))
- (gnus-summary-cancelled-face ((t (:background "black" :foreground "yellow"))))
- (gnus-summary-high-ancient-face ((t (:bold t :foreground "RoyalBlue"))))
- (gnus-summary-high-read-face ((t (:bold t :foreground "DarkGreen"))))
- (gnus-summary-high-ticked-face ((t (:bold t :foreground "firebrick"))))
- (gnus-summary-high-unread-face ((t (:bold t))))
- (gnus-summary-low-ancient-face ((t (:italic t :foreground "RoyalBlue"))))
- (gnus-summary-low-read-face ((t (:italic t :foreground "DarkGreen"))))
- (gnus-summary-low-ticked-face ((t (:italic t :foreground "firebrick"))))
- (gnus-summary-low-unread-face ((t (:italic t))))
- (gnus-summary-normal-ancient-face ((t (:foreground "RoyalBlue"))))
- (gnus-summary-normal-read-face ((t (:foreground "DarkGreen"))))
- (gnus-summary-normal-ticked-face ((t (:foreground "firebrick"))))
- (gnus-summary-normal-unread-face ((t (nil))))
- (gnus-summary-selected-face ((t (:underline t))))
- (gnus-x-face ((t (:background "white" :foreground "black"))))
- (green ((t (:foreground "green"))))
- (gui-button-face ((t (:background "grey75" :foreground "black"))))
- (gui-element ((t (nil))))
- (highlight ((t (:background "darkseagreen2"))))
- (info-node ((t (:bold t))))
- (info-xref ((t (:bold t))))
- (isearch ((t (:background "paleturquoise"))))
- (italic ((t (:italic t))))
- (left-margin ((t (nil))))
- (list-mode-item-selected ((t (:background "gray68" :foreground "black"))))
- (message-cited-text-face ((t (:foreground "red"))))
- (message-header-cc-face ((t (:foreground "MidnightBlue"))))
- (message-header-name-face ((t (:foreground "cornflower blue"))))
- (message-header-newsgroups-face ((t (:bold t :foreground "blue4"))))
- (message-header-other-face ((t (:foreground "steel blue"))))
- (message-header-subject-face ((t (:bold t :foreground "navy blue"))))
- (message-header-to-face ((t (:bold t :foreground "MidnightBlue"))))
- (message-header-xheader-face ((t (:foreground "blue"))))
- (message-mml-face ((t (:foreground "ForestGreen"))))
- (message-separator-face ((t (:foreground "brown"))))
- (modeline ((t (nil))))
- (modeline-buffer-id ((t (:background "Gray80" :foreground "blue4"))))
- (modeline-mousable ((t (:background "Gray80" :foreground "firebrick"))))
- (modeline-mousable-minor-mode ((t (:background "Gray80" :foreground "green4"))))
- (paren-face-match ((t (:background "turquoise"))))
- (paren-face-mismatch ((t (:background "purple" :foreground "white"))))
- (paren-face-no-match ((t (:background "yellow" :foreground "black"))))
- (pointer ((t (nil))))
- (primary-selection ((t (:background "gray65"))))
- (red ((t (:foreground "red"))))
- (right-margin ((t (nil))))
- (secondary-selection ((t (:background "paleturquoise"))))
- (text-cursor ((t (:background "Red3" :foreground "gray80"))))
- (toolbar ((t (nil))))
- (underline ((t (:underline t))))
- (vertical-divider ((t (nil))))
- (viper-minibuffer-emacs-face ((t (:background "gray80" :foreground "black"))))
- (viper-minibuffer-insert-face ((t (:background "gray80" :foreground "black"))))
- (viper-minibuffer-vi-face ((t (:background "gray80" :foreground "black"))))
- (viper-replace-overlay-face ((t (:background "black" :foreground "white"))))
- (viper-search-face ((t (:background "black" :foreground "white"))))
- (widget-button-face ((t (:bold t))))
- (widget-button-pressed-face ((t (:foreground "red"))))
- (widget-documentation-face ((t (:foreground "dark green"))))
- (widget-field-face ((t (:background "gray85"))))
- (widget-inactive-face ((t (:foreground "dim gray"))))
- (yellow ((t (:foreground "yellow"))))
- (zmacs-region ((t (:background "black" :foreground "white")))))))
-
- (defun color-theme-aalto-light ()
- "Color theme by Jari Aalto, created 2001-03-08.
- Black on light yellow.
- Used for Win32 on a Nokia446Xpro monitor.
- Includes cvs, font-lock, gnus, message, sgml, widget"
- (interactive)
- (color-theme-install
- '(color-theme-aalto-light
- ((background-color . "#FFFFE0")
- (background-mode . light)
- (border-color . "black")
- (cursor-color . "black")
- (foreground-color . "black")
- (mouse-color . "LawnGreen"))
- ((gnus-mouse-face . highlight)
- (list-matching-lines-face . bold)
- (tinyreplace-:face . highlight)
- (view-highlight-face . highlight))
- (default ((t (nil))))
- (bold ((t (:bold t))))
- (bold-italic ((t (:italic t :bold t))))
- (calendar-today-face ((t (:underline t))))
- (cvs-filename-face ((t (:foreground "blue4"))))
- (cvs-handled-face ((t (:foreground "pink"))))
- (cvs-header-face ((t (:bold t :foreground "blue4"))))
- (cvs-marked-face ((t (:bold t :foreground "green3"))))
- (cvs-msg-face ((t (:italic t))))
- (cvs-need-action-face ((t (:foreground "orange"))))
- (cvs-unknown-face ((t (:foreground "red"))))
- (diary-face ((t (:foreground "red"))))
- (eshell-test-failed-face ((t (:bold t :foreground "OrangeRed"))))
- (eshell-test-ok-face ((t (:bold t :foreground "Green"))))
- (font-lock-builtin-face ((t (:foreground "Orchid"))))
- (font-lock-comment-face ((t (:foreground "Firebrick"))))
- (font-lock-constant-face ((t (:foreground "CadetBlue"))))
- (font-lock-function-name-face ((t (:foreground "Blue"))))
- (font-lock-keyword-face ((t (:foreground "Purple"))))
- (font-lock-string-face ((t (:foreground "RosyBrown"))))
- (font-lock-type-face ((t (:foreground "ForestGreen"))))
- (font-lock-variable-name-face ((t (:foreground "DarkGoldenrod"))))
- (font-lock-warning-face ((t (:bold t :foreground "Red"))))
- (gnus-emphasis-bold ((t (:bold t))))
- (gnus-emphasis-bold-italic ((t (:italic t :bold t))))
- (gnus-emphasis-highlight-words ((t (:background "black" :foreground "yellow"))))
- (gnus-emphasis-italic ((t (:italic t))))
- (gnus-emphasis-underline ((t (:underline t))))
- (gnus-emphasis-underline-bold ((t (:underline t :bold t))))
- (gnus-emphasis-underline-bold-italic ((t (:underline t :italic t :bold t))))
- (gnus-emphasis-underline-italic ((t (:underline t :italic t))))
- (gnus-group-mail-1-empty-face ((t (:foreground "DeepPink3"))))
- (gnus-group-mail-1-face ((t (:bold t :foreground "DeepPink3"))))
- (gnus-group-mail-2-empty-face ((t (:foreground "HotPink3"))))
- (gnus-group-mail-2-face ((t (:bold t :foreground "HotPink3"))))
- (gnus-group-mail-3-empty-face ((t (:foreground "magenta4"))))
- (gnus-group-mail-3-face ((t (:bold t :foreground "magenta4"))))
- (gnus-group-mail-low-empty-face ((t (:foreground "DeepPink4"))))
- (gnus-group-mail-low-face ((t (:bold t :foreground "DeepPink4"))))
- (gnus-group-news-1-empty-face ((t (:foreground "ForestGreen"))))
- (gnus-group-news-1-face ((t (:bold t :foreground "ForestGreen"))))
- (gnus-group-news-2-empty-face ((t (:foreground "CadetBlue4"))))
- (gnus-group-news-2-face ((t (:bold t :foreground "CadetBlue4"))))
- (gnus-group-news-3-empty-face ((t (nil))))
- (gnus-group-news-3-face ((t (:bold t))))
- (gnus-group-news-4-empty-face ((t (nil))))
- (gnus-group-news-4-face ((t (:bold t))))
- (gnus-group-news-5-empty-face ((t (nil))))
- (gnus-group-news-5-face ((t (:bold t))))
- (gnus-group-news-6-empty-face ((t (nil))))
- (gnus-group-news-6-face ((t (:bold t))))
- (gnus-group-news-low-empty-face ((t (:foreground "DarkGreen"))))
- (gnus-group-news-low-face ((t (:bold t :foreground "DarkGreen"))))
- (gnus-header-content-face ((t (:italic t :foreground "indianred4"))))
- (gnus-header-from-face ((t (:foreground "red3"))))
- (gnus-header-name-face ((t (:foreground "maroon"))))
- (gnus-header-newsgroups-face ((t (:italic t :foreground "MidnightBlue"))))
- (gnus-header-subject-face ((t (:foreground "red4"))))
- (gnus-signature-face ((t (:italic t))))
- (gnus-splash-face ((t (:foreground "Brown"))))
- (gnus-summary-cancelled-face ((t (:background "black" :foreground "yellow"))))
- (gnus-summary-high-ancient-face ((t (:bold t :foreground "RoyalBlue"))))
- (gnus-summary-high-read-face ((t (:bold t :foreground "DarkGreen"))))
- (gnus-summary-high-ticked-face ((t (:bold t :foreground "firebrick"))))
- (gnus-summary-high-unread-face ((t (:bold t))))
- (gnus-summary-low-ancient-face ((t (:italic t :foreground "RoyalBlue"))))
- (gnus-summary-low-read-face ((t (:italic t :foreground "DarkGreen"))))
- (gnus-summary-low-ticked-face ((t (:italic t :foreground "firebrick"))))
- (gnus-summary-low-unread-face ((t (:italic t))))
- (gnus-summary-normal-ancient-face ((t (:foreground "RoyalBlue"))))
- (gnus-summary-normal-read-face ((t (:foreground "DarkGreen"))))
- (gnus-summary-normal-ticked-face ((t (:foreground "firebrick"))))
- (gnus-summary-normal-unread-face ((t (nil))))
- (gnus-summary-selected-face ((t (:underline t))))
- (highlight ((t (:background "darkseagreen2"))))
- (holiday-face ((t (:background "pink"))))
- (info-menu-5 ((t (:underline t))))
- (info-node ((t (:italic t :bold t))))
- (info-xref ((t (:bold t))))
- (italic ((t (:italic t))))
- (message-cited-text-face ((t (:foreground "red"))))
- (message-header-cc-face ((t (:foreground "MidnightBlue"))))
- (message-header-name-face ((t (:foreground "cornflower blue"))))
- (message-header-newsgroups-face ((t (:italic t :bold t :foreground "blue4"))))
- (message-header-other-face ((t (:foreground "steel blue"))))
- (message-header-subject-face ((t (:bold t :foreground "navy blue"))))
- (message-header-to-face ((t (:bold t :foreground "MidnightBlue"))))
- (message-header-xheader-face ((t (:foreground "blue"))))
- (message-mml-face ((t (:foreground "ForestGreen"))))
- (message-separator-face ((t (:foreground "brown"))))
- (modeline ((t (:background "black" :foreground "white"))))
- (modeline-buffer-id ((t (:background "black" :foreground "white"))))
- (modeline-mousable ((t (:background "black" :foreground "white"))))
- (modeline-mousable-minor-mode ((t (:background "black" :foreground "white"))))
- (region ((t (:background "gray"))))
- (secondary-selection ((t (:background "paleturquoise"))))
- (sgml-comment-face ((t (:foreground "dark turquoise"))))
- (sgml-doctype-face ((t (:foreground "red"))))
- (sgml-end-tag-face ((t (:foreground "blue"))))
- (sgml-entity-face ((t (:foreground "magenta"))))
- (sgml-ignored-face ((t (:background "gray60" :foreground "gray40"))))
- (sgml-ms-end-face ((t (:foreground "green"))))
- (sgml-ms-start-face ((t (:foreground "green"))))
- (sgml-pi-face ((t (:foreground "lime green"))))
- (sgml-sgml-face ((t (:foreground "brown"))))
- (sgml-short-ref-face ((t (:foreground "deep sky blue"))))
- (sgml-start-tag-face ((t (:foreground "blue"))))
- (show-paren-match-face ((t (:background "turquoise"))))
- (show-paren-mismatch-face ((t (:background "purple" :foreground "white"))))
- (underline ((t (:underline t))))
- (widget-button-face ((t (:bold t))))
- (widget-button-pressed-face ((t (:foreground "red"))))
- (widget-documentation-face ((t (:foreground "dark green"))))
- (widget-field-face ((t (:background "gray85"))))
- (widget-inactive-face ((t (:foreground "dim gray"))))
- (widget-single-line-field-face ((t (:background "gray85")))))))
-
- (defun color-theme-aalto-dark ()
- "Color theme by Jari Aalto, created 2001-03-08.
- White on Deep Sky Blue 3.
- Used for Unix Exceed on a Nokia446Xpro monitor.
- Includes font-lock, info, and message."
- (interactive)
- (color-theme-install
- '(color-theme-aalto-dark
- ((background-color . "DeepSkyBlue3")
- (background-mode . dark)
- (border-color . "black")
- (cursor-color . "yellow")
- (foreground-color . "white")
- (mouse-color . "black"))
- ((ispell-highlight-face . highlight)
- (list-matching-lines-face . bold)
- (tinyreplace-:face . highlight)
- (view-highlight-face . highlight))
- (default ((t (nil))))
- (bold ((t (:bold t :background "blue3" :foreground "white"))))
- (bold-italic ((t (:italic t :bold t :foreground "blue3"))))
- (calendar-today-face ((t (:underline t))))
- (diary-face ((t (:foreground "red"))))
- (font-lock-builtin-face ((t (:foreground "LightSteelBlue"))))
- (font-lock-comment-face ((t (:foreground "OrangeRed"))))
- (font-lock-constant-face ((t (:foreground "Aquamarine"))))
- (font-lock-function-name-face ((t (:foreground "LightSkyBlue"))))
- (font-lock-keyword-face ((t (:foreground "Cyan"))))
- (font-lock-string-face ((t (:foreground "LightSalmon"))))
- (font-lock-type-face ((t (:foreground "PaleGreen"))))
- (font-lock-variable-name-face ((t (:foreground "LightGoldenrod"))))
- (font-lock-warning-face ((t (:bold t :foreground "Pink"))))
- (highlight ((t (:background "blue3" :foreground "white"))))
- (holiday-face ((t (:background "pink"))))
- (info-menu-5 ((t (:underline t))))
- (info-node ((t (:italic t :bold t))))
- (info-xref ((t (:bold t))))
- (italic ((t (:italic t :background "gray"))))
- (message-cited-text-face ((t (:foreground "red"))))
- (message-header-cc-face ((t (:bold t :foreground "green4"))))
- (message-header-name-face ((t (:foreground "DarkGreen"))))
- (message-header-newsgroups-face ((t (:italic t :bold t :foreground "yellow"))))
- (message-header-other-face ((t (:foreground "#b00000"))))
- (message-header-subject-face ((t (:foreground "green3"))))
- (message-header-to-face ((t (:bold t :foreground "green2"))))
- (message-header-xheader-face ((t (:foreground "blue"))))
- (message-mml-face ((t (:foreground "ForestGreen"))))
- (message-separator-face ((t (:foreground "blue3"))))
- (modeline ((t (:background "white" :foreground "DeepSkyBlue3"))))
- (modeline-buffer-id ((t (:background "white" :foreground "DeepSkyBlue3"))))
- (modeline-mousable ((t (:background "white" :foreground "DeepSkyBlue3"))))
- (modeline-mousable-minor-mode ((t (:background "white" :foreground "DeepSkyBlue3"))))
- (region ((t (:background "gray"))))
- (secondary-selection ((t (:background "darkslateblue"))))
- (show-paren-match-face ((t (:background "turquoise"))))
- (show-paren-mismatch-face ((t (:background "purple" :foreground "white"))))
- (underline ((t (:underline t)))))))
-
- (defun color-theme-blippblopp ()
- "Color theme by Thomas Sicheritz-Ponten, created 2001-03-12.
- Used by researchers at Uppsala University and the Center for Biological
- Sequence Analysis at the Technical University of Denmark. (As some of my
- swedish friends couldn't pronounce Sicheritz - they choose to transform
- it to something more \"swedish\": Blippblopp :-)
- Includes font-lock and message."
- (interactive)
- (color-theme-install
- '(color-theme-blippblopp
- ((background-color . "white")
- (background-mode . light)
- (background-toolbar-color . "#cf3ccf3ccf3c")
- (border-color . "#000000000000")
- (bottom-toolbar-shadow-color . "#79e77df779e7")
- (cursor-color . "Red3")
- (foreground-color . "black")
- (mouse-color . "black")
- (top-toolbar-shadow-color . "#fffffbeeffff")
- (viper-saved-cursor-color-in-replace-mode . "Red3"))
- ((ispell-highlight-face . highlight))
- (default ((t (nil))))
- (blue ((t (:foreground "blue"))))
- (bold ((t (:bold t))))
- (bold-italic ((t (:italic t :bold t))))
- (excerpt ((t (:italic t))))
- (ff-paths-non-existant-file-face ((t (:bold t :foreground "NavyBlue"))))
- (fg:black ((t (:foreground "black"))))
- (fixed ((t (:bold t))))
- (font-lock-builtin-face ((t (:foreground "red3"))))
- (font-lock-comment-face ((t (:foreground "orange"))))
- (font-lock-constant-face ((t (:foreground "red3"))))
- (font-lock-doc-string-face ((t (:foreground "darkgreen"))))
- (font-lock-exit-face ((t (:foreground "green"))))
- (font-lock-function-name-face ((t (:bold t :foreground "red"))))
- (font-lock-keyword-face ((t (:bold t :foreground "steelblue"))))
- (font-lock-preprocessor-face ((t (:foreground "blue3"))))
- (font-lock-reference-face ((t (:foreground "red3"))))
- (font-lock-string-face ((t (:foreground "green4"))))
- (font-lock-type-face ((t (:bold t :foreground "blue"))))
- (font-lock-variable-name-face ((t (:foreground "black"))))
- (font-lock-warning-face ((t (:bold t :foreground "Red"))))
- (green ((t (:foreground "green"))))
- (message-cited-text-face ((t (:foreground "red"))))
- (message-header-cc-face ((t (:foreground "MidnightBlue"))))
- (message-header-name-face ((t (:foreground "cornflower blue"))))
- (message-header-newsgroups-face ((t (:italic t :bold t :foreground "blue4"))))
- (message-header-other-face ((t (:foreground "steel blue"))))
- (message-header-subject-face ((t (:bold t :foreground "navy blue"))))
- (message-header-to-face ((t (:bold t :foreground "MidnightBlue"))))
- (message-header-xheader-face ((t (:foreground "blue"))))
- (message-mml-face ((t (:foreground "ForestGreen"))))
- (message-separator-face ((t (:foreground "brown"))))
- (modeline ((t (:background "dimgray" :foreground "lemonchiffon"))))
- (modeline-buffer-id ((t (:background "dimgray" :foreground "green3"))))
- (modeline-mousable ((t (:background "dimgray" :foreground "orange"))))
- (modeline-mousable-minor-mode ((t (:background "dimgray" :foreground "blue4"))))
- (primary-selection ((t (:background "gray65"))))
- (red ((t (:foreground "red"))))
- (region ((t (:background "gray65"))))
- (secondary-selection ((t (:background "paleturquoise"))))
- (show-paren-match-face ((t (:background "turquoise"))))
- (show-paren-mismatch-face ((t (:background "purple" :foreground "white"))))
- (text-cursor ((t (:background "Red3" :foreground "white"))))
- (toolbar ((t (:background "Gray80"))))
- (underline ((t (:underline t))))
- (vcursor ((t (:underline t :background "cyan" :foreground "blue"))))
- (vertical-divider ((t (:background "Gray80"))))
- (xref-keyword-face ((t (:foreground "blue"))))
- (xref-list-pilot-face ((t (:foreground "navy"))))
- (xref-list-symbol-face ((t (:foreground "navy"))))
- (yellow ((t (:foreground "yellow"))))
- (zmacs-region ((t (:background "gray65")))))))
-
- (defun color-theme-hober (&optional preview)
- "Does all sorts of crazy stuff.
- Originally based on color-theme-standard, so I probably still have some
- setting that I haven't changed. I also liberally copied settings from
- the other themes in this package. The end result isn't much like the
- other ones; I hope you like it."
- (interactive)
- (color-theme-install
- '(color-theme-hober
- ((foreground-color . "#c0c0c0")
- (background-color . "black")
- (mouse-color . "black")
- (cursor-color . "medium turquoise")
- (border-color . "black")
- (background-mode . dark))
- (default ((t (nil))))
- (modeline ((t (:foreground "white" :background "darkslateblue"))))
- (modeline-buffer-id ((t (:foreground "white" :background "darkslateblue"))))
- (modeline-mousable ((t (:foreground "white" :background "darkslateblue"))))
- (modeline-mousable-minor-mode ((t (:foreground "white" :background "darkslateblue"))))
- (highlight ((t (:foreground "black" :background "#c0c0c0"))))
- (bold ((t (:bold t))))
- (italic ((t (:italic t))))
- (bold-italic ((t (:bold t :italic t))))
- (region ((t (:foreground "white" :background "darkslateblue"))))
- (zmacs-region ((t (:foreground "white" :background "darkslateblue"))))
- (secondary-selection ((t (:background "paleturquoise"))))
- (underline ((t (:underline t))))
- (diary-face ((t (:foreground "red"))))
- (calendar-today-face ((t (:underline t))))
- (holiday-face ((t (:background "pink"))))
- (widget-documentation-face ((t (:foreground "dark green" :background "white"))))
- (widget-button-face ((t (:bold t))))
- (widget-button-pressed-face ((t (:foreground "red" :background "black"))))
- (widget-field-face ((t (:background "gray85" :foreground "black"))))
- (widget-single-line-field-face ((t (:background "gray85" :foreground "black"))))
- (widget-inactive-face ((t (:foreground "dim gray" :background "red"))))
- (fixed ((t (:bold t))))
- (excerpt ((t (:italic t))))
- (term-default-fg ((t (nil))))
- (term-default-bg ((t (nil))))
- (term-default-fg-inv ((t (nil))))
- (term-default-bg-inv ((t (nil))))
- (term-bold ((t (:bold t))))
- (term-underline ((t (:underline t))))
- (term-invisible ((t (nil))))
- (term-invisible-inv ((t (nil))))
- (term-white ((t (:foreground "#c0c0c0"))))
- (term-whitebg ((t (:background "#c0c0c0"))))
- (term-black ((t (:foreground "black"))))
- (term-blackbg ((t (:background "black"))))
- (term-red ((t (:foreground "#ef8171"))))
- (term-redbg ((t (:background "#ef8171"))))
- (term-green ((t (:foreground "#e5f779"))))
- (term-greenbg ((t (:background "#e5f779"))))
- (term-yellow ((t (:foreground "#fff796"))))
- (term-yellowbg ((t (:background "#fff796"))))
- (term-blue ((t (:foreground "#4186be"))))
- (term-bluebg ((t (:background "#4186be"))))
- (term-magenta ((t (:foreground "#ef9ebe"))))
- (term-magentabg ((t (:background "#ef9ebe"))))
- (term-cyan ((t (:foreground "#71bebe"))))
- (term-cyanbg ((t (:background "#71bebe"))))
- (font-lock-keyword-face ((t (:foreground "#00ffff"))))
- (font-lock-comment-face ((t (:foreground "Red"))))
- (font-lock-string-face ((t (:foreground "#ffff00"))))
- (font-lock-constant-face ((t (:foreground "#00ff00"))))
- (font-lock-builtin-face ((t (:foreground "#ffaa00"))))
- (font-lock-type-face ((t (:foreground "Coral"))))
- (font-lock-warning-face ((t (:foreground "Red" :bold t))))
- (font-lock-function-name-face ((t (:foreground "#4186be"))))
- (font-lock-variable-name-face ((t (:foreground "white" :bold t))))
- (message-header-to-face ((t (:foreground "#4186be" :bold t))))
- (message-header-cc-face ((t (:foreground "#4186be"))))
- (message-header-subject-face ((t (:foreground "#4186be" :bold t))))
- (message-header-newsgroups-face ((t (:foreground "Coral" :bold t))))
- (message-header-other-face ((t (:foreground "steel blue"))))
- (message-header-name-face ((t (:foreground "white"))))
- (message-header-xheader-face ((t (:foreground "blue"))))
- (message-separator-face ((t (:foreground "brown"))))
- (message-cited-text-face ((t (:foreground "white"))))
- (gnus-header-from-face ((t (:foreground "Coral"))))
- (gnus-header-subject-face ((t (:foreground "#4186be"))))
- (gnus-header-newsgroups-face ((t (:foreground "#4186be" :italic t))))
- (gnus-header-name-face ((t (:foreground "white"))))
- (gnus-header-content-face ((t (:foreground "#4186be" :italic t))))
- (gnus-cite-attribution-face ((t (:italic t))))
- (gnus-cite-face-list ((t (:bold nil :foreground "red"))))
- (gnus-group-news-1-face ((t (:foreground "ForestGreen" :bold t))))
- (gnus-group-news-1-empty-face ((t (:foreground "ForestGreen"))))
- (gnus-group-news-2-face ((t (:foreground "CadetBlue4" :bold t))))
- (gnus-group-news-2-empty-face ((t (:foreground "CadetBlue4"))))
- (gnus-group-news-3-face ((t (:bold t))))
- (gnus-group-news-3-empty-face ((t (nil))))
- (gnus-group-news-low-face ((t (:foreground "DarkGreen" :bold t))))
- (gnus-group-news-low-empty-face ((t (:foreground "DarkGreen"))))
- (gnus-group-mail-1-face ((t (:foreground "DeepPink3" :bold t))))
- (gnus-group-mail-1-empty-face ((t (:foreground "DeepPink3"))))
- (gnus-group-mail-2-face ((t (:foreground "HotPink3" :bold t))))
- (gnus-group-mail-2-empty-face ((t (:foreground "HotPink3"))))
- (gnus-group-mail-3-face ((t (:foreground "magenta4" :bold t))))
- (gnus-group-mail-3-empty-face ((t (:foreground "magenta4"))))
- (gnus-group-mail-low-face ((t (:foreground "DeepPink4" :bold t))))
- (gnus-group-mail-low-empty-face ((t (:foreground "DeepPink4"))))
- (gnus-summary-selected-face ((t (:underline t))))
- (gnus-summary-cancelled-face ((t (:foreground "yellow" :background "black"))))
- (gnus-summary-high-ticked-face ((t (:foreground "firebrick" :bold t))))
- (gnus-summary-low-ticked-face ((t (:foreground "firebrick" :italic t))))
- (gnus-summary-normal-ticked-face ((t (:foreground "firebrick"))))
- (gnus-summary-high-ancient-face ((t (:foreground "RoyalBlue" :bold t))))
- (gnus-summary-low-ancient-face ((t (:foreground "RoyalBlue" :italic t))))
- (gnus-summary-normal-ancient-face ((t (:foreground "RoyalBlue"))))
- (gnus-summary-high-unread-face ((t (:bold t))))
- (gnus-summary-low-unread-face ((t (:italic t))))
- (gnus-summary-normal-unread-face ((t (nil))))
- (gnus-summary-high-read-face ((t (:foreground "DarkGreen" :bold t))))
- (gnus-summary-low-read-face ((t (:foreground "DarkGreen" :italic t))))
- (gnus-summary-normal-read-face ((t (:foreground "DarkGreen"))))
- (gnus-splash-face ((t (:foreground "ForestGreen"))))
- (gnus-emphasis-bold ((t (:bold t))))
- (gnus-emphasis-italic ((t (:italic t))))
- (gnus-emphasis-underline ((t (:underline t))))
- (gnus-emphasis-underline-bold ((t (:bold t :underline t))))
- (gnus-emphasis-underline-italic ((t (:italic t :underline t))))
- (gnus-emphasis-bold-italic ((t (:bold t :italic t))))
- (gnus-emphasis-underline-bold-italic ((t (:bold t :italic t :underline t))))
- (gnus-signature-face ((t (:foreground "white"))))
- (gnus-cite-face-1 ((t (:foreground "Khaki"))))
- (gnus-cite-face-2 ((t (:foreground "Coral"))))
- (gnus-cite-face-3 ((t (:foreground "#4186be"))))
- (gnus-cite-face-4 ((t (:foreground "yellow green"))))
- (gnus-cite-face-5 ((t (:foreground "IndianRed"))))
- (highlight-changes-face ((t (:foreground "red"))))
- (highlight-changes-delete-face ((t (:foreground "red" :underline t))))
- (show-paren-match-face ((t (:foreground "white" :background "purple"))))
- (show-paren-mismatch-face ((t (:foreground "white" :background "red"))))
- (cperl-nonoverridable-face ((t (:foreground "chartreuse3"))))
- (cperl-array-face ((t (:foreground "Blue" :bold t :background "lightyellow2"))))
- (cperl-hash-face ((t (:foreground "Red" :bold t :italic t :background "lightyellow2"))))
- (makefile-space-face ((t (:background "hotpink"))))
- (sgml-start-tag-face ((t (:foreground "mediumspringgreen"))))
- (sgml-ignored-face ((t (:foreground "gray20" :background "gray60"))))
- (sgml-doctype-face ((t (:foreground "orange"))))
- (sgml-sgml-face ((t (:foreground "yellow"))))
- (sgml-end-tag-face ((t (:foreground "greenyellow"))))
- (sgml-entity-face ((t (:foreground "gold"))))
- (flyspell-incorrect-face ((t (:foreground "OrangeRed" :bold t :underline t))))
- (flyspell-duplicate-face ((t (:foreground "Gold3" :bold t :underline t)))))))
-
- (defun color-theme-bharadwaj ()
- "Color theme by Girish Bharadwaj, created 2001-03-28.
- Black on gainsboro. Includes BBDB, custom, cperl, cvs, dired, ediff,
- erc, eshell, font-latex, font-lock, gnus, info, message, paren, sgml,
- shell, speedbar, term, vhdl, viper, widget, woman, xref. Wow!"
- (interactive)
- (color-theme-install
- '(color-theme-bharadwaj
- ((background-color . "gainsboro")
- (background-mode . light)
- (background-toolbar-color . "#cf3ccf3ccf3c")
- (border-color . "black")
- (bottom-toolbar-shadow-color . "#79e77df779e7")
- (cursor-color . "grey15")
- (foreground-color . "black")
- (mouse-color . "grey15")
- (top-toolbar-shadow-color . "#fffffbeeffff")
- (viper-saved-cursor-color-in-replace-mode . "Red3"))
- ((gnus-mouse-face . highlight)
- (smiley-mouse-face . highlight))
- (default ((t (nil))))
- (bbdb-company ((t (nil))))
- (bbdb-field-name ((t (:bold t))))
- (bbdb-field-value ((t (nil))))
- (bbdb-name ((t (:underline t))))
- (blank-space-face ((t (nil))))
- (blank-tab-face ((t (nil))))
- (blue ((t (nil))))
- (bold ((t (:bold t))))
- (bold-italic ((t (:bold t))))
- (border-glyph ((t (nil))))
- (calendar-today-face ((t (:underline t))))
- (comint-input-face ((t (:foreground "deepskyblue"))))
- (cperl-array-face ((t (:bold t :background "lightyellow2" :foreground "Blue"))))
- (cperl-hash-face ((t (:bold t :background "lightyellow2" :foreground "Red"))))
- (cperl-nonoverridable-face ((t (:foreground "chartreuse3"))))
- (custom-button-face ((t (:bold t))))
- (custom-changed-face ((t (:background "blue" :foreground "white"))))
- (custom-documentation-face ((t (nil))))
- (custom-face-tag-face ((t (:underline t))))
- (custom-group-tag-face ((t (:underline t :bold t :foreground "blue"))))
- (custom-group-tag-face-1 ((t (:underline t :foreground "red"))))
- (custom-invalid-face ((t (:background "red" :foreground "yellow"))))
- (custom-modified-face ((t (:background "blue" :foreground "white"))))
- (custom-rogue-face ((t (:background "black" :foreground "pink"))))
- (custom-saved-face ((t (:underline t))))
- (custom-set-face ((t (:background "white" :foreground "blue"))))
- (custom-state-face ((t (:foreground "dark green"))))
- (custom-variable-button-face ((t (:underline t :bold t))))
- (custom-variable-tag-face ((t (:underline t :bold t :foreground "blue"))))
- (cvs-filename-face ((t (:foreground "blue4"))))
- (cvs-handled-face ((t (:foreground "pink"))))
- (cvs-header-face ((t (:bold t :foreground "blue4"))))
- (cvs-marked-face ((t (:bold t :foreground "green3"))))
- (cvs-msg-face ((t (nil))))
- (cvs-need-action-face ((t (:foreground "orange"))))
- (cvs-unknown-face ((t (:foreground "red"))))
- (diary-face ((t (:bold t :foreground "red"))))
- (dired-face-boring ((t (:foreground "Gray65"))))
- (dired-face-directory ((t (:bold t :foreground "forestgreen"))))
- (dired-face-executable ((t (:foreground "indianred"))))
- (dired-face-flagged ((t (:background "SlateGray"))))
- (dired-face-marked ((t (:background "darkblue" :foreground "deepskyblue"))))
- (dired-face-permissions ((t (nil))))
- (dired-face-setuid ((t (:foreground "Red"))))
- (dired-face-socket ((t (:foreground "magenta"))))
- (dired-face-symlink ((t (:foreground "grey95"))))
- (display-time-mail-balloon-enhance-face ((t (:background "orange"))))
- (display-time-mail-balloon-gnus-group-face ((t (:foreground "blue"))))
- (display-time-time-balloon-face ((t (:foreground "red"))))
- (ediff-current-diff-face-A ((t (:background "pale green" :foreground "firebrick"))))
- (ediff-current-diff-face-Ancestor ((t (:background "VioletRed" :foreground "Black"))))
- (ediff-current-diff-face-B ((t (:background "Yellow" :foreground "DarkOrchid"))))
- (ediff-current-diff-face-C ((t (:background "Pink" :foreground "Navy"))))
- (ediff-even-diff-face-A ((t (:background "light grey" :foreground "Black"))))
- (ediff-even-diff-face-Ancestor ((t (:background "Grey" :foreground "White"))))
- (ediff-even-diff-face-B ((t (:background "Grey" :foreground "White"))))
- (ediff-even-diff-face-C ((t (:background "light grey" :foreground "Black"))))
- (ediff-fine-diff-face-A ((t (:background "sky blue" :foreground "Navy"))))
- (ediff-fine-diff-face-Ancestor ((t (:background "Green" :foreground "Black"))))
- (ediff-fine-diff-face-B ((t (:background "cyan" :foreground "Black"))))
- (ediff-fine-diff-face-C ((t (:background "Turquoise" :foreground "Black"))))
- (ediff-odd-diff-face-A ((t (:background "Grey" :foreground "White"))))
- (ediff-odd-diff-face-Ancestor ((t (:background "light grey" :foreground "Black"))))
- (ediff-odd-diff-face-B ((t (:background "light grey" :foreground "Black"))))
- (ediff-odd-diff-face-C ((t (:background "Grey" :foreground "White"))))
- (erc-action-face ((t (:bold t))))
- (erc-bold-face ((t (:bold t))))
- (erc-default-face ((t (nil))))
- (erc-direct-msg-face ((t (nil))))
- (erc-error-face ((t (:bold t))))
- (erc-input-face ((t (nil))))
- (erc-inverse-face ((t (nil))))
- (erc-notice-face ((t (nil))))
- (erc-pal-face ((t (nil))))
- (erc-prompt-face ((t (nil))))
- (erc-underline-face ((t (nil))))
- (eshell-ls-archive-face ((t (:bold t :foreground "Orchid"))))
- (eshell-ls-backup-face ((t (:foreground "OrangeRed"))))
- (eshell-ls-clutter-face ((t (:bold t :foreground "OrangeRed"))))
- (eshell-ls-directory-face ((t (:bold t :foreground "Blue"))))
- (eshell-ls-executable-face ((t (:bold t :foreground "ForestGreen"))))
- (eshell-ls-missing-face ((t (:bold t :foreground "Red"))))
- (eshell-ls-picture-face ((t (nil))))
- (eshell-ls-product-face ((t (:foreground "OrangeRed"))))
- (eshell-ls-readonly-face ((t (:foreground "Brown"))))
- (eshell-ls-special-face ((t (:bold t :foreground "Magenta"))))
- (eshell-ls-symlink-face ((t (:bold t :foreground "DarkCyan"))))
- (eshell-ls-unreadable-face ((t (:foreground "Grey30"))))
- (eshell-prompt-face ((t (:bold t :foreground "Red"))))
- (eshell-test-failed-face ((t (:bold t :foreground "OrangeRed"))))
- (eshell-test-ok-face ((t (:bold t :foreground "Green"))))
- (excerpt ((t (nil))))
- (ff-paths-non-existant-file-face ((t (:bold t :foreground "NavyBlue"))))
- (fg:black ((t (:foreground "black"))))
- (fixed ((t (:bold t))))
- (flyspell-duplicate-face ((t (:underline t :bold t :foreground "Gold3"))))
- (flyspell-incorrect-face ((t (:underline t :bold t :foreground "OrangeRed"))))
- (font-latex-bold-face ((t (nil))))
- (font-latex-italic-face ((t (nil))))
- (font-latex-math-face ((t (nil))))
- (font-latex-sedate-face ((t (nil))))
- (font-latex-string-face ((t (nil))))
- (font-latex-warning-face ((t (nil))))
- (font-lock-builtin-face ((t (:foreground "ForestGreen"))))
- (font-lock-comment-face ((t (:foreground "grey55"))))
- (font-lock-constant-face ((t (:foreground "OliveDrab"))))
- (font-lock-doc-string-face ((t (:bold t :foreground "blue4"))))
- (font-lock-exit-face ((t (nil))))
- (font-lock-function-name-face ((t (:italic t :bold t :foreground "SlateBlue"))))
- (font-lock-keyword-face ((t (:foreground "DarkBlue"))))
- (font-lock-preprocessor-face ((t (:foreground "blue3"))))
- (font-lock-reference-face ((t (:foreground "red3"))))
- (font-lock-string-face ((t (:foreground "DarkRed"))))
- (font-lock-type-face ((t (:foreground "SteelBlue4"))))
- (font-lock-variable-name-face ((t (:foreground "DarkGoldenrod"))))
- (font-lock-warning-face ((t (:bold t :foreground "VioletRed"))))
- (fringe ((t (:background "grey95"))))
- (gnus-cite-attribution-face ((t (:bold t))))
- (gnus-cite-face-1 ((t (:foreground "MidnightBlue"))))
- (gnus-cite-face-10 ((t (:foreground "medium purple"))))
- (gnus-cite-face-11 ((t (:foreground "turquoise"))))
- (gnus-cite-face-2 ((t (:foreground "firebrick"))))
- (gnus-cite-face-3 ((t (:foreground "dark green"))))
- (gnus-cite-face-4 ((t (:foreground "OrangeRed"))))
- (gnus-cite-face-5 ((t (:foreground "dark khaki"))))
- (gnus-cite-face-6 ((t (:foreground "dark violet"))))
- (gnus-cite-face-7 ((t (:foreground "SteelBlue4"))))
- (gnus-cite-face-8 ((t (:foreground "magenta"))))
- (gnus-cite-face-9 ((t (:foreground "violet"))))
- (gnus-emphasis-bold ((t (:bold t))))
- (gnus-emphasis-bold-italic ((t (:bold t))))
- (gnus-emphasis-highlight-words ((t (nil))))
- (gnus-emphasis-italic ((t (nil))))
- (gnus-emphasis-underline ((t (:underline t))))
- (gnus-emphasis-underline-bold ((t (:underline t :bold t))))
- (gnus-emphasis-underline-bold-italic ((t (:underline t :bold t))))
- (gnus-emphasis-underline-italic ((t (:underline t))))
- (gnus-filterhist-face-1 ((t (nil))))
- (gnus-group-mail-1-empty-face ((t (:foreground "DeepPink3"))))
- (gnus-group-mail-1-face ((t (:bold t :foreground "DeepPink3"))))
- (gnus-group-mail-2-empty-face ((t (:foreground "HotPink3"))))
- (gnus-group-mail-2-face ((t (:bold t :foreground "HotPink3"))))
- (gnus-group-mail-3-empty-face ((t (:foreground "magenta4"))))
- (gnus-group-mail-3-face ((t (:bold t :foreground "magenta4"))))
- (gnus-group-mail-low-empty-face ((t (:foreground "DeepPink4"))))
- (gnus-group-mail-low-face ((t (:bold t :foreground "DeepPink4"))))
- (gnus-group-news-1-empty-face ((t (:foreground "ForestGreen"))))
- (gnus-group-news-1-face ((t (:bold t :foreground "ForestGreen"))))
- (gnus-group-news-2-empty-face ((t (:foreground "CadetBlue4"))))
- (gnus-group-news-2-face ((t (:bold t :foreground "CadetBlue4"))))
- (gnus-group-news-3-empty-face ((t (nil))))
- (gnus-group-news-3-face ((t (:bold t))))
- (gnus-group-news-4-empty-face ((t (nil))))
- (gnus-group-news-4-face ((t (:bold t))))
- (gnus-group-news-5-empty-face ((t (nil))))
- (gnus-group-news-5-face ((t (:bold t))))
- (gnus-group-news-6-empty-face ((t (nil))))
- (gnus-group-news-6-face ((t (:bold t))))
- (gnus-group-news-low-empty-face ((t (:foreground "DarkGreen"))))
- (gnus-group-news-low-face ((t (:bold t :foreground "DarkGreen"))))
- (gnus-header-content-face ((t (:foreground "indianred4"))))
- (gnus-header-from-face ((t (:bold t :foreground "red3"))))
- (gnus-header-name-face ((t (:bold t :foreground "maroon"))))
- (gnus-header-newsgroups-face ((t (:bold t :foreground "MidnightBlue"))))
- (gnus-header-subject-face ((t (:bold t :foreground "red4"))))
- (gnus-picons-face ((t (:background "white" :foreground "black"))))
- (gnus-picons-xbm-face ((t (:background "white" :foreground "black"))))
- (gnus-signature-face ((t (nil))))
- (gnus-splash ((t (nil))))
- (gnus-splash-face ((t (:foreground "ForestGreen"))))
- (gnus-summary-cancelled-face ((t (:background "black" :foreground "yellow"))))
- (gnus-summary-high-ancient-face ((t (:bold t :foreground "RoyalBlue"))))
- (gnus-summary-high-read-face ((t (:bold t :foreground "DarkGreen"))))
- (gnus-summary-high-ticked-face ((t (:bold t :foreground "firebrick"))))
- (gnus-summary-high-unread-face ((t (:bold t))))
- (gnus-summary-low-ancient-face ((t (:foreground "RoyalBlue"))))
- (gnus-summary-low-read-face ((t (:foreground "DarkGreen"))))
- (gnus-summary-low-ticked-face ((t (:bold t :foreground "firebrick"))))
- (gnus-summary-low-unread-face ((t (nil))))
- (gnus-summary-normal-ancient-face ((t (:foreground "RoyalBlue"))))
- (gnus-summary-normal-read-face ((t (:foreground "DarkGreen"))))
- (gnus-summary-normal-ticked-face ((t (:bold t :foreground "firebrick"))))
- (gnus-summary-normal-unread-face ((t (:bold t))))
- (gnus-summary-selected-face ((t (:underline t))))
- (gnus-x-face ((t (:background "white" :foreground "black"))))
- (green ((t (nil))))
- (gui-button-face ((t (:background "grey75"))))
- (gui-element ((t (:background "Gray80"))))
- (highlight ((t (:background "LightSkyBlue"))))
- (highlight-changes-delete-face ((t (:underline t :foreground "red"))))
- (highlight-changes-face ((t (:foreground "red"))))
- (highline-face ((t (:background "grey95"))))
- (holiday-face ((t (:background "pink"))))
- (html-helper-italic-face ((t (nil))))
- (info-menu-5 ((t (:underline t))))
- (info-node ((t (:bold t))))
- (info-xref ((t (:bold t))))
- (isearch ((t (:background "yellow"))))
- (isearch-secondary ((t (:foreground "red3"))))
- (italic ((t (nil))))
- (lazy-highlight-face ((t (:bold t :foreground "dark magenta"))))
- (left-margin ((t (nil))))
- (linemenu-face ((t (nil))))
- (list-mode-item-selected ((t (nil))))
- (makefile-space-face ((t (:background "hotpink"))))
- (message-cited-text-face ((t (:foreground "red"))))
- (message-header-cc-face ((t (:bold t :foreground "MidnightBlue"))))
- (message-header-name-face ((t (:foreground "cornflower blue"))))
- (message-header-newsgroups-face ((t (:bold t :foreground "blue4"))))
- (message-header-other-face ((t (:foreground "steel blue"))))
- (message-header-subject-face ((t (:bold t :foreground "navy blue"))))
- (message-header-to-face ((t (:bold t :foreground "MidnightBlue"))))
- (message-header-xheader-face ((t (:foreground "blue"))))
- (message-mml-face ((t (:bold t))))
- (message-separator-face ((t (:foreground "brown"))))
- (modeline ((t (:background "white" :foreground "black"))))
- (modeline-buffer-id ((t (:background "white" :foreground "black"))))
- (modeline-mousable ((t (:background "white" :foreground "black"))))
- (modeline-mousable-minor-mode ((t (:background "white" :foreground "black"))))
- (paren-blink-off ((t (:foreground "gray80"))))
- (paren-face-match ((t (:background "turquoise"))))
- (paren-face-mismatch ((t (:background "purple" :foreground "white"))))
- (paren-face-no-match ((t (:background "yellow" :foreground "black"))))
- (paren-match ((t (:background "darkseagreen2"))))
- (paren-mismatch ((t (:background "DeepPink" :foreground "black"))))
- (paren-mismatch-face ((t (:bold t))))
- (paren-no-match-face ((t (:bold t))))
- (pointer ((t (nil))))
- (primary-selection ((t (nil))))
- (red ((t (nil))))
- (region ((t (:background "grey80"))))
- (right-margin ((t (nil))))
- (secondary-selection ((t (:background "grey55"))))
- (sgml-comment-face ((t (:foreground "dark turquoise"))))
- (sgml-doctype-face ((t (nil))))
- (sgml-end-tag-face ((t (nil))))
- (sgml-entity-face ((t (nil))))
- (sgml-ignored-face ((t (nil))))
- (sgml-ms-end-face ((t (:foreground "green"))))
- (sgml-ms-start-face ((t (:foreground "green"))))
- (sgml-pi-face ((t (:foreground "lime green"))))
- (sgml-sgml-face ((t (nil))))
- (sgml-short-ref-face ((t (:foreground "deep sky blue"))))
- (sgml-start-tag-face ((t (nil))))
- (shell-option-face ((t (:foreground "blue"))))
- (shell-output-2-face ((t (:foreground "darkseagreen"))))
- (shell-output-3-face ((t (:foreground "slategrey"))))
- (shell-output-face ((t (:foreground "palegreen"))))
- (shell-prompt-face ((t (:foreground "red"))))
- (show-paren-match-face ((t (:background "grey80"))))
- (show-paren-mismatch-face ((t (:bold t :background "purple" :foreground "white"))))
- (speedbar-button-face ((t (:bold t :foreground "green4"))))
- (speedbar-directory-face ((t (:bold t :foreground "blue4"))))
- (speedbar-file-face ((t (:bold t :foreground "cyan4"))))
- (speedbar-highlight-face ((t (:background "green"))))
- (speedbar-selected-face ((t (:underline t :foreground "red"))))
- (speedbar-tag-face ((t (:foreground "brown"))))
- (swbuff-current-buffer-face ((t (:bold t))))
- (template-message-face ((t (:bold t))))
- (term-black ((t (:foreground "black"))))
- (term-blackbg ((t (:background "black"))))
- (term-blue ((t (:foreground "blue"))))
- (term-bluebg ((t (:background "blue"))))
- (term-bold ((t (:bold t))))
- (term-cyan ((t (:foreground "cyan"))))
- (term-cyanbg ((t (:background "cyan"))))
- (term-default-bg ((t (nil))))
- (term-default-bg-inv ((t (nil))))
- (term-default-fg ((t (nil))))
- (term-default-fg-inv ((t (nil))))
- (term-green ((t (:foreground "green"))))
- (term-greenbg ((t (:background "green"))))
- (term-invisible ((t (nil))))
- (term-invisible-inv ((t (nil))))
- (term-magenta ((t (:foreground "magenta"))))
- (term-magentabg ((t (:background "magenta"))))
- (term-red ((t (:foreground "red"))))
- (term-redbg ((t (:background "red"))))
- (term-underline ((t (:underline t))))
- (term-white ((t (:foreground "white"))))
- (term-whitebg ((t (:background "white"))))
- (term-yellow ((t (:foreground "yellow"))))
- (term-yellowbg ((t (:background "yellow"))))
- (text-cursor ((t (:background "grey15" :foreground "gainsboro"))))
- (toolbar ((t (nil))))
- (underline ((t (:underline t))))
- (vc-annotate-face-0046FF ((t (nil))))
- (vcursor ((t (:underline t :background "cyan" :foreground "blue"))))
- (vertical-divider ((t (nil))))
- (vhdl-font-lock-attribute-face ((t (:foreground "Orchid"))))
- (vhdl-font-lock-directive-face ((t (:foreground "CadetBlue"))))
- (vhdl-font-lock-enumvalue-face ((t (:foreground "Gold4"))))
- (vhdl-font-lock-function-face ((t (:foreground "Orchid4"))))
- (vhdl-font-lock-prompt-face ((t (:bold t :foreground "Red"))))
- (vhdl-font-lock-reserved-words-face ((t (:bold t :foreground "Orange"))))
- (vhdl-font-lock-translate-off-face ((t (:background "LightGray"))))
- (vhdl-speedbar-architecture-face ((t (:foreground "Blue"))))
- (vhdl-speedbar-architecture-selected-face ((t (:underline t :foreground "Blue"))))
- (vhdl-speedbar-configuration-face ((t (:foreground "DarkGoldenrod"))))
- (vhdl-speedbar-configuration-selected-face ((t (:underline t :foreground "DarkGoldenrod"))))
- (vhdl-speedbar-entity-face ((t (:foreground "ForestGreen"))))
- (vhdl-speedbar-entity-selected-face ((t (:underline t :foreground "ForestGreen"))))
- (vhdl-speedbar-instantiation-face ((t (:foreground "Brown"))))
- (vhdl-speedbar-instantiation-selected-face ((t (:underline t :foreground "Brown"))))
- (vhdl-speedbar-package-face ((t (:foreground "Grey50"))))
- (vhdl-speedbar-package-selected-face ((t (:underline t :foreground "Grey50"))))
- (viper-minibuffer-emacs-face ((t (:background "darkseagreen2" :foreground "Black"))))
- (viper-minibuffer-insert-face ((t (:background "pink" :foreground "Black"))))
- (viper-minibuffer-vi-face ((t (:background "grey" :foreground "DarkGreen"))))
- (viper-replace-overlay-face ((t (:background "darkseagreen2" :foreground "Black"))))
- (viper-search-face ((t (:background "khaki" :foreground "Black"))))
- (vvb-face ((t (:background "pink" :foreground "black"))))
- (widget-button-face ((t (:bold t))))
- (widget-button-pressed-face ((t (:foreground "red"))))
- (widget-documentation-face ((t (:foreground "dark green"))))
- (widget-field-face ((t (:background "navy" :foreground "white"))))
- (widget-inactive-face ((t (:foreground "dim gray"))))
- (widget-single-line-field-face ((t (:background "royalblue" :foreground "white"))))
- (woman-bold-face ((t (:bold t))))
- (woman-italic-face ((t (nil))))
- (woman-unknown-face ((t (nil))))
- (xref-keyword-face ((t (:foreground "blue"))))
- (xref-list-pilot-face ((t (:foreground "navy"))))
- (xref-list-symbol-face ((t (:foreground "navy"))))
- (yellow ((t (nil))))
- (zmacs-region ((t (:background "royalblue")))))))
-
- (defun color-theme-oswald ()
- "Color theme by Tom Oswald, created 2001-04-18.
- Green on black, includes font-lock, show-paren, and ediff."
- (interactive)
- (color-theme-install
- '(color-theme-oswald
- ((background-color . "black")
- (background-mode . dark)
- (border-color . "black")
- (cursor-color . "black")
- (foreground-color . "green")
- (mouse-color . "black"))
- ((blank-space-face . blank-space-face)
- (blank-tab-face . blank-tab-face)
- (list-matching-lines-face . bold)
- (view-highlight-face . highlight))
- (default ((t (nil))))
- (blank-space-face ((t (:background "LightGray"))))
- (blank-tab-face ((t (:background "green" :foreground "black"))))
- (bold ((t (:bold t))))
- (bold-italic ((t (:italic t :bold t))))
- (ediff-current-diff-face-A ((t (:background "pale green" :foreground "firebrick"))))
- (ediff-current-diff-face-Ancestor ((t (:background "VioletRed" :foreground "Black"))))
- (ediff-current-diff-face-B ((t (:background "Yellow" :foreground "DarkOrchid"))))
- (ediff-current-diff-face-C ((t (:background "Pink" :foreground "Navy"))))
- (ediff-even-diff-face-A ((t (:background "light grey" :foreground "Black"))))
- (ediff-even-diff-face-Ancestor ((t (:background "Grey" :foreground "White"))))
- (ediff-even-diff-face-B ((t (:background "Grey" :foreground "White"))))
- (ediff-even-diff-face-C ((t (:background "light grey" :foreground "Black"))))
- (ediff-fine-diff-face-A ((t (:background "sky blue" :foreground "Navy"))))
- (ediff-fine-diff-face-Ancestor ((t (:background "Green" :foreground "Black"))))
- (ediff-fine-diff-face-B ((t (:background "cyan" :foreground "Black"))))
- (ediff-fine-diff-face-C ((t (:background "Turquoise" :foreground "Black"))))
- (ediff-odd-diff-face-A ((t (:background "Grey" :foreground "White"))))
- (ediff-odd-diff-face-Ancestor ((t (:background "light grey" :foreground "Black"))))
- (ediff-odd-diff-face-B ((t (:background "light grey" :foreground "Black"))))
- (ediff-odd-diff-face-C ((t (:background "Grey" :foreground "White"))))
- (font-lock-builtin-face ((t (:italic t :bold t :foreground "LightSteelBlue"))))
- (font-lock-comment-face ((t (:italic t :foreground "LightGoldenrod4"))))
- (font-lock-constant-face ((t (:italic t :foreground "HotPink"))))
- (font-lock-doc-string-face ((t (:italic t :foreground "orange"))))
- (font-lock-function-name-face ((t (:italic t :bold t :foreground "red"))))
- (font-lock-keyword-face ((t (:foreground "red"))))
- (font-lock-preprocessor-face ((t (:italic t :foreground "HotPink"))))
- (font-lock-string-face ((t (:italic t :foreground "orange"))))
- (font-lock-reference-face ((t (:italic t :bold t :foreground "LightSteelBlue"))))
- (font-lock-type-face ((t (:italic t :foreground "LightSlateBlue"))))
- (font-lock-variable-name-face ((t (:underline t :foreground "LightGoldenrod"))))
- (font-lock-warning-face ((t (:bold t :foreground "Pink"))))
- (highlight ((t (:background "yellow" :foreground "red"))))
- (isearch ((t (:background "dim gray" :foreground "aquamarine"))))
- (ispell-face ((t (:bold t :background "#3454b4" :foreground "yellow"))))
- (italic ((t (:italic t))))
- (modeline ((t (:background "green" :foreground "black"))))
- (modeline-buffer-id ((t (:background "green" :foreground "black"))))
- (modeline-mousable ((t (:background "green" :foreground "black"))))
- (modeline-mousable-minor-mode ((t (:background "green" :foreground "black"))))
- (region ((t (:background "dim gray" :foreground "aquamarine"))))
- (secondary-selection ((t (:background "darkslateblue" :foreground "light goldenrod"))))
- (show-paren-match-face ((t (:background "turquoise" :foreground "black"))))
- (show-paren-mismatch-face ((t (:background "purple" :foreground "white"))))
- (underline ((t (:underline t))))
- (zmacs-region ((t (:background "dim gray" :foreground "aquamarine")))))))
-
- (defun color-theme-salmon-diff ()
- "Salmon and aquamarine faces for diff and change-log modes.
- This is intended for other color themes to use (eg. `color-theme-gnome2')."
- (color-theme-install
- '(color-theme-salmon-diff
- nil
- (change-log-acknowledgement-face ((t (:foreground "LightBlue"))))
- (change-log-conditionals-face ((t (:bold t :weight bold :foreground "Aquamarine"))))
- (change-log-date-face ((t (:foreground "LightSalmon"))))
- (change-log-email-face ((t (:bold t :weight bold :foreground "Aquamarine"))))
- (change-log-file-face ((t (:bold t :weight bold :foreground "Aquamarine"))))
- (change-log-function-face ((t (:bold t :weight bold :foreground "Aquamarine"))))
- (change-log-list-face ((t (:foreground "Salmon"))))
- (change-log-name-face ((t (:foreground "Aquamarine"))))
- (diff-added-face ((t (nil))))
- (diff-changed-face ((t (nil))))
- (diff-context-face ((t (:foreground "grey70"))))
- (diff-file-header-face ((t (:bold t))))
- (diff-function-face ((t (:foreground "grey70"))))
- (diff-header-face ((t (:foreground "light salmon"))))
- (diff-hunk-header-face ((t (:foreground "light salmon"))))
- (diff-index-face ((t (:bold t))))
- (diff-nonexistent-face ((t (:bold t))))
- (diff-removed-face ((t (nil))))
- (log-view-message-face ((t (:foreground "light salmon")))))))
-
- (defun color-theme-robin-hood ()
- "`color-theme-gnome2' with navajo white on green.
- This theme tries to avoid underlined and italic faces, because
- the fonts either look ugly, or do not exist. The author himself
- uses neep, for example."
- (interactive)
- (color-theme-gnome2)
- (let ((color-theme-is-cumulative t))
- (color-theme-install
- '(color-theme-robin-hood
- ((foreground-color . "navajo white")
- (background-color . "#304020"))
- ((CUA-mode-read-only-cursor-color . "white")
- (help-highlight-face . info-xref)
- (list-matching-lines-buffer-name-face . bold))
- (default ((t (nil))))
- (button ((t (:bold t))))
- (calendar-today-face ((t (:foreground "lemon chiffon"))))
- (custom-button-face ((t (:bold t :foreground "DodgerBlue1"))))
- (diary-face ((t (:bold t :foreground "yellow"))))
- (fringe ((t (:background "#003700"))))
- (header-line ((t (:background "#030" :foreground "#AA7"))))
- (holiday-face ((t (:bold t :foreground "peru"))))
- (ido-subdir-face ((t (:foreground "MediumSlateBlue"))))
- (isearch ((t (:foreground "pink" :background "red"))))
- (isearch-lazy-highlight-face ((t (:foreground "red"))))
- (menu ((t (:background "#304020" :foreground "navajo white"))))
- (minibuffer-prompt ((t (:foreground "pale green"))))
- (modeline ((t (:background "dark olive green" :foreground "wheat" :box (:line-width 1 :style released-button)))))
- (mode-line-inactive ((t (:background "dark olive green" :foreground "khaki" :box (:line-width 1 :style released-button)))))
- (semantic-dirty-token-face ((t (:background "grey22"))))
- (tool-bar ((t (:background "#304020" :foreground "wheat" :box (:line-width 1 :style released-button)))))
- (tooltip ((t (:background "lemon chiffon" :foreground "black"))))))))
-
- (defun color-theme-snowish ()
- "Color theme by Girish Bharadwaj, created 2001-05-17.
- Dark slate gray on snow2, lots of blue colors.
- Includes custom, eshell, font-lock, gnus, html-helper,
- hyper-apropos, jde, message, paren, semantic, speedbar,
- term, widget."
- (interactive)
- (color-theme-install
- '(color-theme-snowish
- ((background-color . "snow2")
- (background-mode . light)
- (cursor-color . "Red3")
- (foreground-color . "darkslategray"))
- ((buffers-tab-face . buffers-tab)
- (gnus-mouse-face . highlight)
- (sgml-set-face . t)
- (smiley-mouse-face . highlight))
- (default ((t (nil))))
- (blue ((t (:foreground "blue"))))
- (bold ((t (:bold t :foreground "peru"))))
- (bold-italic ((t (:italic t :bold t))))
- (border-glyph ((t (nil))))
- (buffers-tab ((t (:background "snow2" :foreground "darkslategray"))))
- (custom-button-face ((t (:bold t))))
- (custom-changed-face ((t (:background "blue" :foreground "white"))))
- (custom-comment-face ((t (:background "gray85"))))
- (custom-comment-tag-face ((t (:foreground "blue4"))))
- (custom-documentation-face ((t (nil))))
- (custom-face-tag-face ((t (:underline t))))
- (custom-group-tag-face ((t (:underline t :foreground "blue"))))
- (custom-group-tag-face-1 ((t (:underline t :foreground "red"))))
- (custom-invalid-face ((t (:background "red" :foreground "yellow"))))
- (custom-modified-face ((t (:background "blue" :foreground "white"))))
- (custom-rogue-face ((t (:background "black" :foreground "pink"))))
- (custom-saved-face ((t (:underline t))))
- (custom-set-face ((t (:background "white" :foreground "blue"))))
- (custom-state-face ((t (:foreground "dark green"))))
- (custom-variable-button-face ((t (:underline t :bold t))))
- (custom-variable-tag-face ((t (:underline t :foreground "blue"))))
- (cyan ((t (:foreground "cyan"))))
- (display-time-mail-balloon-enhance-face ((t (:background "orange"))))
- (display-time-mail-balloon-gnus-group-face ((t (:foreground "blue"))))
- (display-time-time-balloon-face ((t (:foreground "red"))))
- (eshell-ls-archive-face ((t (:bold t :foreground "Orchid"))))
- (eshell-ls-backup-face ((t (:foreground "OrangeRed"))))
- (eshell-ls-clutter-face ((t (:bold t :foreground "OrangeRed"))))
- (eshell-ls-directory-face ((t (:bold t :foreground "Blue"))))
- (eshell-ls-executable-face ((t (:bold t :foreground "ForestGreen"))))
- (eshell-ls-missing-face ((t (:bold t :foreground "Red"))))
- (eshell-ls-product-face ((t (:foreground "OrangeRed"))))
- (eshell-ls-readonly-face ((t (:foreground "Brown"))))
- (eshell-ls-special-face ((t (:bold t :foreground "Magenta"))))
- (eshell-ls-symlink-face ((t (:bold t :foreground "Dark Cyan"))))
- (eshell-ls-unreadable-face ((t (:foreground "Grey30"))))
- (eshell-prompt-face ((t (:bold t :foreground "Red"))))
- (font-lock-builtin-face ((t (:underline t :foreground "blue"))))
- (font-lock-comment-face ((t (:foreground "snow4"))))
- (font-lock-constant-face ((t (:foreground "CadetBlue"))))
- (font-lock-doc-string-face ((t (:foreground "mediumblue"))))
- (font-lock-function-name-face ((t (:bold t :foreground "darkblue"))))
- (font-lock-keyword-face ((t (:bold t :foreground "dodgerblue"))))
- (font-lock-preprocessor-face ((t (:underline t :foreground "blue3"))))
- (font-lock-reference-face ((t (:foreground "red3"))))
- (font-lock-string-face ((t (:foreground "darkviolet"))))
- (font-lock-type-face ((t (:foreground "goldenrod"))))
- (font-lock-variable-name-face ((t (:foreground "tomato"))))
- (font-lock-warning-face ((t (:bold t :foreground "Red"))))
- (gnus-cite-attribution-face ((t (nil))))
- (gnus-cite-face-1 ((t (:foreground "MidnightBlue"))))
- (gnus-cite-face-10 ((t (:foreground "medium purple"))))
- (gnus-cite-face-11 ((t (:foreground "turquoise"))))
- (gnus-cite-face-2 ((t (:foreground "firebrick"))))
- (gnus-cite-face-3 ((t (:foreground "dark green"))))
- (gnus-cite-face-4 ((t (:foreground "OrangeRed"))))
- (gnus-cite-face-5 ((t (:foreground "dark khaki"))))
- (gnus-cite-face-6 ((t (:foreground "dark violet"))))
- (gnus-cite-face-7 ((t (:foreground "SteelBlue4"))))
- (gnus-cite-face-8 ((t (:foreground "magenta"))))
- (gnus-cite-face-9 ((t (:foreground "violet"))))
- (gnus-emphasis-bold ((t (:bold t))))
- (gnus-emphasis-bold-italic ((t (nil))))
- (gnus-emphasis-highlight-words ((t (:background "black" :foreground "yellow"))))
- (gnus-emphasis-italic ((t (nil))))
- (gnus-emphasis-underline ((t (:underline t))))
- (gnus-emphasis-underline-bold ((t (:underline t :bold t))))
- (gnus-emphasis-underline-bold-italic ((t (:underline t))))
- (gnus-emphasis-underline-italic ((t (:underline t))))
- (gnus-group-mail-1-empty-face ((t (:foreground "DeepPink3"))))
- (gnus-group-mail-1-face ((t (:bold t :foreground "DeepPink3"))))
- (gnus-group-mail-2-empty-face ((t (:foreground "HotPink3"))))
- (gnus-group-mail-2-face ((t (:bold t :foreground "HotPink3"))))
- (gnus-group-mail-3-empty-face ((t (:foreground "magenta4"))))
- (gnus-group-mail-3-face ((t (:bold t :foreground "magenta4"))))
- (gnus-group-mail-low-empty-face ((t (:foreground "DeepPink4"))))
- (gnus-group-mail-low-face ((t (:bold t :foreground "DeepPink4"))))
- (gnus-group-news-1-empty-face ((t (:foreground "ForestGreen"))))
- (gnus-group-news-1-face ((t (:bold t :foreground "ForestGreen"))))
- (gnus-group-news-2-empty-face ((t (:foreground "CadetBlue4"))))
- (gnus-group-news-2-face ((t (:bold t :foreground "CadetBlue4"))))
- (gnus-group-news-3-empty-face ((t (nil))))
- (gnus-group-news-3-face ((t (:bold t))))
- (gnus-group-news-4-empty-face ((t (nil))))
- (gnus-group-news-4-face ((t (:bold t))))
- (gnus-group-news-5-empty-face ((t (nil))))
- (gnus-group-news-5-face ((t (:bold t))))
- (gnus-group-news-6-empty-face ((t (nil))))
- (gnus-group-news-6-face ((t (:bold t))))
- (gnus-group-news-low-empty-face ((t (:foreground "DarkGreen"))))
- (gnus-group-news-low-face ((t (:bold t :foreground "DarkGreen"))))
- (gnus-header-content-face ((t (:foreground "indianred4"))))
- (gnus-header-from-face ((t (:foreground "red3"))))
- (gnus-header-name-face ((t (:foreground "maroon"))))
- (gnus-header-newsgroups-face ((t (:foreground "MidnightBlue"))))
- (gnus-header-subject-face ((t (:foreground "red4"))))
- (gnus-picons-face ((t (:background "white" :foreground "black"))))
- (gnus-picons-xbm-face ((t (:background "white" :foreground "black"))))
- (gnus-signature-face ((t (nil))))
- (gnus-splash-face ((t (:foreground "Brown"))))
- (gnus-summary-cancelled-face ((t (:background "black" :foreground "yellow"))))
- (gnus-summary-high-ancient-face ((t (:bold t :foreground "RoyalBlue"))))
- (gnus-summary-high-read-face ((t (:bold t :foreground "DarkGreen"))))
- (gnus-summary-high-ticked-face ((t (:bold t :foreground "firebrick"))))
- (gnus-summary-high-unread-face ((t (:bold t))))
- (gnus-summary-low-ancient-face ((t (:foreground "RoyalBlue"))))
- (gnus-summary-low-read-face ((t (:foreground "DarkGreen"))))
- (gnus-summary-low-ticked-face ((t (:foreground "firebrick"))))
- (gnus-summary-low-unread-face ((t (nil))))
- (gnus-summary-normal-ancient-face ((t (:foreground "RoyalBlue"))))
- (gnus-summary-normal-read-face ((t (:foreground "DarkGreen"))))
- (gnus-summary-normal-ticked-face ((t (:foreground "firebrick"))))
- (gnus-summary-normal-unread-face ((t (nil))))
- (gnus-summary-selected-face ((t (:underline t))))
- (gnus-x-face ((t (:background "white" :foreground "black"))))
- (green ((t (:foreground "green"))))
- (gui-button-face ((t (:background "grey75" :foreground "black"))))
- (gui-element ((t (:background "#D4D0C8" :foreground "black"))))
- (highlight ((t (:background "darkseagreen2"))))
- (html-helper-bold-face ((t (:bold t))))
- (html-helper-bold-italic-face ((t (nil))))
- (html-helper-builtin-face ((t (:underline t :foreground "blue3"))))
- (html-helper-italic-face ((t (:foreground "medium sea green"))))
- (html-helper-underline-face ((t (:underline t))))
- (html-tag-face ((t (:bold t))))
- (hyper-apropos-documentation ((t (:foreground "darkred"))))
- (hyper-apropos-heading ((t (:bold t))))
- (hyper-apropos-hyperlink ((t (:foreground "blue4"))))
- (hyper-apropos-major-heading ((t (:bold t))))
- (hyper-apropos-section-heading ((t (nil))))
- (hyper-apropos-warning ((t (:bold t :foreground "red"))))
- (info-menu-6 ((t (nil))))
- (isearch ((t (:background "paleturquoise"))))
- (isearch-secondary ((t (:foreground "red3"))))
- (italic ((t (nil))))
- (jde-bug-breakpoint-cursor ((t (:background "brown" :foreground "cyan"))))
- (jde-bug-breakpoint-marker ((t (:background "yellow" :foreground "red"))))
- (jde-java-font-lock-link-face ((t (:underline t :foreground "blue"))))
- (jde-java-font-lock-number-face ((t (:foreground "RosyBrown"))))
- (left-margin ((t (nil))))
- (list-mode-item-selected ((t (:background "gray68" :foreground "darkslategray"))))
- (magenta ((t (:foreground "magenta"))))
- (message-cited-text-face ((t (:foreground "red"))))
- (message-header-cc-face ((t (:foreground "MidnightBlue"))))
- (message-header-name-face ((t (:foreground "cornflower blue"))))
- (message-header-newsgroups-face ((t (:foreground "blue4"))))
- (message-header-other-face ((t (:foreground "steel blue"))))
- (message-header-subject-face ((t (:bold t :foreground "navy blue"))))
- (message-header-to-face ((t (:bold t :foreground "MidnightBlue"))))
- (message-header-xheader-face ((t (:foreground "blue"))))
- (message-mml-face ((t (:foreground "ForestGreen"))))
- (message-separator-face ((t (:foreground "brown"))))
- (modeline ((t (nil))))
- (modeline-buffer-id ((t (:background "#D4D0C8" :foreground "blue4"))))
- (modeline-mousable ((t (:background "#D4D0C8" :foreground "firebrick"))))
- (modeline-mousable-minor-mode ((t (:background "#D4D0C8" :foreground "green4"))))
- (paren-blink-off ((t (:foreground "snow2"))))
- (paren-match ((t (:background "darkseagreen2"))))
- (paren-mismatch ((t (:background "snow2" :foreground "darkslategray"))))
- (pointer ((t (nil))))
- (primary-selection ((t (:background "gray65"))))
- (red ((t (:foreground "red"))))
- (right-margin ((t (nil))))
- (secondary-selection ((t (:background "paleturquoise"))))
- (semantic-intangible-face ((t (:foreground "gray25"))))
- (semantic-read-only-face ((t (:background "gray25"))))
- (senator-momentary-highlight-face ((t (:background "gray70"))))
- (speedbar-button-face ((t (:foreground "green4"))))
- (speedbar-directory-face ((t (:foreground "blue4"))))
- (speedbar-file-face ((t (:foreground "cyan4"))))
- (speedbar-highlight-face ((t (:background "green"))))
- (speedbar-selected-face ((t (:underline t :foreground "red"))))
- (speedbar-tag-face ((t (:foreground "brown"))))
- (template-message-face ((t (:bold t))))
- (term-blue-bold-face ((t (:bold t :background "snow2" :foreground "blue"))))
- (term-blue-face ((t (:foreground "blue"))))
- (term-blue-inv-face ((t (:background "blue"))))
- (term-blue-ul-face ((t (:underline t :background "snow2" :foreground "blue"))))
- (term-cyan-bold-face ((t (:bold t :background "snow2" :foreground "cyan"))))
- (term-cyan-face ((t (:foreground "cyan"))))
- (term-cyan-inv-face ((t (:background "cyan"))))
- (term-cyan-ul-face ((t (:underline t :background "snow2" :foreground "cyan"))))
- (term-default-bold-face ((t (:bold t :background "snow2" :foreground "darkslategray"))))
- (term-default-face ((t (:background "snow2" :foreground "darkslategray"))))
- (term-default-inv-face ((t (:background "darkslategray" :foreground "snow2"))))
- (term-default-ul-face ((t (:underline t :background "snow2" :foreground "darkslategray"))))
- (term-green-bold-face ((t (:bold t :background "snow2" :foreground "green"))))
- (term-green-face ((t (:foreground "green"))))
- (term-green-inv-face ((t (:background "green"))))
- (term-green-ul-face ((t (:underline t :background "snow2" :foreground "green"))))
- (term-magenta-bold-face ((t (:bold t :background "snow2" :foreground "magenta"))))
- (term-magenta-face ((t (:foreground "magenta"))))
- (term-magenta-inv-face ((t (:background "magenta"))))
- (term-magenta-ul-face ((t (:underline t :background "snow2" :foreground "magenta"))))
- (term-red-bold-face ((t (:bold t :background "snow2" :foreground "red"))))
- (term-red-face ((t (:foreground "red"))))
- (term-red-inv-face ((t (:background "red"))))
- (term-red-ul-face ((t (:underline t :background "snow2" :foreground "red"))))
- (term-white-bold-face ((t (:bold t :background "snow2" :foreground "white"))))
- (term-white-face ((t (:foreground "white"))))
- (term-white-inv-face ((t (:background "snow2"))))
- (term-white-ul-face ((t (:underline t :background "snow2" :foreground "white"))))
- (term-yellow-bold-face ((t (:bold t :background "snow2" :foreground "yellow"))))
- (term-yellow-face ((t (:foreground "yellow"))))
- (term-yellow-inv-face ((t (:background "yellow"))))
- (term-yellow-ul-face ((t (:underline t :background "snow2" :foreground "yellow"))))
- (text-cursor ((t (:background "Red3" :foreground "snow2"))))
- (toolbar ((t (nil))))
- (underline ((t (:underline t))))
- (vertical-divider ((t (nil))))
- (white ((t (:foreground "white"))))
- (widget ((t (nil))))
- (widget-button-face ((t (:bold t))))
- (widget-button-pressed-face ((t (:foreground "red"))))
- (widget-documentation-face ((t (:foreground "dark green"))))
- (widget-field-face ((t (:background "gray85"))))
- (widget-inactive-face ((t (:foreground "dim gray"))))
- (yellow ((t (:foreground "yellow"))))
- (zmacs-region ((t (:background "gray65")))))))
-
- (defun color-theme-dark-laptop ()
- "Color theme by Laurent Michel, created 2001-05-24.
- Includes custom, fl, font-lock, gnus, message, widget."
- (interactive)
- (color-theme-install
- '(color-theme-dark-laptop
- ((background-color . "black")
- (background-mode . dark)
- (border-color . "black")
- (cursor-color . "yellow")
- (foreground-color . "white")
- (mouse-color . "sienna1"))
- ((gnus-mouse-face . highlight)
- (list-matching-lines-face . bold)
- (view-highlight-face . highlight))
- (default ((t (nil))))
- (bold ((t (:bold t))))
- (bold-italic ((t (:italic t :bold t))))
- (custom-button-face ((t (nil))))
- (custom-changed-face ((t (:background "blue" :foreground "white"))))
- (custom-documentation-face ((t (nil))))
- (custom-face-tag-face ((t (:underline t))))
- (custom-group-tag-face ((t (:underline t :foreground "light blue"))))
- (custom-group-tag-face-1 ((t (:underline t :foreground "pink"))))
- (custom-invalid-face ((t (:background "red" :foreground "yellow"))))
- (custom-modified-face ((t (:background "blue" :foreground "white"))))
- (custom-rogue-face ((t (:background "black" :foreground "pink"))))
- (custom-saved-face ((t (:underline t))))
- (custom-set-face ((t (:background "white" :foreground "blue"))))
- (custom-state-face ((t (:foreground "lime green"))))
- (custom-variable-button-face ((t (:underline t :bold t))))
- (custom-variable-tag-face ((t (:underline t :foreground "light blue"))))
- (fl-comment-face ((t (:foreground "pink"))))
- (fl-doc-string-face ((t (:foreground "purple"))))
- (fl-function-name-face ((t (:foreground "red"))))
- (fl-keyword-face ((t (:foreground "cyan"))))
- (fl-string-face ((t (:foreground "green"))))
- (fl-type-face ((t (:foreground "yellow"))))
- (font-lock-builtin-face ((t (:foreground "LightSteelBlue"))))
- (font-lock-comment-face ((t (:foreground "OrangeRed"))))
- (font-lock-constant-face ((t (:foreground "Aquamarine"))))
- (font-lock-doc-string-face ((t (:foreground "LightSalmon"))))
- (font-lock-function-name-face ((t (:foreground "LightSkyBlue"))))
- (font-lock-keyword-face ((t (:foreground "Cyan"))))
- (font-lock-preprocessor-face ((t (:foreground "Aquamarine"))))
- (font-lock-reference-face ((t (:foreground "LightSteelBlue"))))
- (font-lock-string-face ((t (:foreground "LightSalmon"))))
- (font-lock-type-face ((t (:foreground "PaleGreen"))))
- (font-lock-variable-name-face ((t (:foreground "LightGoldenrod"))))
- (font-lock-warning-face ((t (:bold t :foreground "Pink"))))
- (gnus-cite-attribution-face ((t (:italic t))))
- (gnus-cite-face-1 ((t (:bold t :foreground "deep sky blue"))))
- (gnus-cite-face-10 ((t (:foreground "medium purple"))))
- (gnus-cite-face-11 ((t (:foreground "turquoise"))))
- (gnus-cite-face-2 ((t (:bold t :foreground "cyan"))))
- (gnus-cite-face-3 ((t (:bold t :foreground "gold"))))
- (gnus-cite-face-4 ((t (:foreground "light pink"))))
- (gnus-cite-face-5 ((t (:foreground "pale green"))))
- (gnus-cite-face-6 ((t (:bold t :foreground "chocolate"))))
- (gnus-cite-face-7 ((t (:foreground "orange"))))
- (gnus-cite-face-8 ((t (:foreground "magenta"))))
- (gnus-cite-face-9 ((t (:foreground "violet"))))
- (gnus-emphasis-bold ((t (:bold t))))
- (gnus-emphasis-bold-italic ((t (:italic t :bold t))))
- (gnus-emphasis-highlight-words ((t (:background "black" :foreground "yellow"))))
- (gnus-emphasis-italic ((t (:italic t))))
- (gnus-emphasis-underline ((t (:underline t))))
- (gnus-emphasis-underline-bold ((t (:underline t :bold t))))
- (gnus-emphasis-underline-bold-italic ((t (:underline t :italic t :bold t))))
- (gnus-emphasis-underline-italic ((t (:underline t :italic t))))
- (gnus-group-mail-1-empty-face ((t (:foreground "aquamarine1"))))
- (gnus-group-mail-1-face ((t (:bold t :foreground "aquamarine1"))))
- (gnus-group-mail-2-empty-face ((t (:foreground "aquamarine2"))))
- (gnus-group-mail-2-face ((t (:bold t :foreground "aquamarine2"))))
- (gnus-group-mail-3-empty-face ((t (:foreground "aquamarine3"))))
- (gnus-group-mail-3-face ((t (:bold t :foreground "aquamarine3"))))
- (gnus-group-mail-low-empty-face ((t (:foreground "aquamarine4"))))
- (gnus-group-mail-low-face ((t (:bold t :foreground "aquamarine4"))))
- (gnus-group-news-1-empty-face ((t (:foreground "PaleTurquoise"))))
- (gnus-group-news-1-face ((t (:bold t :foreground "PaleTurquoise"))))
- (gnus-group-news-2-empty-face ((t (:foreground "turquoise"))))
- (gnus-group-news-2-face ((t (:bold t :foreground "turquoise"))))
- (gnus-group-news-3-empty-face ((t (nil))))
- (gnus-group-news-3-face ((t (:bold t))))
- (gnus-group-news-4-empty-face ((t (nil))))
- (gnus-group-news-4-face ((t (:bold t))))
- (gnus-group-news-5-empty-face ((t (nil))))
- (gnus-group-news-5-face ((t (:bold t))))
- (gnus-group-news-6-empty-face ((t (nil))))
- (gnus-group-news-6-face ((t (:bold t))))
- (gnus-group-news-low-empty-face ((t (:foreground "DarkTurquoise"))))
- (gnus-group-news-low-face ((t (:bold t :foreground "DarkTurquoise"))))
- (gnus-header-content-face ((t (:italic t :foreground "forest green"))))
- (gnus-header-from-face ((t (:bold t :foreground "spring green"))))
- (gnus-header-name-face ((t (:foreground "deep sky blue"))))
- (gnus-header-newsgroups-face ((t (:italic t :bold t :foreground "purple"))))
- (gnus-header-subject-face ((t (:bold t :foreground "orange"))))
- (gnus-signature-face ((t (:bold t :foreground "khaki"))))
- (gnus-splash-face ((t (:foreground "Brown"))))
- (gnus-summary-cancelled-face ((t (:background "black" :foreground "yellow"))))
- (gnus-summary-high-ancient-face ((t (:bold t :foreground "SkyBlue"))))
- (gnus-summary-high-read-face ((t (:bold t :foreground "PaleGreen"))))
- (gnus-summary-high-ticked-face ((t (:bold t :foreground "pink"))))
- (gnus-summary-high-unread-face ((t (:bold t))))
- (gnus-summary-low-ancient-face ((t (:italic t :foreground "SkyBlue"))))
- (gnus-summary-low-read-face ((t (:italic t :foreground "PaleGreen"))))
- (gnus-summary-low-ticked-face ((t (:italic t :foreground "pink"))))
- (gnus-summary-low-unread-face ((t (:italic t))))
- (gnus-summary-normal-ancient-face ((t (:foreground "SkyBlue"))))
- (gnus-summary-normal-read-face ((t (:foreground "PaleGreen"))))
- (gnus-summary-normal-ticked-face ((t (:foreground "pink"))))
- (gnus-summary-normal-unread-face ((t (nil))))
- (gnus-summary-selected-face ((t (:underline t))))
- (highlight ((t (:background "darkolivegreen"))))
- (italic ((t (:italic t))))
- (message-cited-text-face ((t (:bold t :foreground "red"))))
- (message-header-cc-face ((t (:bold t :foreground "green4"))))
- (message-header-name-face ((t (:bold t :foreground "orange"))))
- (message-header-newsgroups-face ((t (:bold t :foreground "violet"))))
- (message-header-other-face ((t (:bold t :foreground "chocolate"))))
- (message-header-subject-face ((t (:bold t :foreground "yellow"))))
- (message-header-to-face ((t (:bold t :foreground "cyan"))))
- (message-header-xheader-face ((t (:bold t :foreground "light blue"))))
- (message-mml-face ((t (:bold t :background "Green3"))))
- (message-separator-face ((t (:foreground "blue3"))))
- (modeline ((t (:background "white" :foreground "black"))))
- (modeline-buffer-id ((t (:background "white" :foreground "black"))))
- (modeline-mousable ((t (:background "white" :foreground "black"))))
- (modeline-mousable-minor-mode ((t (:background "white" :foreground "black"))))
- (region ((t (:background "blue"))))
- (primary-selection ((t (:background "blue"))))
- (isearch ((t (:background "blue"))))
- (zmacs-region ((t (:background "blue"))))
- (secondary-selection ((t (:background "darkslateblue"))))
- (underline ((t (:underline t))))
- (widget-button-face ((t (:bold t))))
- (widget-button-pressed-face ((t (:foreground "red"))))
- (widget-documentation-face ((t (:foreground "lime green"))))
- (widget-field-face ((t (:background "dim gray"))))
- (widget-inactive-face ((t (:foreground "light gray"))))
- (widget-single-line-field-face ((t (:background "dim gray")))))))
-
- (defun color-theme-taming-mr-arneson ()
- "Color theme by Erik Arneson, created 2001-06-12.
- Light sky blue on black. Includes bbdb, cperl, custom, cvs, diff,
- dired, font-lock, html-helper, hyper-apropos, info, isearch, man,
- message, paren, shell, and widget."
- (interactive)
- (color-theme-install
- '(color-theme-taming-mr-arneson
- ((background-color . "black")
- (background-mode . light)
- (background-toolbar-color . "#cf3ccf3ccf3c")
- (border-color . "#000000000000")
- (bottom-toolbar-shadow-color . "#79e77df779e7")
- (cursor-color . "Red3")
- (foreground-color . "LightSkyBlue")
- (top-toolbar-shadow-color . "#fffffbeeffff"))
- ((buffers-tab-face . buffers-tab)
- (cperl-here-face . font-lock-string-face)
- (cperl-invalid-face quote default)
- (cperl-pod-face . font-lock-comment-face)
- (cperl-pod-head-face . font-lock-variable-name-face)
- (ispell-highlight-face . highlight)
- (vc-mode-face . highlight)
- (vm-highlight-url-face . bold-italic)
- (vm-highlighted-header-face . bold)
- (vm-mime-button-face . gui-button-face)
- (vm-summary-highlight-face . bold))
- (default ((t (nil))))
- (bbdb-company ((t (nil))))
- (bbdb-field-name ((t (:bold t))))
- (bbdb-field-value ((t (nil))))
- (bbdb-name ((t (:underline t))))
- (blue ((t (:foreground "blue"))))
- (bold ((t (:bold t))))
- (bold-italic ((t (:bold t :foreground "yellow"))))
- (border-glyph ((t (nil))))
- (buffers-tab ((t (:background "black" :foreground "LightSkyBlue"))))
- (cperl-array-face ((t (:bold t :foreground "SkyBlue2"))))
- (cperl-hash-face ((t (:foreground "LightBlue2"))))
- (cperl-invalid-face ((t (:foreground "white"))))
- (cperl-nonoverridable-face ((t (:foreground "chartreuse3"))))
- (custom-button-face ((t (:bold t))))
- (custom-changed-face ((t (:background "blue" :foreground "white"))))
- (custom-comment-face ((t (:foreground "white"))))
- (custom-comment-tag-face ((t (:foreground "white"))))
- (custom-documentation-face ((t (nil))))
- (custom-face-tag-face ((t (:underline t))))
- (custom-group-tag-face ((t (:underline t :foreground "blue"))))
- (custom-group-tag-face-1 ((t (:underline t :foreground "red"))))
- (custom-invalid-face ((t (:background "red" :foreground "yellow"))))
- (custom-modified-face ((t (:background "blue" :foreground "white"))))
- (custom-rogue-face ((t (:background "black" :foreground "pink"))))
- (custom-saved-face ((t (:underline t))))
- (custom-set-face ((t (:background "white" :foreground "blue"))))
- (custom-state-face ((t (:foreground "white"))))
- (custom-variable-button-face ((t (:underline t :bold t))))
- (custom-variable-tag-face ((t (:underline t :foreground "blue"))))
- (cvs-filename-face ((t (:foreground "white"))))
- (cvs-handled-face ((t (:foreground "pink"))))
- (cvs-header-face ((t (:foreground "green"))))
- (cvs-marked-face ((t (:bold t :foreground "green3"))))
- (cvs-msg-face ((t (:foreground "red"))))
- (cvs-need-action-face ((t (:foreground "yellow"))))
- (cvs-unknown-face ((t (:foreground "grey"))))
- (diff-added-face ((t (nil))))
- (diff-changed-face ((t (nil))))
- (diff-file-header-face ((t (:bold t :background "grey70"))))
- (diff-hunk-header-face ((t (:background "grey85"))))
- (diff-index-face ((t (:bold t :background "grey70"))))
- (diff-removed-face ((t (nil))))
- (dired-face-boring ((t (:foreground "Gray65"))))
- (dired-face-directory ((t (:bold t :foreground "SkyBlue2"))))
- (dired-face-executable ((t (:foreground "Green"))))
- (dired-face-flagged ((t (:background "LightSlateGray"))))
- (dired-face-header ((t (:background "grey75" :foreground "black"))))
- (dired-face-marked ((t (:background "PaleVioletRed"))))
- (dired-face-permissions ((t (:background "grey75" :foreground "black"))))
- (dired-face-setuid ((t (:foreground "Red"))))
- (dired-face-socket ((t (:foreground "magenta"))))
- (dired-face-symlink ((t (:foreground "cyan"))))
- (excerpt ((t (nil))))
- (fixed ((t (:bold t))))
- (font-lock-builtin-face ((t (:foreground "red3"))))
- (font-lock-comment-face ((t (:foreground "red"))))
- (font-lock-constant-face ((t (nil))))
- (font-lock-doc-string-face ((t (:foreground "turquoise"))))
- (font-lock-function-name-face ((t (:foreground "white"))))
- (font-lock-keyword-face ((t (:foreground "green"))))
- (font-lock-preprocessor-face ((t (:foreground "green3"))))
- (font-lock-reference-face ((t (:foreground "red3"))))
- (font-lock-string-face ((t (:foreground "turquoise"))))
- (font-lock-type-face ((t (:foreground "steelblue"))))
- (font-lock-variable-name-face ((t (:foreground "magenta2"))))
- (font-lock-warning-face ((t (:bold t :foreground "Red"))))
- (green ((t (:foreground "green"))))
- (gui-button-face ((t (:background "grey75" :foreground "black"))))
- (gui-element ((t (nil))))
- (highlight ((t (:background "darkseagreen2" :foreground "blue"))))
- (html-helper-bold-face ((t (:bold t))))
- (html-helper-italic-face ((t (:bold t :foreground "yellow"))))
- (html-helper-underline-face ((t (:underline t))))
- (hyper-apropos-documentation ((t (:foreground "white"))))
- (hyper-apropos-heading ((t (:bold t))))
- (hyper-apropos-hyperlink ((t (:foreground "sky blue"))))
- (hyper-apropos-major-heading ((t (:bold t))))
- (hyper-apropos-section-heading ((t (:bold t))))
- (hyper-apropos-warning ((t (:bold t :foreground "red"))))
- (info-node ((t (:bold t :foreground "yellow"))))
- (info-xref ((t (:bold t))))
- (isearch ((t (:background "paleturquoise" :foreground "dark red"))))
- (isearch-secondary ((t (:foreground "red3"))))
- (italic ((t (:bold t :foreground "yellow"))))
- (left-margin ((t (nil))))
- (list-mode-item-selected ((t (:background "gray68" :foreground "dark green"))))
- (man-bold ((t (:bold t))))
- (man-heading ((t (:bold t))))
- (man-italic ((t (:foreground "yellow"))))
- (man-xref ((t (:underline t))))
- (message-cited-text ((t (:foreground "orange"))))
- (message-header-contents ((t (:foreground "white"))))
- (message-headers ((t (:bold t :foreground "orange"))))
- (message-highlighted-header-contents ((t (:bold t))))
- (message-url ((t (:bold t :foreground "pink"))))
- (mmm-face ((t (:background "black" :foreground "green"))))
- (modeline ((t (nil))))
- (modeline-buffer-id ((t (:background "Gray80" :foreground "blue4"))))
- (modeline-mousable ((t (:background "Gray80" :foreground "firebrick"))))
- (modeline-mousable-minor-mode ((t (:background "Gray80" :foreground "green4"))))
- (paren-blink-off ((t (:foreground "gray80"))))
- (paren-match ((t (:background "dark blue"))))
- (paren-mismatch ((t (:background "DeepPink" :foreground "LightSkyBlue"))))
- (pointer ((t (nil))))
- (primary-selection ((t (:background "gray65" :foreground "DarkBlue"))))
- (red ((t (:foreground "red"))))
- (region ((t (:background "gray65" :foreground "DarkBlue"))))
- (right-margin ((t (nil))))
- (secondary-selection ((t (:background "paleturquoise" :foreground "black"))))
- (shell-option-face ((t (:foreground "blue4"))))
- (shell-output-2-face ((t (:foreground "green4"))))
- (shell-output-3-face ((t (:foreground "green4"))))
- (shell-output-face ((t (:bold t))))
- (shell-prompt-face ((t (:foreground "red4"))))
- (text-cursor ((t (:background "Red3" :foreground "black"))))
- (toolbar ((t (:background "Gray80" :foreground "black"))))
- (underline ((t (:underline t))))
- (vertical-divider ((t (nil))))
- (vm-xface ((t (:background "white" :foreground "black"))))
- (vmpc-pre-sig-face ((t (:foreground "forestgreen"))))
- (vmpc-sig-face ((t (:foreground "steelblue"))))
- (widget ((t (nil))))
- (widget-button-face ((t (:bold t))))
- (widget-button-pressed-face ((t (:foreground "red"))))
- (widget-documentation-face ((t (:foreground "dark green"))))
- (widget-field-face ((t (:background "gray85" :foreground "black"))))
- (widget-inactive-face ((t (:foreground "dim gray"))))
- (x-face ((t (:background "white" :foreground "black"))))
- (xrdb-option-name-face ((t (:foreground "red"))))
- (yellow ((t (:foreground "yellow"))))
- (zmacs-region ((t (:background "gray65")))))))
-
- (defun color-theme-digital-ofs1 ()
- "Color theme by Gareth Owen, created 2001-06-13.
- This works well on an old, beat-up Digital Unix box with its 256 colour
- display, on which other color themes hog too much of the palette.
- Black on some shade of dark peach. Includes bbdb, cperl, custom,
- cvs, diff, dired, ediff, erc, eshell, font-latex, font-lock, gnus,
- highlight, hproperty, html-helper, hyper-apropos, info, jde, man,
- message, paren, searchm, semantic, sgml, shell, speedbar, term,
- vhdl, viper, w3m, widget, woman, x-symbol, xref."
- (interactive)
- (color-theme-install
- '(color-theme-digital-ofs1
- ((background-color . "#CA94AA469193")
- (background-mode . light)
- (background-toolbar-color . "#cf3ccf3ccf3c")
- (border-color . "black")
- (bottom-toolbar-shadow-color . "#79e77df779e7")
- (cursor-color . "Black")
- (foreground-color . "Black")
- (mouse-color . "Black")
- (top-toolbar-shadow-color . "#fffffbeeffff")
- (viper-saved-cursor-color-in-replace-mode . "Red3"))
- ((Man-overstrike-face . bold)
- (Man-underline-face . underline)
- (gnus-mouse-face . highlight)
- (goto-address-mail-face . italic)
- (goto-address-mail-mouse-face . secondary-selection)
- (goto-address-url-face . bold)
- (goto-address-url-mouse-face . highlight)
- (ispell-highlight-face . highlight)
- (list-matching-lines-face . bold)
- (rmail-highlight-face . font-lock-function-name-face)
- (view-highlight-face . highlight))
- (default ((t (:bold t))))
- (bbdb-company ((t (:italic t))))
- (bbdb-field-name ((t (:bold t))))
- (bbdb-field-value ((t (nil))))
- (bbdb-name ((t (:underline t))))
- (blank-space-face ((t (nil))))
- (blank-tab-face ((t (nil))))
- (blue ((t (:bold t :foreground "blue"))))
- (bold ((t (:bold t))))
- (bold-italic ((t (:italic t :bold t))))
- (border-glyph ((t (:bold t))))
- (buffers-tab ((t (:background "black" :foreground "LightSkyBlue"))))
- (calendar-today-face ((t (:underline t :bold t :foreground "white"))))
- (comint-input-face ((t (nil))))
- (cperl-array-face ((t (:bold t :background "lightyellow2" :foreground "Blue"))))
- (cperl-hash-face ((t (:italic t :bold t :background "lightyellow2" :foreground "Red"))))
- (cperl-here-face ((t (nil))))
- (cperl-invalid-face ((t (:foreground "white"))))
- (cperl-nonoverridable-face ((t (:foreground "chartreuse3"))))
- (cperl-pod-face ((t (nil))))
- (cperl-pod-head-face ((t (nil))))
- (custom-button-face ((t (:bold t))))
- (custom-changed-face ((t (:bold t :background "blue" :foreground "white"))))
- (custom-comment-face ((t (:foreground "white"))))
- (custom-comment-tag-face ((t (:foreground "white"))))
- (custom-documentation-face ((t (:bold t))))
- (custom-face-tag-face ((t (:underline t :bold t))))
- (custom-group-tag-face ((t (:underline t :bold t :foreground "DarkBlue"))))
- (custom-group-tag-face-1 ((t (:underline t :bold t :foreground "red"))))
- (custom-invalid-face ((t (:bold t :background "red" :foreground "yellow"))))
- (custom-modified-face ((t (:bold t :background "blue" :foreground "white"))))
- (custom-rogue-face ((t (:bold t :background "black" :foreground "pink"))))
- (custom-saved-face ((t (:underline t :bold t))))
- (custom-set-face ((t (:bold t :background "white" :foreground "blue"))))
- (custom-state-face ((t (:bold t :foreground "dark green"))))
- (custom-variable-button-face ((t (:underline t :bold t))))
- (custom-variable-tag-face ((t (:underline t :bold t :foreground "blue"))))
- (cvs-filename-face ((t (:foreground "white"))))
- (cvs-handled-face ((t (:foreground "pink"))))
- (cvs-header-face ((t (:bold t :foreground "green"))))
- (cvs-marked-face ((t (:bold t :foreground "green3"))))
- (cvs-msg-face ((t (:italic t :foreground "red"))))
- (cvs-need-action-face ((t (:foreground "yellow"))))
- (cvs-unknown-face ((t (:foreground "grey"))))
- (cyan ((t (:foreground "cyan"))))
- (diary-face ((t (:bold t :foreground "red"))))
- (diff-added-face ((t (nil))))
- (diff-changed-face ((t (nil))))
- (diff-file-header-face ((t (:bold t :background "grey70"))))
- (diff-hunk-header-face ((t (:background "grey85"))))
- (diff-index-face ((t (:bold t :background "grey70"))))
- (diff-removed-face ((t (nil))))
- (dired-face-boring ((t (:foreground "Gray65"))))
- (dired-face-directory ((t (:bold t))))
- (dired-face-executable ((t (:foreground "SeaGreen"))))
- (dired-face-flagged ((t (:background "LightSlateGray"))))
- (dired-face-header ((t (:background "grey75" :foreground "black"))))
- (dired-face-marked ((t (:background "PaleVioletRed"))))
- (dired-face-permissions ((t (:background "grey75" :foreground "black"))))
- (dired-face-setuid ((t (:foreground "Red"))))
- (dired-face-socket ((t (:foreground "magenta"))))
- (dired-face-symlink ((t (:foreground "cyan"))))
- (display-time-mail-balloon-enhance-face ((t (:bold t :background "orange"))))
- (display-time-mail-balloon-gnus-group-face ((t (:bold t :foreground "blue"))))
- (display-time-time-balloon-face ((t (:bold t :foreground "red"))))
- (ediff-current-diff-face-A ((t (:background "pale green" :foreground "firebrick"))))
- (ediff-current-diff-face-Ancestor ((t (:background "VioletRed" :foreground "Black"))))
- (ediff-current-diff-face-B ((t (:background "Yellow" :foreground "DarkOrchid"))))
- (ediff-current-diff-face-C ((t (:background "Pink" :foreground "Navy"))))
- (ediff-even-diff-face-A ((t (:background "light grey" :foreground "Black"))))
- (ediff-even-diff-face-Ancestor ((t (:background "Grey" :foreground "White"))))
- (ediff-even-diff-face-B ((t (:background "Grey" :foreground "White"))))
- (ediff-even-diff-face-C ((t (:background "light grey" :foreground "Black"))))
- (ediff-fine-diff-face-A ((t (:background "sky blue" :foreground "Navy"))))
- (ediff-fine-diff-face-Ancestor ((t (:background "Green" :foreground "Black"))))
- (ediff-fine-diff-face-B ((t (:background "cyan" :foreground "Black"))))
- (ediff-fine-diff-face-C ((t (:background "Turquoise" :foreground "Black"))))
- (ediff-odd-diff-face-A ((t (:background "Grey" :foreground "White"))))
- (ediff-odd-diff-face-Ancestor ((t (:background "light grey" :foreground "Black"))))
- (ediff-odd-diff-face-B ((t (:background "light grey" :foreground "Black"))))
- (ediff-odd-diff-face-C ((t (:background "Grey" :foreground "White"))))
- (erc-action-face ((t (:bold t))))
- (erc-bold-face ((t (:bold t))))
- (erc-default-face ((t (nil))))
- (erc-direct-msg-face ((t (nil))))
- (erc-error-face ((t (:bold t))))
- (erc-input-face ((t (nil))))
- (erc-inverse-face ((t (nil))))
- (erc-notice-face ((t (nil))))
- (erc-pal-face ((t (nil))))
- (erc-prompt-face ((t (nil))))
- (erc-underline-face ((t (nil))))
- (eshell-ls-archive-face ((t (:bold t :foreground "Orchid"))))
- (eshell-ls-backup-face ((t (:foreground "OrangeRed"))))
- (eshell-ls-clutter-face ((t (:bold t :foreground "OrangeRed"))))
- (eshell-ls-directory-face ((t (:bold t :foreground "Blue"))))
- (eshell-ls-executable-face ((t (:bold t :foreground "ForestGreen"))))
- (eshell-ls-missing-face ((t (:bold t :foreground "Red"))))
- (eshell-ls-picture-face ((t (:foreground "Violet"))))
- (eshell-ls-product-face ((t (:foreground "OrangeRed"))))
- (eshell-ls-readonly-face ((t (:foreground "Brown"))))
- (eshell-ls-special-face ((t (:bold t :foreground "Magenta"))))
- (eshell-ls-symlink-face ((t (:bold t :foreground "DarkCyan"))))
- (eshell-ls-text-face ((t (:foreground "medium aquamarine"))))
- (eshell-ls-todo-face ((t (:bold t :foreground "aquamarine"))))
- (eshell-ls-unreadable-face ((t (:foreground "Grey30"))))
- (eshell-prompt-face ((t (:bold t :foreground "Red"))))
- (eshell-test-failed-face ((t (:bold t :foreground "OrangeRed"))))
- (eshell-test-ok-face ((t (:bold t :foreground "Green"))))
- (excerpt ((t (:italic t))))
- (ff-paths-non-existant-file-face ((t (:bold t :foreground "NavyBlue"))))
- (fg:black ((t (:foreground "black"))))
- (fixed ((t (:bold t))))
- (fl-comment-face ((t (:foreground "medium purple"))))
- (fl-doc-string-face ((t (nil))))
- (fl-function-name-face ((t (:foreground "green"))))
- (fl-keyword-face ((t (:foreground "LightGreen"))))
- (fl-string-face ((t (:foreground "light coral"))))
- (fl-type-face ((t (:foreground "cyan"))))
- (flyspell-duplicate-face ((t (:underline t :bold t :foreground "Gold3"))))
- (flyspell-incorrect-face ((t (:underline t :bold t :foreground "OrangeRed"))))
- (font-latex-bold-face ((t (:bold t))))
- (font-latex-italic-face ((t (:italic t))))
- (font-latex-math-face ((t (nil))))
- (font-latex-sedate-face ((t (nil))))
- (font-latex-string-face ((t (nil))))
- (font-latex-warning-face ((t (nil))))
- (font-lock-builtin-face ((t (:italic t :bold t :foreground "Orchid"))))
- (font-lock-comment-face ((t (:bold t :foreground "Firebrick"))))
- (font-lock-constant-face ((t (:italic t :bold t :foreground "CadetBlue"))))
- (font-lock-doc-string-face ((t (:italic t :bold t :foreground "green4"))))
- (font-lock-emphasized-face ((t (:bold t))))
- (font-lock-exit-face ((t (:foreground "green"))))
- (font-lock-function-name-face ((t (:italic t :bold t :foreground "Blue"))))
- (font-lock-keyword-face ((t (:bold t :foreground "dark olive green"))))
- (font-lock-other-emphasized-face ((t (:italic t :bold t))))
- (font-lock-other-type-face ((t (:bold t :foreground "DarkBlue"))))
- (font-lock-preprocessor-face ((t (:italic t :bold t :foreground "blue3"))))
- (font-lock-reference-face ((t (:italic t :bold t :foreground "red3"))))
- (font-lock-special-comment-face ((t (nil))))
- (font-lock-special-keyword-face ((t (nil))))
- (font-lock-string-face ((t (:italic t :bold t :foreground "DarkBlue"))))
- (font-lock-type-face ((t (:italic t :bold t :foreground "DarkGreen"))))
- (font-lock-variable-name-face ((t (:italic t :bold t :foreground "darkgreen"))))
- (font-lock-warning-face ((t (:bold t :foreground "Red"))))
- (fringe ((t (:background "grey95"))))
- (gdb-arrow-face ((t (:bold t))))
- (gnus-cite-attribution-face ((t (:italic t :bold t))))
- (gnus-cite-face-1 ((t (:bold t :foreground "MidnightBlue"))))
- (gnus-cite-face-10 ((t (:foreground "medium purple"))))
- (gnus-cite-face-11 ((t (:foreground "turquoise"))))
- (gnus-cite-face-2 ((t (:bold t :foreground "firebrick"))))
- (gnus-cite-face-3 ((t (:bold t :foreground "dark green"))))
- (gnus-cite-face-4 ((t (:foreground "OrangeRed"))))
- (gnus-cite-face-5 ((t (:foreground "dark khaki"))))
- (gnus-cite-face-6 ((t (:bold t :foreground "dark violet"))))
- (gnus-cite-face-7 ((t (:foreground "SteelBlue4"))))
- (gnus-cite-face-8 ((t (:foreground "magenta"))))
- (gnus-cite-face-9 ((t (:foreground "violet"))))
- (gnus-cite-face-list ((t (nil))))
- (gnus-emphasis-bold ((t (:bold t))))
- (gnus-emphasis-bold-italic ((t (:italic t :bold t))))
- (gnus-emphasis-highlight-words ((t (:background "black" :foreground "yellow"))))
- (gnus-emphasis-italic ((t (:italic t))))
- (gnus-emphasis-underline ((t (:underline t))))
- (gnus-emphasis-underline-bold ((t (:underline t :bold t))))
- (gnus-emphasis-underline-bold-italic ((t (:underline t :italic t :bold t))))
- (gnus-emphasis-underline-italic ((t (:underline t :italic t))))
- (gnus-filterhist-face-1 ((t (nil))))
- (gnus-group-mail-1-empty-face ((t (:foreground "DeepPink3"))))
- (gnus-group-mail-1-face ((t (:bold t :foreground "DeepPink3"))))
- (gnus-group-mail-2-empty-face ((t (:foreground "HotPink3"))))
- (gnus-group-mail-2-face ((t (:bold t :foreground "HotPink3"))))
- (gnus-group-mail-3-empty-face ((t (:foreground "magenta4"))))
- (gnus-group-mail-3-face ((t (:bold t :foreground "magenta4"))))
- (gnus-group-mail-low-empty-face ((t (:foreground "DeepPink4"))))
- (gnus-group-mail-low-face ((t (:bold t :foreground "DeepPink4"))))
- (gnus-group-news-1-empty-face ((t (:foreground "ForestGreen"))))
- (gnus-group-news-1-face ((t (:bold t :foreground "ForestGreen"))))
- (gnus-group-news-2-empty-face ((t (:foreground "CadetBlue4"))))
- (gnus-group-news-2-face ((t (:bold t :foreground "CadetBlue4"))))
- (gnus-group-news-3-empty-face ((t (nil))))
- (gnus-group-news-3-face ((t (:bold t))))
- (gnus-group-news-4-empty-face ((t (nil))))
- (gnus-group-news-4-face ((t (:bold t))))
- (gnus-group-news-5-empty-face ((t (nil))))
- (gnus-group-news-5-face ((t (:bold t))))
- (gnus-group-news-6-empty-face ((t (nil))))
- (gnus-group-news-6-face ((t (:bold t))))
- (gnus-group-news-low-empty-face ((t (:foreground "DarkGreen"))))
- (gnus-group-news-low-face ((t (:bold t :foreground "DarkGreen"))))
- (gnus-header-content-face ((t (:italic t :foreground "indianred4"))))
- (gnus-header-from-face ((t (:bold t :foreground "red3"))))
- (gnus-header-name-face ((t (:bold t :foreground "maroon"))))
- (gnus-header-newsgroups-face ((t (:italic t :bold t :foreground "MidnightBlue"))))
- (gnus-header-subject-face ((t (:bold t :foreground "red4"))))
- (gnus-picons-face ((t (:background "white" :foreground "black"))))
- (gnus-picons-xbm-face ((t (:background "white" :foreground "black"))))
- (gnus-signature-face ((t (:italic t :bold t))))
- (gnus-splash ((t (nil))))
- (gnus-splash-face ((t (:foreground "Brown"))))
- (gnus-summary-cancelled-face ((t (:background "black" :foreground "yellow"))))
- (gnus-summary-high-ancient-face ((t (:bold t :foreground "RoyalBlue"))))
- (gnus-summary-high-read-face ((t (:bold t :foreground "DarkGreen"))))
- (gnus-summary-high-ticked-face ((t (:bold t :foreground "firebrick"))))
- (gnus-summary-high-unread-face ((t (:italic t :bold t))))
- (gnus-summary-low-ancient-face ((t (:italic t :foreground "RoyalBlue"))))
- (gnus-summary-low-read-face ((t (:italic t :foreground "DarkGreen"))))
- (gnus-summary-low-ticked-face ((t (:italic t :bold t :foreground "firebrick"))))
- (gnus-summary-low-unread-face ((t (:italic t))))
- (gnus-summary-normal-ancient-face ((t (:foreground "RoyalBlue"))))
- (gnus-summary-normal-read-face ((t (:foreground "DarkGreen"))))
- (gnus-summary-normal-ticked-face ((t (:bold t :foreground "firebrick"))))
- (gnus-summary-normal-unread-face ((t (:bold t))))
- (gnus-summary-selected-face ((t (:underline t))))
- (gnus-x-face ((t (:background "white" :foreground "black"))))
- (green ((t (:bold t :foreground "green"))))
- (gui-button-face ((t (:bold t :background "grey75" :foreground "black"))))
- (gui-element ((t (:bold t :background "Gray80"))))
- (highlight ((t (:bold t :background "darkseagreen2"))))
- (highlight-changes-delete-face ((t (:underline t :foreground "red"))))
- (highlight-changes-face ((t (:foreground "red"))))
- (highline-face ((t (:background "black" :foreground "white"))))
- (holiday-face ((t (:bold t :background "pink" :foreground "white"))))
- (hproperty:but-face ((t (:bold t))))
- (hproperty:flash-face ((t (:bold t))))
- (hproperty:highlight-face ((t (:bold t))))
- (hproperty:item-face ((t (:bold t))))
- (html-helper-bold-face ((t (:bold t))))
- (html-helper-bold-italic-face ((t (nil))))
- (html-helper-builtin-face ((t (:underline t :foreground "blue3"))))
- (html-helper-italic-face ((t (:italic t :bold t :foreground "yellow"))))
- (html-helper-underline-face ((t (:underline t))))
- (html-tag-face ((t (:bold t))))
- (hyper-apropos-documentation ((t (:foreground "white"))))
- (hyper-apropos-heading ((t (:bold t))))
- (hyper-apropos-hyperlink ((t (:foreground "sky blue"))))
- (hyper-apropos-major-heading ((t (:bold t))))
- (hyper-apropos-section-heading ((t (:bold t))))
- (hyper-apropos-warning ((t (:bold t :foreground "red"))))
- (ibuffer-marked-face ((t (:foreground "red"))))
- (info-menu-5 ((t (:underline t :bold t))))
- (info-menu-6 ((t (nil))))
- (info-node ((t (:italic t :bold t))))
- (info-xref ((t (:bold t))))
- (isearch ((t (:bold t :background "paleturquoise"))))
- (isearch-secondary ((t (:foreground "red3"))))
- (ispell-face ((t (:bold t))))
- (italic ((t (:italic t :bold t))))
- (jde-bug-breakpoint-cursor ((t (:background "brown" :foreground "cyan"))))
- (jde-bug-breakpoint-marker ((t (:background "yellow" :foreground "red"))))
- (jde-java-font-lock-link-face ((t (:underline t :foreground "blue"))))
- (jde-java-font-lock-number-face ((t (:foreground "RosyBrown"))))
- (lazy-highlight-face ((t (:bold t :foreground "dark magenta"))))
- (left-margin ((t (:bold t))))
- (linemenu-face ((t (nil))))
- (list-mode-item-selected ((t (:bold t :background "gray68"))))
- (magenta ((t (:foreground "magenta"))))
- (makefile-space-face ((t (:background "hotpink"))))
- (man-bold ((t (:bold t))))
- (man-heading ((t (:bold t))))
- (man-italic ((t (:foreground "yellow"))))
- (man-xref ((t (:underline t))))
- (message-cited-text ((t (:bold t :foreground "orange"))))
- (message-cited-text-face ((t (:bold t :foreground "red"))))
- (message-header-cc-face ((t (:bold t :foreground "MidnightBlue"))))
- (message-header-contents ((t (:italic t :bold t :foreground "white"))))
- (message-header-name-face ((t (:bold t :foreground "cornflower blue"))))
- (message-header-newsgroups-face ((t (:italic t :bold t :foreground "blue4"))))
- (message-header-other-face ((t (:bold t :foreground "steel blue"))))
- (message-header-subject-face ((t (:bold t :foreground "navy blue"))))
- (message-header-to-face ((t (:bold t :foreground "MidnightBlue"))))
- (message-header-xheader-face ((t (:bold t :foreground "blue"))))
- (message-headers ((t (:bold t :foreground "orange"))))
- (message-highlighted-header-contents ((t (:bold t))))
- (message-mml-face ((t (:bold t :foreground "ForestGreen"))))
- (message-separator-face ((t (:foreground "brown"))))
- (message-url ((t (:bold t :foreground "pink"))))
- (mmm-face ((t (:background "black" :foreground "green"))))
- (modeline ((t (:bold t :background "Black" :foreground "#CA94AA469193"))))
- (modeline-buffer-id ((t (:bold t :background "Gray80" :foreground "blue4"))))
- (modeline-mousable ((t (:bold t :background "Gray80" :foreground "firebrick"))))
- (modeline-mousable-minor-mode ((t (:bold t :background "Gray80" :foreground "green4"))))
- (my-tab-face ((t (nil))))
- (nil ((t (nil))))
- (p4-diff-del-face ((t (:bold t))))
- (paren-blink-off ((t (:foreground "gray80"))))
- (paren-face ((t (nil))))
- (paren-face-match ((t (nil))))
- (paren-face-mismatch ((t (nil))))
- (paren-face-no-match ((t (nil))))
- (paren-match ((t (:background "darkseagreen2"))))
- (paren-mismatch ((t (:background "DeepPink" :foreground "black"))))
- (paren-mismatch-face ((t (:bold t :background "DeepPink" :foreground "white"))))
- (paren-no-match-face ((t (:bold t :background "yellow" :foreground "white"))))
- (pointer ((t (:bold t))))
- (primary-selection ((t (:bold t :background "gray65"))))
- (red ((t (:bold t :foreground "red"))))
- (region ((t (:bold t :background "gray"))))
- (right-margin ((t (:bold t))))
- (searchm-buffer ((t (:bold t))))
- (searchm-button ((t (:bold t))))
- (searchm-field ((t (nil))))
- (searchm-field-label ((t (:bold t))))
- (searchm-highlight ((t (:bold t))))
- (secondary-selection ((t (:bold t :background "paleturquoise"))))
- (semantic-intangible-face ((t (:foreground "gray25"))))
- (semantic-read-only-face ((t (:background "gray25"))))
- (senator-momentary-highlight-face ((t (:background "gray70"))))
- (setnu-line-number-face ((t (:italic t :bold t))))
- (sgml-comment-face ((t (:foreground "dark green"))))
- (sgml-doctype-face ((t (:foreground "maroon"))))
- (sgml-end-tag-face ((t (:foreground "blue2"))))
- (sgml-entity-face ((t (:foreground "red2"))))
- (sgml-ignored-face ((t (:background "gray90" :foreground "maroon"))))
- (sgml-ms-end-face ((t (:foreground "maroon"))))
- (sgml-ms-start-face ((t (:foreground "maroon"))))
- (sgml-pi-face ((t (:foreground "maroon"))))
- (sgml-sgml-face ((t (:foreground "maroon"))))
- (sgml-short-ref-face ((t (:foreground "goldenrod"))))
- (sgml-start-tag-face ((t (:foreground "blue2"))))
- (shell-input-face ((t (:bold t))))
- (shell-option-face ((t (:bold t :foreground "blue4"))))
- (shell-output-2-face ((t (:bold t :foreground "green4"))))
- (shell-output-3-face ((t (:bold t :foreground "green4"))))
- (shell-output-face ((t (:bold t))))
- (shell-prompt-face ((t (:bold t :foreground "red4"))))
- (show-paren-match-face ((t (:bold t :background "turquoise"))))
- (show-paren-mismatch-face ((t (:bold t :background "purple" :foreground "white"))))
- (speedbar-button-face ((t (:bold t :foreground "magenta"))))
- (speedbar-directory-face ((t (:bold t :foreground "orchid"))))
- (speedbar-file-face ((t (:bold t :foreground "pink"))))
- (speedbar-highlight-face ((t (:background "black"))))
- (speedbar-selected-face ((t (:underline t :foreground "cyan"))))
- (speedbar-tag-face ((t (:foreground "yellow"))))
- (swbuff-current-buffer-face ((t (:bold t :foreground "red"))))
- (template-message-face ((t (:bold t))))
- (term-black ((t (:foreground "black"))))
- (term-blackbg ((t (:background "black"))))
- (term-blue ((t (:foreground "blue"))))
- (term-blue-bold-face ((t (:bold t :background "snow2" :foreground "blue"))))
- (term-blue-face ((t (:foreground "blue"))))
- (term-blue-inv-face ((t (:background "blue"))))
- (term-blue-ul-face ((t (:underline t :background "snow2" :foreground "blue"))))
- (term-bluebg ((t (:background "blue"))))
- (term-bold ((t (:bold t))))
- (term-cyan ((t (:foreground "cyan"))))
- (term-cyan-bold-face ((t (:bold t :background "snow2" :foreground "cyan"))))
- (term-cyan-face ((t (:foreground "cyan"))))
- (term-cyan-inv-face ((t (:background "cyan"))))
- (term-cyan-ul-face ((t (:underline t :background "snow2" :foreground "cyan"))))
- (term-cyanbg ((t (:background "cyan"))))
- (term-default-bg ((t (nil))))
- (term-default-bg-inv ((t (nil))))
- (term-default-bold-face ((t (:bold t :background "snow2" :foreground "darkslategray"))))
- (term-default-face ((t (:background "snow2" :foreground "darkslategray"))))
- (term-default-fg ((t (nil))))
- (term-default-fg-inv ((t (nil))))
- (term-default-inv-face ((t (:background "darkslategray" :foreground "snow2"))))
- (term-default-ul-face ((t (:underline t :background "snow2" :foreground "darkslategray"))))
- (term-green ((t (:foreground "green"))))
- (term-green-bold-face ((t (:bold t :background "snow2" :foreground "green"))))
- (term-green-face ((t (:foreground "green"))))
- (term-green-inv-face ((t (:background "green"))))
- (term-green-ul-face ((t (:underline t :background "snow2" :foreground "green"))))
- (term-greenbg ((t (:background "green"))))
- (term-invisible ((t (nil))))
- (term-invisible-inv ((t (nil))))
- (term-magenta ((t (:foreground "magenta"))))
- (term-magenta-bold-face ((t (:bold t :background "snow2" :foreground "magenta"))))
- (term-magenta-face ((t (:foreground "magenta"))))
- (term-magenta-inv-face ((t (:background "magenta"))))
- (term-magenta-ul-face ((t (:underline t :background "snow2" :foreground "magenta"))))
- (term-magentabg ((t (:background "magenta"))))
- (term-red ((t (:foreground "red"))))
- (term-red-bold-face ((t (:bold t :background "snow2" :foreground "red"))))
- (term-red-face ((t (:foreground "red"))))
- (term-red-inv-face ((t (:background "red"))))
- (term-red-ul-face ((t (:underline t :background "snow2" :foreground "red"))))
- (term-redbg ((t (:background "red"))))
- (term-underline ((t (:underline t))))
- (term-white ((t (:foreground "white"))))
- (term-white-bold-face ((t (:bold t :background "snow2" :foreground "white"))))
- (term-white-face ((t (:foreground "white"))))
- (term-white-inv-face ((t (:background "snow2"))))
- (term-white-ul-face ((t (:underline t :background "snow2" :foreground "white"))))
- (term-whitebg ((t (:background "white"))))
- (term-yellow ((t (:foreground "yellow"))))
- (term-yellow-bold-face ((t (:bold t :background "snow2" :foreground "yellow"))))
- (term-yellow-face ((t (:foreground "yellow"))))
- (term-yellow-inv-face ((t (:background "yellow"))))
- (term-yellow-ul-face ((t (:underline t :background "snow2" :foreground "yellow"))))
- (term-yellowbg ((t (:background "yellow"))))
- (text-cursor ((t (:bold t :background "Red3" :foreground "gray80"))))
- (toolbar ((t (:bold t :background "Gray80"))))
- (underline ((t (:underline t :bold t))))
- (vc-annotate-face-0046FF ((t (nil))))
- (vcursor ((t (:underline t :background "cyan" :foreground "blue"))))
- (vertical-divider ((t (:bold t :background "Gray80"))))
- (vhdl-font-lock-attribute-face ((t (:foreground "Orchid"))))
- (vhdl-font-lock-directive-face ((t (:foreground "CadetBlue"))))
- (vhdl-font-lock-enumvalue-face ((t (:foreground "Gold4"))))
- (vhdl-font-lock-function-face ((t (:foreground "Orchid4"))))
- (vhdl-font-lock-generic-/constant-face ((t (nil))))
- (vhdl-font-lock-prompt-face ((t (:bold t :foreground "Red"))))
- (vhdl-font-lock-reserved-words-face ((t (:bold t :foreground "Orange"))))
- (vhdl-font-lock-translate-off-face ((t (:background "LightGray"))))
- (vhdl-font-lock-type-face ((t (nil))))
- (vhdl-font-lock-variable-face ((t (nil))))
- (vhdl-speedbar-architecture-face ((t (:foreground "Blue"))))
- (vhdl-speedbar-architecture-selected-face ((t (:underline t :foreground "Blue"))))
- (vhdl-speedbar-configuration-face ((t (:foreground "DarkGoldenrod"))))
- (vhdl-speedbar-configuration-selected-face ((t (:underline t :foreground "DarkGoldenrod"))))
- (vhdl-speedbar-entity-face ((t (:foreground "ForestGreen"))))
- (vhdl-speedbar-entity-selected-face ((t (:underline t :foreground "ForestGreen"))))
- (vhdl-speedbar-instantiation-face ((t (:foreground "Brown"))))
- (vhdl-speedbar-instantiation-selected-face ((t (:underline t :foreground "Brown"))))
- (vhdl-speedbar-package-face ((t (:foreground "Grey50"))))
- (vhdl-speedbar-package-selected-face ((t (:underline t :foreground "Grey50"))))
- (vhdl-speedbar-subprogram-face ((t (nil))))
- (viper-minibuffer-emacs-face ((t (:background "darkseagreen2" :foreground "Black"))))
- (viper-minibuffer-insert-face ((t (:background "pink" :foreground "Black"))))
- (viper-minibuffer-vi-face ((t (:background "grey" :foreground "DarkGreen"))))
- (viper-replace-overlay-face ((t (:background "darkseagreen2" :foreground "Black"))))
- (viper-search-face ((t (:background "khaki" :foreground "Black"))))
- (vm-xface ((t (:background "white" :foreground "black"))))
- (vmpc-pre-sig-face ((t (:foreground "forestgreen"))))
- (vmpc-sig-face ((t (:foreground "steelblue"))))
- (vvb-face ((t (nil))))
- (w3m-anchor-face ((t (:bold t :foreground "DodgerBlue1"))))
- (w3m-arrived-anchor-face ((t (:bold t :foreground "DodgerBlue3"))))
- (w3m-header-line-location-content-face ((t (:background "dark olive green" :foreground "wheat"))))
- (w3m-header-line-location-title-face ((t (:background "dark olive green" :foreground "beige"))))
- (white ((t (:foreground "white"))))
- (widget ((t (nil))))
- (widget-button-face ((t (:bold t))))
- (widget-button-pressed-face ((t (:bold t :foreground "red"))))
- (widget-documentation-face ((t (:bold t :foreground "dark green"))))
- (widget-field-face ((t (:bold t :background "gray85"))))
- (widget-inactive-face ((t (:bold t :foreground "dim gray"))))
- (widget-single-line-field-face ((t (:background "gray85"))))
- (woman-bold-face ((t (:bold t))))
- (woman-italic-face ((t (:foreground "beige"))))
- (woman-unknown-face ((t (:foreground "LightSalmon"))))
- (x-face ((t (:bold t :background "white" :foreground "black"))))
- (x-symbol-adobe-fontspecific-face ((t (nil))))
- (x-symbol-face ((t (nil))))
- (x-symbol-heading-face ((t (:bold t))))
- (x-symbol-info-face ((t (nil))))
- (x-symbol-invisible-face ((t (nil))))
- (x-symbol-revealed-face ((t (nil))))
- (xrdb-option-name-face ((t (:foreground "red"))))
- (xref-keyword-face ((t (:foreground "blue"))))
- (xref-list-default-face ((t (nil))))
- (xref-list-pilot-face ((t (:foreground "navy"))))
- (xref-list-symbol-face ((t (:foreground "navy"))))
- (yellow ((t (:bold t :foreground "yellow"))))
- (zmacs-region ((t (:bold t :background "gray65")))))))
-
- (defun color-theme-mistyday ()
- "Color theme by K.C. Hari Kumar, created 2001-06-13.
- Black on mistyrose. Includes CUA, calendar, diary, font-latex and
- font-lock. Uses backgrounds on some font-lock faces."
- (interactive)
- (color-theme-install
- '(color-theme-mistyday
- ((background-color . "mistyrose")
- (background-mode . light)
- (border-color . "black")
- (cursor-color . "deep pink")
- (foreground-color . "Black")
- (mouse-color . "black"))
- ((goto-address-mail-face . italic)
- (goto-address-mail-mouse-face . secondary-selection)
- (goto-address-url-face . bold)
- (goto-address-url-mouse-face . highlight)
- (list-matching-lines-face . bold)
- (paren-match-face . paren-face-match)
- (paren-mismatch-face . paren-face-mismatch)
- (paren-no-match-face . paren-face-no-match))
- (default ((t (nil))))
- (CUA-global-mark-face ((t (:background "cyan" :foreground "black"))))
- (CUA-rectangle-face ((t (:background "maroon" :foreground "white"))))
- (CUA-rectangle-noselect-face ((t (:background "dimgray" :foreground "white"))))
- (bold ((t (:bold t))))
- (bold-italic ((t (:italic t :bold t))))
- (calendar-today-face ((t (:underline t :background "Spring Green" :foreground "Brown"))))
- (custom-button-face ((t (:background "dark slate grey" :foreground "azure"))))
- (custom-documentation-face ((t (:background "white" :foreground "blue"))))
- (diary-face ((t (:background "navy" :foreground "yellow"))))
- (font-latex-bold-face ((t (:bold t :foreground "DarkOliveGreen"))))
- (font-latex-italic-face ((t (:italic t :foreground "DarkOliveGreen"))))
- (font-latex-math-face ((t (:foreground "navy"))))
- (font-latex-sedate-face ((t (:foreground "DimGray"))))
- (font-latex-string-face ((t (nil))))
- (font-latex-warning-face ((t (nil))))
- (font-lock-builtin-face ((t (:background "DarkTurquoise" :foreground "Navy"))))
- (font-lock-comment-face ((t (:italic t :foreground "royal blue"))))
- (font-lock-constant-face ((t (:background "pale green" :foreground "dark slate blue"))))
- (font-lock-doc-string-face ((t (:background "medium aquamarine" :foreground "deep pink"))))
- (font-lock-function-name-face ((t (:background "SpringGreen" :foreground "MidnightBlue"))))
- (font-lock-keyword-face ((t (:foreground "dark magenta"))))
- (font-lock-preprocessor-face ((t (:background "pale green" :foreground "dark slate blue"))))
- (font-lock-reference-face ((t (:background "DarkTurquoise" :foreground "Navy"))))
- (font-lock-string-face ((t (:background "medium aquamarine" :foreground "deep pink"))))
- (font-lock-type-face ((t (:background "steel blue" :foreground "khaki"))))
- (font-lock-variable-name-face ((t (:background "thistle" :foreground "orange red"))))
- (font-lock-warning-face ((t (:background "LemonChiffon" :foreground "Red"))))
- (highlight ((t (:background "dark slate grey" :foreground "light cyan"))))
- (holiday-face ((t (:background "orangered" :foreground "lightyellow"))))
- (ido-first-match-face ((t (:bold t))))
- (ido-only-match-face ((t (:foreground "ForestGreen"))))
- (ido-subdir-face ((t (:foreground "red"))))
- (italic ((t (:italic t))))
- (isearch ((t (:background "sienna" :foreground "light cyan"))))
- (modeline ((t (:background "Royalblue4" :foreground "lawn green"))))
- (modeline-buffer-id ((t (:background "Royalblue4" :foreground "lawn green"))))
- (modeline-mousable ((t (:background "Royalblue4" :foreground "lawn green"))))
- (modeline-mousable-minor-mode ((t (:background "Royalblue4" :foreground "lawn green"))))
- (paren-face-match ((t (:background "turquoise"))))
- (paren-face-mismatch ((t (:background "purple" :foreground "white"))))
- (paren-face-no-match ((t (:background "yellow" :foreground "black"))))
- (primary-selection ((t (:background "sienna" :foreground "light cyan"))))
- (region ((t (:background "sienna" :foreground "light cyan"))))
- (secondary-selection ((t (:background "forest green" :foreground "white smoke"))))
- (underline ((t (:underline t))))
- (zmacs-region ((t (:background "sienna" :foreground "light cyan")))))))
-
- (defun color-theme-marine ()
- "Color theme by Girish Bharadwaj, created 2001-06-22.
- Matches the MS Windows Marine color theme.
- Includes custom, font-lock, paren, widget."
- (interactive)
- (color-theme-install
- '(color-theme-marine
- ((background-color . "#9dcec9")
- (background-mode . light)
- (border-color . "black")
- (cursor-color . "yellow")
- (foreground-color . "darkslategray")
- (mouse-color . "sienna1"))
- ((buffers-tab-face . buffers-tab)
- (gnus-mouse-face . highlight)
- (smiley-mouse-face . highlight))
- (default ((t (nil))))
- (blue ((t (:foreground "blue"))))
- (bold ((t (:bold t))))
- (bold-italic ((t (nil))))
- (border-glyph ((t (nil))))
- (buffers-tab ((t (:background "#9dcec9" :foreground "darkslategray"))))
- (custom-button-face ((t (nil))))
- (custom-changed-face ((t (:background "blue" :foreground "white"))))
- (custom-comment-face ((t (:background "gray85"))))
- (custom-comment-tag-face ((t (:foreground "blue4"))))
- (custom-documentation-face ((t (nil))))
- (custom-face-tag-face ((t (:underline t))))
- (custom-group-tag-face ((t (:underline t :foreground "blue"))))
- (custom-group-tag-face-1 ((t (:underline t :foreground "deeppink"))))
- (custom-invalid-face ((t (:background "red" :foreground "yellow"))))
- (custom-modified-face ((t (:background "blue" :foreground "white"))))
- (custom-rogue-face ((t (:background "black" :foreground "pink"))))
- (custom-saved-face ((t (:underline t))))
- (custom-set-face ((t (:background "white" :foreground "blue"))))
- (custom-state-face ((t (:foreground "darkgreen"))))
- (custom-variable-button-face ((t (:underline t :bold t))))
- (custom-variable-tag-face ((t (:underline t :foreground "blue"))))
- (display-time-mail-balloon-enhance-face ((t (:background "orange"))))
- (display-time-mail-balloon-gnus-group-face ((t (:foreground "blue"))))
- (display-time-time-balloon-face ((t (:foreground "red"))))
- (font-lock-builtin-face ((t (:foreground "SteelBlue"))))
- (font-lock-comment-face ((t (:foreground "cadetblue"))))
- (font-lock-constant-face ((t (:foreground "OrangeRed"))))
- (font-lock-doc-string-face ((t (:foreground "Salmon"))))
- (font-lock-function-name-face ((t (:bold t :foreground "NavyBlue"))))
- (font-lock-keyword-face ((t (:bold t :foreground "purple"))))
- (font-lock-preprocessor-face ((t (:foreground "SteelBlue"))))
- (font-lock-reference-face ((t (:foreground "SteelBlue"))))
- (font-lock-string-face ((t (:foreground "royalblue"))))
- (font-lock-type-face ((t (:foreground "darkmagenta"))))
- (font-lock-variable-name-face ((t (:foreground "violetred"))))
- (font-lock-warning-face ((t (:bold t :foreground "red"))))
- (green ((t (:foreground "green"))))
- (gui-button-face ((t (:background "grey75" :foreground "black"))))
- (gui-element ((t (:background "#489088" :foreground "black"))))
- (highlight ((t (:background "darkolivegreen" :foreground "white"))))
- (isearch ((t (:background "blue"))))
- (isearch-secondary ((t (:foreground "red3"))))
- (italic ((t (nil))))
- (left-margin ((t (nil))))
- (list-mode-item-selected ((t (:background "gray68" :foreground "darkslategray"))))
- (modeline ((t (:background "black" :foreground "white"))))
- (modeline-buffer-id ((t (:background "black" :foreground "white"))))
- (modeline-mousable ((t (:background "black" :foreground "white"))))
- (modeline-mousable-minor-mode ((t (:background "black" :foreground "white"))))
- (paren-blink-off ((t (:foreground "black"))))
- (paren-match ((t (:background "darkolivegreen" :foreground "white"))))
- (paren-mismatch ((t (:background "#9dcec9" :foreground "darkslategray"))))
- (pointer ((t (nil))))
- (primary-selection ((t (:background "blue"))))
- (red ((t (:foreground "red"))))
- (region ((t (:background "blue"))))
- (right-margin ((t (nil))))
- (secondary-selection ((t (:background "darkslateblue" :foreground "white"))))
- (template-message-face ((t (:bold t))))
- (text-cursor ((t (:background "yellow" :foreground "#9dcec9"))))
- (toolbar ((t (nil))))
- (underline ((t (:underline t))))
- (vertical-divider ((t (nil))))
- (widget ((t (nil))))
- (widget-button-face ((t (:bold t))))
- (widget-button-pressed-face ((t (:foreground "red"))))
- (widget-documentation-face ((t (:foreground "forestgreen"))))
- (widget-field-face ((t (:background "gray"))))
- (widget-inactive-face ((t (:foreground "dimgray"))))
- (widget-single-line-field-face ((t (:background "dim gray" :foreground "white"))))
- (yellow ((t (:foreground "yellow"))))
- (zmacs-region ((t (:background "blue")))))))
-
- (defun color-theme-blue-erc ()
- "Color theme for erc faces only.
- This is intended for other color themes to use (eg. `color-theme-gnome2')."
- (color-theme-install
- '(color-theme-blue-erc
- nil
- (erc-action-face ((t (nil))))
- (erc-bold-face ((t (:bold t))))
- (erc-current-nick-face ((t (:bold t :foreground "yellow"))))
- (erc-default-face ((t (nil))))
- (erc-direct-msg-face ((t (:foreground "pale green"))))
- (erc-error-face ((t (:bold t :foreground "IndianRed"))))
- (erc-highlight-face ((t (:bold t :foreground "pale green"))))
- (erc-input-face ((t (:foreground "light blue"))))
- (erc-inverse-face ((t (:background "steel blue"))))
- (erc-keyword-face ((t (:foreground "orange" :bold t))))
- (erc-notice-face ((t (:foreground "light salmon"))))
- (erc-notice-face ((t (:foreground "MediumAquamarine"))))
- (erc-pal-face ((t (:foreground "pale green"))))
- (erc-prompt-face ((t (:foreground "light blue" :bold t))))
- (fg:erc-color-face0 ((t (:foreground "white"))))
- (fg:erc-color-face1 ((t (:foreground "beige"))))
- (fg:erc-color-face2 ((t (:foreground "lemon chiffon"))))
- (fg:erc-color-face3 ((t (:foreground "light cyan"))))
- (fg:erc-color-face4 ((t (:foreground "powder blue"))))
- (fg:erc-color-face5 ((t (:foreground "sky blue"))))
- (fg:erc-color-face6 ((t (:foreground "dark sea green"))))
- (fg:erc-color-face7 ((t (:foreground "pale green"))))
- (fg:erc-color-face8 ((t (:foreground "medium spring green"))))
- (fg:erc-color-face9 ((t (:foreground "khaki"))))
- (fg:erc-color-face10 ((t (:foreground "pale goldenrod"))))
- (fg:erc-color-face11 ((t (:foreground "light goldenrod yellow"))))
- (fg:erc-color-face12 ((t (:foreground "light yellow"))))
- (fg:erc-color-face13 ((t (:foreground "yellow"))))
- (fg:erc-color-face14 ((t (:foreground "light goldenrod"))))
- (fg:erc-color-face15 ((t (:foreground "lime green"))))
- (bg:erc-color-face0 ((t (nil))))
- (bg:erc-color-face1 ((t (nil))))
- (bg:erc-color-face2 ((t (nil))))
- (bg:erc-color-face3 ((t (nil))))
- (bg:erc-color-face4 ((t (nil))))
- (bg:erc-color-face5 ((t (nil))))
- (bg:erc-color-face6 ((t (nil))))
- (bg:erc-color-face7 ((t (nil))))
- (bg:erc-color-face8 ((t (nil))))
- (bg:erc-color-face9 ((t (nil))))
- (bg:erc-color-face10 ((t (nil))))
- (bg:erc-color-face11 ((t (nil))))
- (bg:erc-color-face12 ((t (nil))))
- (bg:erc-color-face13 ((t (nil))))
- (bg:erc-color-face14 ((t (nil))))
- (bg:erc-color-face15 ((t (nil)))))))
-
- (defun color-theme-dark-erc ()
- "Color theme for erc faces only.
- This is intended for other color themes to use (eg. `color-theme-late-night')."
- (interactive)
- (color-theme-install
- '(color-theme-dark-erc
- nil
- (erc-action-face ((t (nil))))
- (erc-bold-face ((t (:bold t))))
- (erc-current-nick-face ((t (:bold t))))
- (erc-default-face ((t (nil))))
- (erc-direct-msg-face ((t (nil))))
- (erc-error-face ((t (:bold t :foreground "IndianRed"))))
- (erc-highlight-face ((t (:bold t :foreground "pale green"))))
- (erc-input-face ((t (:foreground "#555"))))
- (erc-inverse-face ((t (:background "steel blue"))))
- (erc-keyword-face ((t (:foreground "#999" :bold t))))
- (erc-nick-msg-face ((t (:foreground "#888"))))
- (erc-notice-face ((t (:foreground "#444"))))
- (erc-pal-face ((t (:foreground "#888"))))
- (erc-prompt-face ((t (:foreground "#777" :bold t))))
- (erc-timestamp-face ((t (:foreground "#777" :bold t))))
- (fg:erc-color-face0 ((t (:foreground "white"))))
- (fg:erc-color-face1 ((t (:foreground "beige"))))
- (fg:erc-color-face2 ((t (:foreground "lemon chiffon"))))
- (fg:erc-color-face3 ((t (:foreground "light cyan"))))
- (fg:erc-color-face4 ((t (:foreground "powder blue"))))
- (fg:erc-color-face5 ((t (:foreground "sky blue"))))
- (fg:erc-color-face6 ((t (:foreground "dark sea green"))))
- (fg:erc-color-face7 ((t (:foreground "pale green"))))
- (fg:erc-color-face8 ((t (:foreground "medium spring green"))))
- (fg:erc-color-face9 ((t (:foreground "khaki"))))
- (fg:erc-color-face10 ((t (:foreground "pale goldenrod"))))
- (fg:erc-color-face11 ((t (:foreground "light goldenrod yellow"))))
- (fg:erc-color-face12 ((t (:foreground "light yellow"))))
- (fg:erc-color-face13 ((t (:foreground "yellow"))))
- (fg:erc-color-face14 ((t (:foreground "light goldenrod"))))
- (fg:erc-color-face15 ((t (:foreground "lime green"))))
- (bg:erc-color-face0 ((t (nil))))
- (bg:erc-color-face1 ((t (nil))))
- (bg:erc-color-face2 ((t (nil))))
- (bg:erc-color-face3 ((t (nil))))
- (bg:erc-color-face4 ((t (nil))))
- (bg:erc-color-face5 ((t (nil))))
- (bg:erc-color-face6 ((t (nil))))
- (bg:erc-color-face7 ((t (nil))))
- (bg:erc-color-face8 ((t (nil))))
- (bg:erc-color-face9 ((t (nil))))
- (bg:erc-color-face10 ((t (nil))))
- (bg:erc-color-face11 ((t (nil))))
- (bg:erc-color-face12 ((t (nil))))
- (bg:erc-color-face13 ((t (nil))))
- (bg:erc-color-face14 ((t (nil))))
- (bg:erc-color-face15 ((t (nil)))))))
-
- (defun color-theme-subtle-blue ()
- "Color theme by Chris McMahan, created 2001-09-06.
- Light blue background. Includes bbdb, comint, cperl, custom, cvs,
- diary, dired, display-time, ecb, ediff, erc, eshell, font-lock,
- gnus, html-helper, info, isearch, jde, message, paren, semantic,
- sgml, speedbar, term, vhdl, viper, vm, widget, woman, xref, xxml."
- (interactive)
- (color-theme-install
- '(color-theme-subtle-blue
- ((background-color . "#65889C")
- (background-mode . dark)
- (background-toolbar-color . "#cf3ccf3ccf3c")
- (border-color . "black")
- (bottom-toolbar-shadow-color . "#79e77df779e7")
- (cursor-color . "white")
- (foreground-color . "#eedfcc")
- (mouse-color . "Grey")
- (top-toolbar-shadow-color . "#fffffbeeffff")
- (viper-saved-cursor-color-in-replace-mode . "Red3"))
- ((blank-space-face . blank-space-face)
- (blank-tab-face . blank-tab-face)
- (ecb-source-in-directories-buffer-face . ecb-sources-face)
- (gnus-mouse-face . highlight)
- (list-matching-lines-face . bold)
- (view-highlight-face . highlight)
- (vm-highlight-url-face . my-url-face)
- (vm-highlighted-header-face . my-url-face)
- (vm-mime-button-face . gui-button-face)
- (vm-summary-highlight-face . my-summary-highlight-face))
- (default ((t (nil))))
- (bbdb-company ((t (:italic t))))
- (bbdb-field-name ((t (:bold t :foreground "MediumAquamarine"))))
- (bbdb-field-value ((t (nil))))
- (bbdb-name ((t (:underline t))))
- (blank-space-face ((t (:background "gray80"))))
- (blank-tab-face ((t (:background "LightBlue" :foreground "DarkSlateGray"))))
- (blue ((t (:foreground "blue"))))
- (bold ((t (:bold t :foreground "MediumAquamarine"))))
- (bold-italic ((t (:italic t :bold t :foreground "SkyBlue"))))
- (border ((t (:background "black"))))
- (border-glyph ((t (nil))))
- (calendar-today-face ((t (:underline t))))
- (comint-highlight-input ((t (:bold t))))
- (comint-highlight-prompt ((t (:foreground "cyan"))))
- (comint-input-face ((t (:foreground "deepskyblue"))))
- (cperl-array-face ((t (:bold t :foreground "Yellow"))))
- (cperl-hash-face ((t (:italic t :bold t :foreground "White"))))
- (cperl-nonoverridable-face ((t (:foreground "SkyBlue"))))
- (cursor ((t (:background "white"))))
- (custom-button-face ((t (:underline t :bold t :foreground "MediumAquaMarine"))))
- (custom-button-pressed-face ((t (:background "lightgrey" :foreground "black"))))
- (custom-changed-face ((t (:background "blue" :foreground "white"))))
- (custom-comment-face ((t (:background "dim gray"))))
- (custom-comment-tag-face ((t (:foreground "gray80"))))
- (custom-documentation-face ((t (:foreground "Grey"))))
- (custom-face-tag-face ((t (:underline t))))
- (custom-group-tag-face ((t (:bold t :foreground "MediumAquamarine"))))
- (custom-group-tag-face-1 ((t (:foreground "MediumAquaMarine"))))
- (custom-invalid-face ((t (:background "red" :foreground "yellow"))))
- (custom-modified-face ((t (:background "blue" :foreground "white"))))
- (custom-rogue-face ((t (:background "black" :foreground "pink"))))
- (custom-saved-face ((t (:underline t))))
- (custom-set-face ((t (:background "white" :foreground "blue"))))
- (custom-state-face ((t (:foreground "yellow"))))
- (custom-variable-button-face ((t (:underline t :bold t))))
- (custom-variable-tag-face ((t (:bold t :foreground "Aquamarine"))))
- (cvs-filename-face ((t (:foreground "blue4"))))
- (cvs-handled-face ((t (:foreground "pink"))))
- (cvs-header-face ((t (:bold t :foreground "blue4"))))
- (cvs-marked-face ((t (:bold t :foreground "green3"))))
- (cvs-msg-face ((t (:italic t))))
- (cvs-need-action-face ((t (:foreground "orange"))))
- (cvs-unknown-face ((t (:foreground "red"))))
- (diary-face ((t (:bold t :foreground "cyan"))))
- (dired-face-boring ((t (:foreground "Gray65"))))
- (dired-face-directory ((t (:bold t :foreground "sky blue"))))
- (dired-face-executable ((t (:foreground "MediumAquaMarine"))))
- (dired-face-flagged ((t (:foreground "Cyan"))))
- (dired-face-marked ((t (:foreground "cyan"))))
- (dired-face-permissions ((t (:foreground "aquamarine"))))
- (dired-face-setuid ((t (:foreground "LightSalmon"))))
- (dired-face-socket ((t (:foreground "LightBlue"))))
- (dired-face-symlink ((t (:foreground "gray95"))))
- (display-time-mail-balloon-enhance-face ((t (:background "orange"))))
- (display-time-mail-balloon-gnus-group-face ((t (:foreground "blue"))))
- (display-time-time-balloon-face ((t (:foreground "red"))))
- (ecb-sources-face ((t (:foreground "LightBlue1"))))
- (ediff-current-diff-face-A ((t (:background "pale green" :foreground "firebrick"))))
- (ediff-current-diff-face-Ancestor ((t (:background "VioletRed" :foreground "Black"))))
- (ediff-current-diff-face-B ((t (:background "Yellow" :foreground "DarkOrchid"))))
- (ediff-current-diff-face-C ((t (:background "indianred" :foreground "white"))))
- (ediff-even-diff-face-A ((t (:background "light gray" :foreground "Black"))))
- (ediff-even-diff-face-Ancestor ((t (:background "Gray" :foreground "White"))))
- (ediff-even-diff-face-B ((t (:background "Gray" :foreground "White"))))
- (ediff-even-diff-face-C ((t (:background "light gray" :foreground "Black"))))
- (ediff-fine-diff-face-A ((t (:background "sky blue" :foreground "Navy"))))
- (ediff-fine-diff-face-Ancestor ((t (:background "Green" :foreground "Black"))))
- (ediff-fine-diff-face-B ((t (:background "cyan" :foreground "Black"))))
- (ediff-fine-diff-face-C ((t (:background "Turquoise" :foreground "Black"))))
- (ediff-odd-diff-face-A ((t (:background "Gray" :foreground "White"))))
- (ediff-odd-diff-face-Ancestor ((t (:background "light gray" :foreground "Black"))))
- (ediff-odd-diff-face-B ((t (:background "light gray" :foreground "Black"))))
- (ediff-odd-diff-face-C ((t (:background "Gray" :foreground "White"))))
- (erc-action-face ((t (:bold t))))
- (erc-bold-face ((t (:bold t))))
- (erc-default-face ((t (nil))))
- (erc-direct-msg-face ((t (:foreground "LightSalmon"))))
- (erc-error-face ((t (:bold t :foreground "yellow"))))
- (erc-input-face ((t (:foreground "Beige"))))
- (erc-inverse-face ((t (:background "wheat" :foreground "darkslategrey"))))
- (erc-notice-face ((t (:foreground "MediumAquamarine"))))
- (erc-pal-face ((t (:foreground "PaleGreen"))))
- (erc-prompt-face ((t (:foreground "MediumAquamarine"))))
- (erc-underline-face ((t (:underline t))))
- (eshell-ls-archive-face ((t (:bold t :foreground "wheat"))))
- (eshell-ls-backup-face ((t (:foreground "Grey"))))
- (eshell-ls-clutter-face ((t (:bold t :foreground "wheat"))))
- (eshell-ls-directory-face ((t (:bold t :foreground "Yellow"))))
- (eshell-ls-executable-face ((t (:bold t :foreground "wheat"))))
- (eshell-ls-missing-face ((t (:bold t :foreground "wheat"))))
- (eshell-ls-picture-face ((t (:foreground "wheat"))))
- (eshell-ls-product-face ((t (:foreground "wheat"))))
- (eshell-ls-readonly-face ((t (:foreground "wheat"))))
- (eshell-ls-special-face ((t (:bold t :foreground "wheat"))))
- (eshell-ls-symlink-face ((t (:bold t :foreground "White"))))
- (eshell-ls-text-face ((t (:foreground "wheat"))))
- (eshell-ls-todo-face ((t (:foreground "wheat"))))
- (eshell-ls-unreadable-face ((t (:foreground "wheat3"))))
- (eshell-prompt-face ((t (:bold t :foreground "PaleGreen"))))
- (eshell-test-failed-face ((t (:bold t :foreground "OrangeRed"))))
- (eshell-test-ok-face ((t (:bold t :foreground "Green"))))
- (excerpt ((t (:italic t))))
- (ff-paths-non-existant-file-face ((t (:bold t :foreground "NavyBlue"))))
- (flyspell-duplicate-face ((t (:underline t :bold t :foreground "Gold3"))))
- (flyspell-incorrect-face ((t (:underline t :bold t :foreground "OrangeRed"))))
- (font-latex-italic-face ((t (nil))))
- (font-latex-math-face ((t (nil))))
- (font-latex-sedate-face ((t (:foreground "Gray85"))))
- (font-latex-string-face ((t (:foreground "orange"))))
- (font-latex-warning-face ((t (:foreground "gold"))))
- (font-lock-builtin-face ((t (:foreground "PaleGreen"))))
- (font-lock-comment-face ((t (:italic t :foreground "Wheat3"))))
- (font-lock-constant-face ((t (:foreground "LightBlue"))))
- (font-lock-doc-face ((t (:bold t :foreground "DarkSeaGreen"))))
- (font-lock-doc-string-face ((t (:bold t :foreground "DarkSeaGreen"))))
- (font-lock-exit-face ((t (:foreground "green"))))
- (font-lock-function-name-face ((t (:italic t :bold t :foreground "cyan"))))
- (font-lock-keyword-face ((t (:bold t :foreground "LightBlue"))))
- (font-lock-preprocessor-face ((t (:foreground "blue3"))))
- (font-lock-reference-face ((t (:foreground "PaleGreen"))))
- (font-lock-string-face ((t (:italic t :foreground "MediumAquamarine"))))
- (font-lock-type-face ((t (:bold t :foreground "LightBlue"))))
- (font-lock-variable-name-face ((t (:italic t :bold t :foreground "LightBlue"))))
- (font-lock-warning-face ((t (:bold t :foreground "LightSalmon"))))
- (fringe ((t (:background "darkslategrey"))))
- (gnus-cite-attribution-face ((t (:italic t :bold t))))
- (gnus-cite-face-1 ((t (:foreground "LightBlue"))))
- (gnus-cite-face-10 ((t (:foreground "LightBlue"))))
- (gnus-cite-face-11 ((t (:foreground "LightBlue"))))
- (gnus-cite-face-2 ((t (:foreground "LightBlue"))))
- (gnus-cite-face-3 ((t (:foreground "LightBlue"))))
- (gnus-cite-face-4 ((t (:foreground "LightBlue"))))
- (gnus-cite-face-5 ((t (:foreground "LightBlue"))))
- (gnus-cite-face-6 ((t (:foreground "LightBlue"))))
- (gnus-cite-face-7 ((t (:foreground "LightBlue"))))
- (gnus-cite-face-8 ((t (:foreground "LightBlue"))))
- (gnus-cite-face-9 ((t (:foreground "LightBlue"))))
- (gnus-emphasis-bold ((t (:bold t))))
- (gnus-emphasis-bold-italic ((t (:italic t :bold t))))
- (gnus-emphasis-highlight-words ((t (:background "black" :foreground "yellow"))))
- (gnus-emphasis-italic ((t (:italic t))))
- (gnus-emphasis-underline ((t (:underline t))))
- (gnus-emphasis-underline-bold ((t (:underline t :bold t))))
- (gnus-emphasis-underline-bold-italic ((t (:underline t :italic t :bold t))))
- (gnus-emphasis-underline-italic ((t (:underline t :italic t))))
- (gnus-filterhist-face-1 ((t (nil))))
- (gnus-group-mail-1-empty-face ((t (:foreground "gray80"))))
- (gnus-group-mail-1-face ((t (:bold t :foreground "light cyan"))))
- (gnus-group-mail-2-empty-face ((t (:foreground "gray80"))))
- (gnus-group-mail-2-face ((t (:bold t :foreground "turquoise"))))
- (gnus-group-mail-3-empty-face ((t (:foreground "gray80"))))
- (gnus-group-mail-3-face ((t (:bold t :foreground "LightBlue"))))
- (gnus-group-mail-low-empty-face ((t (:foreground "gray80"))))
- (gnus-group-mail-low-face ((t (:bold t :foreground "LightBlue"))))
- (gnus-group-news-1-empty-face ((t (:foreground "gray80"))))
- (gnus-group-news-1-face ((t (:bold t :foreground "green yellow"))))
- (gnus-group-news-2-empty-face ((t (:foreground "gray80"))))
- (gnus-group-news-2-face ((t (:bold t :foreground "Aquamarine"))))
- (gnus-group-news-3-empty-face ((t (:foreground "gray80"))))
- (gnus-group-news-3-face ((t (:bold t :foreground "LightBlue"))))
- (gnus-group-news-4-empty-face ((t (:foreground "gray80"))))
- (gnus-group-news-4-face ((t (:bold t :foreground "Wheat"))))
- (gnus-group-news-5-empty-face ((t (:foreground "gray80"))))
- (gnus-group-news-5-face ((t (:bold t :foreground "MediumAquamarine"))))
- (gnus-group-news-6-empty-face ((t (:foreground "gray80"))))
- (gnus-group-news-6-face ((t (:bold t :foreground "MediumAquamarine"))))
- (gnus-group-news-low-empty-face ((t (:foreground "gray80"))))
- (gnus-group-news-low-face ((t (:bold t :foreground "yellow green"))))
- (gnus-header-content-face ((t (:italic t :foreground "LightSkyBlue3"))))
- (gnus-header-from-face ((t (:bold t :foreground "light cyan"))))
- (gnus-header-name-face ((t (:bold t :foreground "LightBlue"))))
- (gnus-header-newsgroups-face ((t (:italic t :bold t :foreground "LightSkyBlue3"))))
- (gnus-header-subject-face ((t (:bold t :foreground "light cyan"))))
- (gnus-picons-face ((t (:background "white" :foreground "black"))))
- (gnus-picons-xbm-face ((t (:background "white" :foreground "black"))))
- (gnus-signature-face ((t (:italic t :foreground "LightBlue"))))
- (gnus-splash ((t (:foreground "Brown"))))
- (gnus-splash-face ((t (:foreground "LightBlue"))))
- (gnus-summary-cancelled-face ((t (:background "black" :foreground "gray80"))))
- (gnus-summary-high-ancient-face ((t (:bold t :foreground "LightBlue"))))
- (gnus-summary-high-read-face ((t (:bold t :foreground "gray80"))))
- (gnus-summary-high-ticked-face ((t (:bold t :foreground "burlywood"))))
- (gnus-summary-high-unread-face ((t (:italic t :bold t :foreground "wheat"))))
- (gnus-summary-low-ancient-face ((t (:italic t :foreground "LightBlue"))))
- (gnus-summary-low-read-face ((t (:italic t :foreground "light sea green"))))
- (gnus-summary-low-ticked-face ((t (:italic t :bold t :foreground "LightBlue"))))
- (gnus-summary-low-unread-face ((t (:italic t :foreground "light sea green"))))
- (gnus-summary-normal-ancient-face ((t (:foreground "gray80"))))
- (gnus-summary-normal-read-face ((t (:foreground "gray80"))))
- (gnus-summary-normal-ticked-face ((t (:bold t :foreground "sandy brown"))))
- (gnus-summary-normal-unread-face ((t (:bold t :foreground "wheat"))))
- (gnus-summary-selected-face ((t (:underline t))))
- (gnus-x-face ((t (:background "white" :foreground "black"))))
- (green ((t (:foreground "green"))))
- (gui-button-face ((t (:background "cyan" :foreground "#65889C"))))
- (gui-element ((t (:background "Gray"))))
- (header-line ((t (:background "grey20" :foreground "grey90"))))
- (highlight ((t (:background "PaleGreen" :foreground "DarkGreen"))))
- (highlight-changes-delete-face ((t (:underline t :foreground "red"))))
- (highlight-changes-face ((t (:foreground "red"))))
- (highline-face ((t (:background "SeaGreen"))))
- (holiday-face ((t (:background "DimGray"))))
- (html-helper-bold-face ((t (:foreground "DarkRed"))))
- (html-helper-italic-face ((t (:foreground "DarkBlue"))))
- (html-helper-underline-face ((t (:underline t :foreground "Black"))))
- (html-tag-face ((t (:foreground "Blue"))))
- (info-menu-5 ((t (:underline t))))
- (info-node ((t (:underline t :italic t :bold t :foreground "light blue"))))
- (info-xref ((t (:bold t :foreground "light blue"))))
- (isearch ((t (:background "Aquamarine" :foreground "SteelBlue"))))
- (isearch-lazy-highlight-face ((t (:background "paleturquoise4"))))
- (isearch-secondary ((t (:foreground "red3"))))
- (italic ((t (:italic t))))
- (jde-bug-breakpoint-cursor ((t (:background "brown" :foreground "cyan"))))
- (jde-bug-breakpoint-marker ((t (:background "yellow" :foreground "red"))))
- (jde-java-font-lock-api-face ((t (:foreground "LightBlue"))))
- (jde-java-font-lock-bold-face ((t (:bold t))))
- (jde-java-font-lock-code-face ((t (nil))))
- (jde-java-font-lock-constant-face ((t (:foreground "LightBlue"))))
- (jde-java-font-lock-doc-tag-face ((t (:foreground "LightBlue"))))
- (jde-java-font-lock-italic-face ((t (:italic t))))
- (jde-java-font-lock-link-face ((t (:underline t :foreground "LightBlue"))))
- (jde-java-font-lock-modifier-face ((t (:foreground "LightBlue"))))
- (jde-java-font-lock-number-face ((t (:foreground "LightBlue"))))
- (jde-java-font-lock-package-face ((t (:foreground "LightBlue"))))
- (jde-java-font-lock-pre-face ((t (nil))))
- (jde-java-font-lock-underline-face ((t (:underline t))))
- (lazy-highlight-face ((t (:bold t :foreground "dark magenta"))))
- (left-margin ((t (nil))))
- (linemenu-face ((t (:background "gray30"))))
- (list-mode-item-selected ((t (nil))))
- (makefile-space-face ((t (:background "hotpink"))))
- (menu ((t (:background "wheat" :foreground "gray30"))))
- (message-cited-text-face ((t (:foreground "White"))))
- (message-header-cc-face ((t (:bold t :foreground "light cyan"))))
- (message-header-name-face ((t (:foreground "LightBlue"))))
- (message-header-newsgroups-face ((t (:italic t :bold t :foreground "LightSkyBlue3"))))
- (message-header-other-face ((t (:foreground "LightSkyBlue3"))))
- (message-header-subject-face ((t (:bold t :foreground "light cyan"))))
- (message-header-to-face ((t (:bold t :foreground "light cyan"))))
- (message-header-xheader-face ((t (:foreground "LightBlue"))))
- (message-mml-face ((t (:bold t :foreground "LightBlue"))))
- (message-separator-face ((t (:foreground "LightBlue"))))
- (mmm-default-submode-face ((t (:background "#c0c0c5"))))
- (modeline ((t (:background "#4f657d" :foreground "gray80"))))
- (modeline-buffer-id ((t (:background "#4f657d" :foreground "gray80"))))
- (modeline-mousable ((t (:background "#4f657d" :foreground "gray80"))))
- (modeline-mousable-minor-mode ((t (:background "#4f657d" :foreground "gray80"))))
- (mouse ((t (:background "Grey"))))
- (my-summary-highlight-face ((t (:foreground "White"))))
- (my-url-face ((t (:foreground "PaleTurquoise"))))
- (nil ((t (nil))))
- (paren-blink-off ((t (:foreground "gray"))))
- (paren-face-match ((t (:background "turquoise"))))
- (paren-face-mismatch ((t (:background "purple" :foreground "white"))))
- (paren-face-no-match ((t (:background "yellow" :foreground "black"))))
- (paren-match ((t (:background "darkseagreen2"))))
- (paren-mismatch ((t (:background "DeepPink" :foreground "black"))))
- (paren-mismatch-face ((t (:bold t))))
- (paren-no-match-face ((t (:bold t))))
- (pointer ((t (nil))))
- (primary-selection ((t (:background "gray65"))))
- (red ((t (:foreground "red"))))
- (region ((t (:background "CadetBlue" :foreground "gray80"))))
- (right-margin ((t (nil))))
- (scroll-bar ((t (nil))))
- (secondary-selection ((t (:background "LightBlue" :foreground "#4f657d"))))
- (semantic-dirty-token-face ((t (:background "gray10"))))
- (semantic-intangible-face ((t (:foreground "gray25"))))
- (semantic-read-only-face ((t (:background "gray25"))))
- (senator-intangible-face ((t (:foreground "gray75"))))
- (senator-momentary-highlight-face ((t (:background "gray80"))))
- (senator-read-only-face ((t (:background "#664444"))))
- (sgml-comment-face ((t (:foreground "dark turquoise"))))
- (sgml-doctype-face ((t (:foreground "red"))))
- (sgml-end-tag-face ((t (:foreground "blue"))))
- (sgml-entity-face ((t (:foreground "magenta"))))
- (sgml-ignored-face ((t (:background "gray60" :foreground "gray40"))))
- (sgml-ms-end-face ((t (:foreground "green"))))
- (sgml-ms-start-face ((t (:foreground "yellow"))))
- (sgml-pi-face ((t (:foreground "lime green"))))
- (sgml-sgml-face ((t (:foreground "brown"))))
- (sgml-short-ref-face ((t (:foreground "deep sky blue"))))
- (sgml-start-tag-face ((t (:foreground "dark green"))))
- (shell-option-face ((t (:foreground "blue"))))
- (shell-output-2-face ((t (:foreground "darkseagreen"))))
- (shell-output-3-face ((t (:foreground "slategray"))))
- (shell-output-face ((t (:foreground "palegreen"))))
- (shell-prompt-face ((t (:foreground "red"))))
- (show-paren-match-face ((t (:background "Aquamarine" :foreground "steel blue"))))
- (show-paren-mismatch-face ((t (:bold t :background "IndianRed" :foreground "White"))))
- (speedbar-button-face ((t (:bold t :foreground "LightBlue"))))
- (speedbar-directory-face ((t (:bold t :foreground "yellow"))))
- (speedbar-file-face ((t (:bold t :foreground "wheat"))))
- (speedbar-highlight-face ((t (:background "sea green"))))
- (speedbar-selected-face ((t (:underline t))))
- (speedbar-tag-face ((t (:foreground "LightBlue"))))
- (swbuff-current-buffer-face ((t (:bold t :foreground "red"))))
- (template-message-face ((t (:bold t))))
- (term-black ((t (:foreground "black"))))
- (term-blackbg ((t (:background "black"))))
- (term-blue ((t (:foreground "blue"))))
- (term-bluebg ((t (:background "blue"))))
- (term-bold ((t (:bold t))))
- (term-cyan ((t (:foreground "cyan"))))
- (term-cyanbg ((t (:background "cyan"))))
- (term-default-bg ((t (nil))))
- (term-default-bg-inv ((t (nil))))
- (term-default-fg ((t (nil))))
- (term-default-fg-inv ((t (nil))))
- (term-green ((t (:foreground "green"))))
- (term-greenbg ((t (:background "green"))))
- (term-invisible ((t (nil))))
- (term-invisible-inv ((t (nil))))
- (term-magenta ((t (:foreground "magenta"))))
- (term-magentabg ((t (:background "magenta"))))
- (term-red ((t (:foreground "red"))))
- (term-redbg ((t (:background "red"))))
- (term-underline ((t (:underline t))))
- (term-white ((t (:foreground "white"))))
- (term-whitebg ((t (:background "white"))))
- (term-yellow ((t (:foreground "yellow"))))
- (term-yellowbg ((t (:background "yellow"))))
- (text-cursor ((t (:background "Red3" :foreground "white"))))
- (tool-bar ((t (:background "grey75" :foreground "black"))))
- (toolbar ((t (:background "Gray"))))
- (trailing-whitespace ((t (:background "red"))))
- (underline ((t (:underline t))))
- (variable-pitch ((t (nil))))
- (vc-annotate-face-0046FF ((t (:background "black" :foreground "wheat"))))
- (vcursor ((t (:underline t :background "cyan" :foreground "blue"))))
- (vertical-divider ((t (:background "Gray"))))
- (vhdl-font-lock-attribute-face ((t (:foreground "Orchid"))))
- (vhdl-font-lock-directive-face ((t (:foreground "CadetBlue"))))
- (vhdl-font-lock-enumvalue-face ((t (:foreground "Gold4"))))
- (vhdl-font-lock-function-face ((t (:foreground "Orchid4"))))
- (vhdl-font-lock-prompt-face ((t (:bold t :foreground "Red"))))
- (vhdl-font-lock-reserved-words-face ((t (:bold t :foreground "Orange"))))
- (vhdl-font-lock-translate-off-face ((t (:background "LightGray"))))
- (vhdl-speedbar-architecture-face ((t (:foreground "Blue"))))
- (vhdl-speedbar-architecture-selected-face ((t (:underline t :foreground "Blue"))))
- (vhdl-speedbar-configuration-face ((t (:foreground "DarkGoldenrod"))))
- (vhdl-speedbar-configuration-selected-face ((t (:underline t :foreground "DarkGoldenrod"))))
- (vhdl-speedbar-entity-face ((t (:foreground "ForestGreen"))))
- (vhdl-speedbar-entity-selected-face ((t (:underline t :foreground "ForestGreen"))))
- (vhdl-speedbar-instantiation-face ((t (:foreground "Brown"))))
- (vhdl-speedbar-instantiation-selected-face ((t (:underline t :foreground "Brown"))))
- (vhdl-speedbar-package-face ((t (:foreground "Gray50"))))
- (vhdl-speedbar-package-selected-face ((t (:underline t :foreground "Gray50"))))
- (viper-minibuffer-emacs-face ((t (:background "darkseagreen2" :foreground "Black"))))
- (viper-minibuffer-insert-face ((t (:background "pink" :foreground "Black"))))
- (viper-minibuffer-vi-face ((t (:background "gray" :foreground "DarkGreen"))))
- (viper-replace-overlay-face ((t (:background "darkseagreen2" :foreground "Black"))))
- (viper-search-face ((t (:background "khaki" :foreground "Black"))))
- (vm-header-content-face ((t (:italic t :foreground "gray80"))))
- (vm-header-from-face ((t (:italic t :background "#65889C" :foreground "cyan"))))
- (vm-header-name-face ((t (:foreground "cyan"))))
- (vm-header-subject-face ((t (:foreground "cyan"))))
- (vm-header-to-face ((t (:italic t :foreground "cyan"))))
- (vm-message-cited-face ((t (:foreground "Gray80"))))
- (vm-summary-face-1 ((t (:foreground "MediumAquamarine"))))
- (vm-summary-face-2 ((t (:foreground "MediumAquamarine"))))
- (vm-summary-face-3 ((t (:foreground "MediumAquamarine"))))
- (vm-summary-face-4 ((t (:foreground "MediumAquamarine"))))
- (vm-summary-highlight-face ((t (:foreground "White"))))
- (vmpc-pre-sig-face ((t (:foreground "Aquamarine"))))
- (vmpc-sig-face ((t (:foreground "LightBlue"))))
- (vvb-face ((t (:background "pink" :foreground "black"))))
- (widget-button-face ((t (:bold t))))
- (widget-button-pressed-face ((t (:foreground "cyan"))))
- (widget-documentation-face ((t (:foreground "LightBlue"))))
- (widget-field-face ((t (:foreground "LightBlue"))))
- (widget-inactive-face ((t (:foreground "Wheat3"))))
- (widget-single-line-field-face ((t (:foreground "LightBlue"))))
- (woman-bold-face ((t (:bold t))))
- (woman-italic-face ((t (:foreground "beige"))))
- (woman-unknown-face ((t (:foreground "LightSalmon"))))
- (xref-keyword-face ((t (:foreground "Cyan"))))
- (xref-list-pilot-face ((t (:foreground "navy"))))
- (xref-list-symbol-face ((t (:foreground "navy"))))
- (xxml-emph-1-face ((t (:background "lightyellow"))))
- (xxml-emph-2-face ((t (:background "lightyellow"))))
- (xxml-header-1-face ((t (:background "seashell1" :foreground "MediumAquamarine"))))
- (xxml-header-2-face ((t (:background "seashell1" :foreground "SkyBlue"))))
- (xxml-header-3-face ((t (:background "seashell1"))))
- (xxml-header-4-face ((t (:background "seashell1"))))
- (xxml-interaction-face ((t (:background "lightcyan"))))
- (xxml-rug-face ((t (:background "cyan"))))
- (xxml-sparkle-face ((t (:background "yellow"))))
- (xxml-unbreakable-space-face ((t (:underline t :foreground "grey"))))
- (yellow ((t (:foreground "yellow"))))
- (zmacs-region ((t (:background "#4f657d")))))))
-
- (defun color-theme-dark-blue ()
- "Color theme by Chris McMahan, created 2001-09-09.
- Based on `color-theme-subtle-blue' with a slightly darker background."
- (interactive)
- (color-theme-subtle-blue)
- (let ((color-theme-is-cumulative t))
- (color-theme-install
- '(color-theme-dark-blue
- ((background-color . "#537182")
- (foreground-color . "AntiqueWhite2"))
- nil
- (default ((t (nil))))
- (blank-space-face ((t (:background "LightGray"))))
- (blank-tab-face ((t (:background "Wheat" :foreground "DarkSlateGray"))))
- (cursor ((t (:background "LightGray"))))
- (dired-face-executable ((t (:foreground "green yellow"))))
- (dired-face-flagged ((t (:foreground "tomato"))))
- (dired-face-marked ((t (:foreground "light salmon"))))
- (dired-face-setuid ((t (:foreground "Red"))))
- (dired-face-socket ((t (:foreground "magenta"))))
- (fixed ((t (:bold t))))
- (font-lock-comment-face ((t (:italic t :foreground "Gray80"))))
- (font-lock-doc-face ((t (:bold t))))
- (font-lock-function-name-face ((t (:italic t :bold t :foreground "Yellow"))))
- (font-lock-string-face ((t (:italic t :foreground "DarkSeaGreen"))))
- (font-lock-type-face ((t (:bold t :foreground "YellowGreen"))))
- (gui-button-face ((t (:background "DarkSalmon" :foreground "white"))))
- (modeline ((t (:background "#c1ccd9" :foreground "#4f657d"))))
- (modeline-buffer-id ((t (:background "#c1ccd9" :foreground "#4f657d"))))
- (modeline-mousable ((t (:background "#c1ccd9" :foreground "#4f657d"))))
- (modeline-mousable-minor-mode ((t (:background "#c1ccd9" :foreground "#4f657d"))))
- (my-url-face ((t (:foreground "LightBlue"))))
- (region ((t (:background "PaleTurquoise4" :foreground "gray80"))))
- (secondary-selection ((t (:background "sea green" :foreground "yellow"))))
- (vm-header-content-face ((t (:italic t :foreground "wheat"))))
- (vm-header-from-face ((t (:italic t :foreground "wheat"))))
- (widget-button-pressed-face ((t (:foreground "red"))))
- (xref-keyword-face ((t (:foreground "blue"))))
- (zmacs-region ((t (:background "SlateGray"))))))))
-
- (defun color-theme-jonadabian-slate ()
- "Another slate-and-wheat color theme by Jonadab the Unsightly One.
- Updated 2001-10-12."
- (interactive)
- (color-theme-install
- '(color-theme-jonadabian-slate
- ((background-color . "#305050")
- (background-mode . dark)
- (border-color . "black")
- (cursor-color . "medium turquoise")
- (foreground-color . "#CCBB77")
- (mouse-color . "black"))
- ((list-matching-lines-face . bold)
- (ued-mode-keyname-face . modeline)
- (view-highlight-face . highlight))
- (default ((t (nil))))
- (fringe ((t (:background "#007080"))))
- (bold ((t (:bold t :foreground "#EEDDAA"))))
- (gnus-emphasis-bold ((t (:bold t :foreground "#EEDDAA"))))
- (gnus-emphasis-underline-bold ((t (:underline t :bold t :foreground "#EEDDAA"))))
- (bold-italic ((t (:italic t :bold t :foreground "#AA0000"))))
- (gnus-emphasis-bold-italic ((t (:italic t :bold t :foreground "#AA0000"))))
- (gnus-emphasis-underline-bold-italic ((t (:underline t :italic t :bold t :foreground "#AA0000"))))
- (gnus-emphasis-underline-italic ((t (:underline t :italic t :bold t :foreground "#AA0000"))))
- (calendar-today-face ((t (:underline t :background "darkslategrey"))))
- (cperl-array-face ((t (:background "#004060"))))
- (cperl-hash-face ((t (:background "#004400"))))
- (custom-button-face ((t (:background "dark blue" :foreground "rgbi:1.00/1.00/0.00"))))
- (custom-documentation-face ((t (:foreground "#10D010"))))
- (custom-face-tag-face ((t (:underline t :foreground "goldenrod"))))
- (custom-group-tag-face ((t (:underline t :foreground "light blue"))))
- (custom-group-tag-face-1 ((t (:underline t :foreground "pink"))))
- (custom-invalid-face ((t (:background "red" :foreground "yellow"))))
- (custom-modified-face ((t (:background "blue" :foreground "white"))))
- (custom-rogue-face ((t (:background "black" :foreground "pink"))))
- (custom-saved-face ((t (:underline t))))
- (custom-set-face ((t (:foreground "#6666dd"))))
- (custom-state-face ((t (:foreground "mediumaquamarine"))))
- (custom-variable-button-face ((t (:underline t :bold t))))
- (custom-variable-tag-face ((t (:underline t :foreground "light blue"))))
- (diary-face ((t (:foreground "red"))))
- (eshell-ls-archive-face ((t (:foreground "green"))))
- (eshell-ls-backup-face ((t (:foreground "grey60"))))
- (eshell-ls-clutter-face ((t (:bold t :foreground "OrangeRed"))))
- (eshell-ls-directory-face ((t (:bold t :foreground "SkyBlue"))))
- (eshell-ls-executable-face ((t (:foreground "white"))))
- (eshell-ls-missing-face ((t (:foreground "red"))))
- (eshell-ls-product-face ((t (:foreground "LightSalmon"))))
- (eshell-ls-readonly-face ((t (:foreground "indian red"))))
- (eshell-ls-special-face ((t (:foreground "yellow"))))
- (eshell-ls-symlink-face ((t (:foreground "#6666dd"))))
- (eshell-ls-unreadable-face ((t (:foreground "red"))))
- (eshell-prompt-face ((t (:bold t :background "#305050" :foreground "#EEDD99"))))
- (font-lock-builtin-face ((t (:foreground "LightSteelBlue"))))
- (font-lock-comment-face ((t (:italic t :bold t :foreground "grey66"))))
- (font-lock-constant-face ((t (:foreground "indian red"))))
- (font-lock-function-name-face ((t (:foreground "#D0D000"))))
- (font-lock-keyword-face ((t (:foreground "#00BBBB"))))
- (font-lock-string-face ((t (:foreground "#10D010"))))
- (font-lock-type-face ((t (:bold t :foreground "#ff7788"))))
- (font-lock-variable-name-face ((t (:foreground "#eeddaa"))))
- (font-lock-warning-face ((t (:bold t :foreground "Pink"))))
- (header-line ((t (:box (:line-width 1 :style released-button)))))
- (highlight ((t (:background "#226644"))))
- (highlight-changes-delete-face ((t (:background "navy" :foreground "red"))))
- (highlight-changes-face ((t (:background "navy"))))
- (holiday-face ((t (:foreground "#ff7744"))))
- (italic ((t (:italic t :foreground "#AA0000"))))
- (gnus-emphasis-italic ((t (:italic t :foreground "#AA0000"))))
- (modeline ((t (:background "#007080" :foreground "cyan"))))
- (modeline-buffer-id ((t (:background "#007080" :foreground "cyan"))))
- (modeline-mousable ((t (:background "#007080" :foreground "cyan"))))
- (modeline-mousable-minor-mode ((t (:background "#007080" :foreground "cyan"))))
- (region ((t (:background "#226644"))))
- (secondary-selection ((t (:background "darkslategrey"))))
- (sgml-comment-face ((t (:foreground "grey60"))))
- (sgml-doctype-face ((t (:foreground "red"))))
- (sgml-end-tag-face ((t (:foreground "#00D0D0"))))
- (sgml-entity-face ((t (:foreground "indian red"))))
- (sgml-ignored-face ((t (:background "gray60" :foreground "gray40"))))
- (sgml-ms-end-face ((t (:foreground "green"))))
- (sgml-ms-start-face ((t (:foreground "green"))))
- (sgml-pi-face ((t (:foreground "lime green"))))
- (sgml-sgml-face ((t (:foreground "brown"))))
- (sgml-short-ref-face ((t (:foreground "deep sky blue"))))
- (sgml-start-tag-face ((t (:foreground "#D0D000"))))
- (show-paren-match-face ((t (:background "#400055" :foreground "cyan"))))
- (show-paren-mismatch-face ((t (:background "red"))))
- (special-string-face ((t (:foreground "light green"))))
- (term-black ((t (:background "#000055" :foreground "black"))))
- (term-blackbg ((t (:background "black" :foreground "#CCBB77"))))
- (term-blue ((t (:background "#000055" :foreground "blue"))))
- (term-bluebg ((t (:background "blue" :foreground "#CCBB77"))))
- (term-bold ((t (:bold t :background "#000055" :foreground "#CCBB77"))))
- (term-cyan ((t (:background "#000055" :foreground "cyan"))))
- (term-cyanbg ((t (:background "darkcyan"))))
- (term-default-bg ((t (:foreground "#CCBB77"))))
- (term-default-bg-inv ((t (:foreground "#CCBB77"))))
- (term-default-fg ((t (:background "#000055"))))
- (term-default-fg-inv ((t (:background "#000055"))))
- (term-green ((t (:background "#000055" :foreground "green"))))
- (term-greenbg ((t (:background "darkgreen"))))
- (term-invisible ((t (:foreground "#CCBB77"))))
- (term-invisible-inv ((t (:foreground "#CCBB77"))))
- (term-magenta ((t (:background "#000055" :foreground "magenta"))))
- (term-magentabg ((t (:background "darkmagenta"))))
- (term-red ((t (:background "#000055" :foreground "red"))))
- (term-redbg ((t (:background "darkred"))))
- (term-underline ((t (:underline t :background "#000055" :foreground "#CCBB77"))))
- (term-white ((t (:background "#000055" :foreground "white"))))
- (term-whitebg ((t (:background "grey50"))))
- (term-yellow ((t (:background "#000055" :foreground "yellow"))))
- (term-yellowbg ((t (:background "#997700"))))
- (trailing-whitespace ((t (:background "#23415A"))))
- (underline ((t (:underline t))))
- (gnus-emphasis-underline ((t (:underline t))))
- (widget-button-face ((t (:bold t))))
- (widget-button-pressed-face ((t (:foreground "red"))))
- (widget-documentation-face ((t (:foreground "green"))))
- (widget-field-face ((t (:background "grey35" :foreground "black"))))
- (widget-inactive-face ((t (:foreground "gray"))))
- (widget-single-line-field-face ((t (:background "dim gray")))))))
-
- (defun color-theme-gray1 ()
- "Color theme by Paul Pulli, created 2001-10-19."
- (interactive)
- (color-theme-install
- '(color-theme-gray1
- ((background-color . "darkgray")
- (background-mode . light)
- (background-toolbar-color . "#949494949494")
- (border-color . "#000000000000")
- (bottom-toolbar-shadow-color . "#595959595959")
- (cursor-color . "Yellow")
- (foreground-color . "black")
- (top-toolbar-shadow-color . "#b2b2b2b2b2b2"))
- nil
- (default ((t (nil))))
- (blue ((t (:foreground "blue"))))
- (bold ((t (:bold t))))
- (bold-italic ((t (:italic t :bold t))))
- (border-glyph ((t (nil))))
- (cperl-here-face ((t (:background "gray68" :foreground "DeepPink"))))
- (font-lock-builtin-face ((t (:bold t :foreground "red3"))))
- (font-lock-comment-face ((t (:foreground "gray50"))))
- (font-lock-constant-face ((t (:bold t :foreground "blue3"))))
- (font-lock-doc-string-face ((t (:foreground "black"))))
- (font-lock-function-name-face ((t (:bold t :foreground "DeepPink3"))))
- (font-lock-keyword-face ((t (:bold t :foreground "red"))))
- (font-lock-other-type-face ((t (:bold t :foreground "green4"))))
- (font-lock-preprocessor-face ((t (:bold t :foreground "blue3"))))
- (font-lock-reference-face ((t (:bold t :foreground "red3"))))
- (font-lock-string-face ((t (:foreground "red"))))
- (font-lock-type-face ((t (:bold t :foreground "white"))))
- (font-lock-variable-name-face ((t (:bold t :foreground "blue3"))))
- (font-lock-warning-face ((t (:bold t :foreground "Red"))))
- (green ((t (:foreground "green4"))))
- (gui-button-face ((t (:background "black" :foreground "red"))))
- (gui-element ((t (:background "gray58"))))
- (highlight ((t (:background "magenta" :foreground "yellow"))))
- (isearch ((t (:background "red" :foreground "yellow"))))
- (italic ((t (:italic t))))
- (left-margin ((t (nil))))
- (list-mode-item-selected ((t (:background "gray90" :foreground "purple"))))
- (m4-face ((t (:background "gray90" :foreground "orange3"))))
- (message-cited-text ((t (nil))))
- (message-header-contents ((t (nil))))
- (message-headers ((t (nil))))
- (message-highlighted-header-contents ((t (nil))))
- (modeline ((t (:background "#aa80aa" :foreground "White"))))
- (modeline-buffer-id ((t (:background "#aa80aa" :foreground "linen"))))
- (modeline-mousable ((t (:background "#aa80aa" :foreground "cyan"))))
- (modeline-mousable-minor-mode ((t (:background "#aa80aa" :foreground "yellow"))))
- (paren-blink-off ((t (:foreground "gray58"))))
- (paren-blink-on ((t (:foreground "purple"))))
- (paren-match ((t (:background "gray68" :foreground "white"))))
- (paren-mismatch ((t (:background "DeepPink" :foreground "black"))))
- (pointer ((t (nil))))
- (primary-selection ((t (:background "gray"))))
- (red ((t (:foreground "red"))))
- (right-margin ((t (nil))))
- (secondary-selection ((t (:background "paleturquoise"))))
- (text-cursor ((t (:background "Yellow" :foreground "darkgray"))))
- (toolbar ((t (:background "#aa80aa" :foreground "linen"))))
- (underline ((t (:underline t))))
- (vertical-divider ((t (nil))))
- (x-face ((t (:background "black" :foreground "lavenderblush"))))
- (yellow ((t (:foreground "yellow3"))))
- (zmacs-region ((t (:background "paleturquoise" :foreground "black")))))))
-
- (defun color-theme-word-perfect ()
- "White on blue background, based on WordPerfect 5.1.
- Color theme by Thomas Gehrlein, created 2001-10-21."
- (interactive)
- (color-theme-install
- '(color-theme-word-perfect
- ((background-color . "blue4")
- (background-mode . dark)
- (border-color . "black")
- (cursor-color . "gold")
- (foreground-color . "white")
- (mouse-color . "black"))
- ((ecb-source-in-directories-buffer-face . ecb-sources-face)
- (gnus-mouse-face . highlight)
- (goto-address-mail-face . italic)
- (goto-address-mail-mouse-face . secondary-selection)
- (goto-address-url-face . bold)
- (goto-address-url-mouse-face . highlight)
- (list-matching-lines-face . bold)
- (view-highlight-face . highlight))
- (default ((t (nil))))
- (bbdb-field-name ((t (:foreground "lime green"))))
- (bbdb-field-value ((t (:foreground "white"))))
- (bbdb-name ((t (:underline t :foreground "lime green"))))
- (bold ((t (:bold t :foreground "white"))))
- (bold-italic ((t (:italic t :bold t :foreground "yellow"))))
- (calendar-today-face ((t (:underline t :foreground "deep sky blue"))))
- (diary-face ((t (:foreground "gold"))))
- (ecb-sources-face ((t (:foreground "LightBlue1"))))
- (edb-inter-field-face ((t (:foreground "deep sky blue"))))
- (edb-normal-summary-face ((t (:foreground "gold"))))
- (emacs-wiki-bad-link-face ((t (:underline "coral" :bold t :foreground "coral"))))
- (emacs-wiki-link-face ((t (:underline "cyan" :bold t :foreground "cyan"))))
- (font-lock-builtin-face ((t (:foreground "LightSteelBlue"))))
- (font-lock-comment-face ((t (:foreground "deep sky blue"))))
- (font-lock-constant-face ((t (:foreground "lime green"))))
- (font-lock-doc-face ((t (:foreground "gold"))))
- (font-lock-doc-string-face ((t (:foreground "gold"))))
- (font-lock-function-name-face ((t (:background "blue4" :foreground "IndianRed"))))
- (font-lock-keyword-face ((t (:foreground "lime green"))))
- (font-lock-preprocessor-face ((t (:foreground "lime green"))))
- (font-lock-reference-face ((t (:foreground "LightSteelBlue"))))
- (font-lock-string-face ((t (:foreground "gold"))))
- (font-lock-type-face ((t (:foreground "lime green"))))
- (font-lock-variable-name-face ((t (:foreground "LightGoldenrod"))))
- (font-lock-warning-face ((t (:bold t :foreground "firebrick"))))
- (gnus-emphasis-bold ((t (:foreground "yellow2"))))
- (gnus-emphasis-bold-italic ((t (:foreground "yellow2"))))
- (gnus-emphasis-italic ((t (:foreground "yellow2"))))
- (gnus-emphasis-underline ((t (:foreground "yellow2"))))
- (gnus-emphasis-underline-bold ((t (:foreground "yellow2"))))
- (gnus-emphasis-underline-bold-italic ((t (:foreground "yellow2"))))
- (gnus-emphasis-underline-italic ((t (:foreground "yellow2"))))
- (gnus-group-mail-1-empty-face ((t (:foreground "aquamarine1"))))
- (gnus-group-mail-1-face ((t (:bold t :foreground "aquamarine1"))))
- (gnus-group-mail-2-empty-face ((t (:foreground "aquamarine2"))))
- (gnus-group-mail-2-face ((t (:bold t :foreground "aquamarine2"))))
- (gnus-group-mail-3-empty-face ((t (:foreground "aquamarine3"))))
- (gnus-group-mail-3-face ((t (:bold t :foreground "aquamarine3"))))
- (gnus-group-mail-low-empty-face ((t (:foreground "aquamarine4"))))
- (gnus-group-mail-low-face ((t (:bold t :foreground "aquamarine4"))))
- (gnus-group-news-1-empty-face ((t (:foreground "PaleTurquoise"))))
- (gnus-group-news-1-face ((t (:bold t :foreground "PaleTurquoise"))))
- (gnus-group-news-2-empty-face ((t (:foreground "turquoise"))))
- (gnus-group-news-2-face ((t (:bold t :foreground "turquoise"))))
- (gnus-group-news-3-empty-face ((t (:foreground "deep sky blue"))))
- (gnus-group-news-3-face ((t (:bold t :foreground "deep sky blue"))))
- (gnus-group-news-low-empty-face ((t (:foreground "DarkTurquoise"))))
- (gnus-group-news-low-face ((t (:bold t :foreground "DarkTurquoise"))))
- (gnus-header-content-face ((t (:foreground "gold"))))
- (gnus-header-from-face ((t (:foreground "gold"))))
- (gnus-header-name-face ((t (:foreground "deep sky blue"))))
- (gnus-header-newsgroups-face ((t (:foreground "gold"))))
- (gnus-header-subject-face ((t (:foreground "gold"))))
- (gnus-signature-face ((t (:foreground "gold"))))
- (gnus-splash-face ((t (:foreground "firebrick"))))
- (gnus-summary-cancelled-face ((t (:background "black" :foreground "deep sky blue"))))
- (gnus-summary-high-ancient-face ((t (:bold t :foreground "deep sky blue"))))
- (gnus-summary-high-read-face ((t (:bold t :foreground "deep sky blue"))))
- (gnus-summary-high-ticked-face ((t (:bold t :foreground "deep sky blue"))))
- (gnus-summary-high-unread-face ((t (:bold t :foreground "lime green"))))
- (gnus-summary-low-ancient-face ((t (:italic t :foreground "deep sky blue"))))
- (gnus-summary-low-read-face ((t (:italic t :foreground "deep sky blue"))))
- (gnus-summary-low-ticked-face ((t (:italic t :foreground "deep sky blue"))))
- (gnus-summary-low-unread-face ((t (:italic t :foreground "lime green"))))
- (gnus-summary-normal-ancient-face ((t (:foreground "deep sky blue"))))
- (gnus-summary-normal-read-face ((t (:foreground "deep sky blue"))))
- (gnus-summary-normal-ticked-face ((t (:foreground "deep sky blue"))))
- (gnus-summary-normal-unread-face ((t (:foreground "lime green"))))
- (gnus-summary-selected-face ((t (:underline t :foreground "gold"))))
- (highlight ((t (:background "steel blue" :foreground "black"))))
- (holiday-face ((t (:background "blue4" :foreground "IndianRed1"))))
- (info-menu-5 ((t (:underline t :foreground "gold"))))
- (info-node ((t (:italic t :bold t :foreground "gold"))))
- (info-xref ((t (:bold t :foreground "gold"))))
- (isearch ((t (:background "firebrick" :foreground "white"))))
- (italic ((t (:italic t :foreground "yellow2"))))
- (message-cited-text-face ((t (:foreground "gold"))))
- (message-header-cc-face ((t (:bold t :foreground "green4"))))
- (message-header-name-face ((t (:foreground "deep sky blue"))))
- (message-header-newsgroups-face ((t (:italic t :bold t :foreground "gold"))))
- (message-header-other-face ((t (:foreground "gold"))))
- (message-header-subject-face ((t (:foreground "gold"))))
- (message-header-to-face ((t (:bold t :foreground "gold"))))
- (message-header-xheader-face ((t (:foreground "blue"))))
- (message-separator-face ((t (:foreground "lime green"))))
- (modeline ((t (:foreground "white" :background "black"))))
- (modeline-buffer-id ((t (:foreground "white" :background "black"))))
- (modeline-mousable ((t (:foreground "white" :background "black"))))
- (modeline-mousable-minor-mode ((t (:foreground "white" :background "black"))))
- (overlay-empty-face ((t (nil))))
- (primary-selection ((t (:background "firebrick" :foreground "white"))))
- (region ((t (:background "firebrick" :foreground "white"))))
- (secondary-selection ((t (:background "yellow2" :foreground "black"))))
- (semantic-dirty-token-face ((t (:background "gray10"))))
- (show-paren-match-face ((t (:background "deep sky blue" :foreground "black"))))
- (show-paren-mismatch-face ((t (:background "firebrick" :foreground "white"))))
- (underline ((t (:underline t :background "blue4" :foreground "white")))))))
-
- ;; In order to produce this, follow these steps:
- ;;
- ;; 0. Make sure .Xresources and .Xdefaults don't have any Emacs related
- ;; entries.
- ;;
- ;; 1. cd into the Emacs lisp directory and run the following command:
- ;; ( for d in `find -type d`; \
- ;; do grep --files-with-matches 'defface[ ]' $d/*.el; \
- ;; done ) | sort | uniq
- ;; Put the result in a lisp block, using load-library calls.
- ;;
- ;; Repeat this for any directories on your load path which you want to
- ;; include in the standard. This might include W3, eshell, etc.
- ;;
- ;; Add some of the libraries that don't use defface:
- ;;
- ;; 2. Start emacs using the --no-init-file and --no-site-file command line
- ;; arguments. Evaluate the lisp block you prepared.
- ;; 3. Load color-theme and run color-theme-print. Save the output and use it
- ;; to define color-theme-standard.
- ;;
- ;; (progn
- ;; (load-library "add-log")
- ;; (load-library "calendar")
- ;; (load-library "comint")
- ;; (load-library "cus-edit")
- ;; (load-library "cus-face")
- ;; (load-library "custom")
- ;; (load-library "diff-mode")
- ;; (load-library "ediff-init")
- ;; (load-library "re-builder")
- ;; (load-library "viper-init")
- ;; (load-library "enriched")
- ;; (load-library "em-ls")
- ;; (load-library "em-prompt")
- ;; (load-library "esh-test")
- ;; (load-library "faces")
- ;; (load-library "font-lock")
- ;; (load-library "generic-x")
- ;; (load-library "gnus-art")
- ;; (load-library "gnus-cite")
- ;; (load-library "gnus")
- ;; (load-library "message")
- ;; (load-library "hilit-chg")
- ;; (load-library "hi-lock")
- ;; (load-library "info")
- ;; (load-library "isearch")
- ;; (load-library "log-view")
- ;; (load-library "paren")
- ;; (load-library "pcvs-info")
- ;; (load-library "antlr-mode")
- ;; (load-library "cperl-mode")
- ;; (load-library "ebrowse")
- ;; (load-library "idlwave")
- ;; (load-library "idlw-shell")
- ;; (load-library "make-mode")
- ;; (load-library "sh-script")
- ;; (load-library "vhdl-mode")
- ;; (load-library "smerge-mode")
- ;; (load-library "speedbar")
- ;; (load-library "strokes")
- ;; (load-library "artist")
- ;; (load-library "flyspell")
- ;; (load-library "texinfo")
- ;; (load-library "tex-mode")
- ;; (load-library "tooltip")
- ;; (load-library "vcursor")
- ;; (load-library "wid-edit")
- ;; (load-library "woman")
- ;; (load-library "term")
- ;; (load-library "man")
- ;; (load-file "/home/alex/elisp/color-theme.el")
- ;; (color-theme-print))
- ;;
- ;; 4. Make the color theme usable on Xemacs (add more faces, resolve
- ;; :inherit attributes)
- ;;
- (defun color-theme-emacs-21 ()
- "Color theme used by Emacs 21.1.
- Added and adapted for XEmacs by Alex Schroeder. Adaptation mostly
- consisted of resolving :inherit attributes and adding missing faces.
- This theme includes faces from the following Emacs libraries: add-log
- calendar comint cus-edit cus-face custom diff-mode ediff-init re-builder
- viper-init enriched em-ls em-prompt esh-test faces font-lock generic-x
- gnus-art gnus-cite gnus message hilit-chg hi-lock info isearch log-view
- paren pcvs-info antlr-mode cperl-mode ebrowse idlwave idlw-shell
- make-mode sh-script vhdl-mode smerge-mode speedbar strokes artist
- flyspell texinfo tex-mode tooltip vcursor wid-edit woman term man"
- (interactive)
- (color-theme-install
- '(color-theme-emacs-21
- ((background-color . "white")
- (background-mode . light)
- (border-color . "black")
- (cursor-color . "black")
- (foreground-color . "black")
- (mouse-color . "black"))
- ((Man-overstrike-face . bold)
- (Man-underline-face . underline)
- (cperl-here-face . font-lock-string-face)
- (cperl-invalid-face . underline)
- (cperl-pod-face . font-lock-comment-face)
- (cperl-pod-head-face . font-lock-variable-name-face)
- (gnus-article-button-face . bold)
- (gnus-article-mouse-face . highlight)
- (gnus-cite-attribution-face . gnus-cite-attribution-face)
- (gnus-mouse-face . highlight)
- (gnus-signature-face . gnus-signature-face)
- (gnus-summary-selected-face . gnus-summary-selected-face)
- (help-highlight-face . underline)
- (idlwave-class-arrow-face . bold)
- (idlwave-shell-breakpoint-face . idlwave-shell-bp-face)
- (idlwave-shell-expression-face . secondary-selection)
- (idlwave-shell-stop-line-face . highlight)
- (ispell-highlight-face . highlight)
- (list-matching-lines-face . bold)
- (view-highlight-face . highlight)
- (viper-insert-state-cursor-color . "Green")
- (viper-replace-overlay-cursor-color . "Red")
- (widget-mouse-face . highlight))
- (default ((t (:stipple nil :background "white" :foreground "black" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :width normal :family "adobe-courier"))))
- (Info-title-1-face ((t (:bold t :weight bold :family "helv" :height 1.728))))
- (Info-title-2-face ((t (:bold t :family "helv" :weight bold :height 1.44))))
- (Info-title-3-face ((t (:bold t :weight bold :family "helv" :height 1.2))))
- (Info-title-4-face ((t (:bold t :family "helv" :weight bold))))
- (antlr-font-lock-keyword-face ((t (:bold t :foreground "black" :weight bold))))
- (antlr-font-lock-literal-face ((t (:bold t :foreground "brown4" :weight bold))))
- (antlr-font-lock-ruledef-face ((t (:bold t :foreground "blue" :weight bold))))
- (antlr-font-lock-ruleref-face ((t (:foreground "blue4"))))
- (antlr-font-lock-tokendef-face ((t (:bold t :foreground "blue" :weight bold))))
- (antlr-font-lock-tokenref-face ((t (:foreground "orange4"))))
- (bold ((t (:bold t :weight bold))))
- (bold-italic ((t (:italic t :bold t :slant italic :weight bold))))
- (border ((t (:background "black"))))
- (calendar-today-face ((t (:underline t))))
- (change-log-acknowledgement-face ((t (:foreground "Firebrick"))))
- (change-log-conditionals-face ((t (:foreground "DarkGoldenrod"))))
- (change-log-date-face ((t (:foreground "RosyBrown"))))
- (change-log-email-face ((t (:foreground "DarkGoldenrod"))))
- (change-log-file-face ((t (:foreground "Blue"))))
- (change-log-function-face ((t (:foreground "DarkGoldenrod"))))
- (change-log-list-face ((t (:foreground "Purple"))))
- (change-log-name-face ((t (:foreground "CadetBlue"))))
- (comint-highlight-input ((t (:bold t :weight bold))))
- (comint-highlight-prompt ((t (:foreground "dark blue"))))
- (cperl-array-face ((t (:bold t :background "lightyellow2" :foreground "Blue" :weight bold))))
- (cperl-hash-face ((t (:italic t :bold t :background "lightyellow2" :foreground "Red" :slant italic :weight bold))))
- (cperl-nonoverridable-face ((t (:foreground "chartreuse3"))))
- (cursor ((t (:background "black"))))
- (custom-button-face ((t (:background "lightgrey" :foreground "black" :box (:line-width 2 :style released-button)))))
- (custom-button-pressed-face ((t (:background "lightgrey" :foreground "black" :box (:line-width 2 :style pressed-button)))))
- (custom-changed-face ((t (:background "blue" :foreground "white"))))
- (custom-comment-face ((t (:background "gray85"))))
- (custom-comment-tag-face ((t (:foreground "blue4"))))
- (custom-documentation-face ((t (nil))))
- (custom-face-tag-face ((t (:bold t :family "helv" :weight bold :height 1.2))))
- (custom-group-tag-face ((t (:bold t :foreground "blue" :weight bold :height 1.2))))
- (custom-group-tag-face-1 ((t (:bold t :family "helv" :foreground "red" :weight bold :height 1.2))))
- (custom-invalid-face ((t (:background "red" :foreground "yellow"))))
- (custom-modified-face ((t (:background "blue" :foreground "white"))))
- (custom-rogue-face ((t (:background "black" :foreground "pink"))))
- (custom-saved-face ((t (:underline t))))
- (custom-set-face ((t (:background "white" :foreground "blue"))))
- (custom-state-face ((t (:foreground "dark green"))))
- (custom-variable-button-face ((t (:bold t :underline t :weight bold))))
- (custom-variable-tag-face ((t (:bold t :family "helv" :foreground "blue" :weight bold :height 1.2))))
- (cvs-filename-face ((t (:foreground "blue4"))))
- (cvs-handled-face ((t (:foreground "pink"))))
- (cvs-header-face ((t (:bold t :foreground "blue4" :weight bold))))
- (cvs-marked-face ((t (:bold t :foreground "green3" :weight bold))))
- (cvs-msg-face ((t (:italic t :slant italic))))
- (cvs-need-action-face ((t (:foreground "orange"))))
- (cvs-unknown-face ((t (:foreground "red"))))
- (diary-face ((t (:foreground "red"))))
- (diff-added-face ((t (nil))))
- (diff-changed-face ((t (nil))))
- (diff-context-face ((t (:foreground "grey50"))))
- (diff-file-header-face ((t (:bold t :background "grey70" :weight bold))))
- (diff-function-face ((t (:foreground "grey50"))))
- (diff-header-face ((t (:background "grey85"))))
- (diff-hunk-header-face ((t (:background "grey85"))))
- (diff-index-face ((t (:bold t :weight bold :background "grey70"))))
- (diff-nonexistent-face ((t (:bold t :weight bold :background "grey70"))))
- (diff-removed-face ((t (nil))))
- (dired-face-boring ((t (:foreground "RosyBrown"))))
- (dired-face-directory ((t (:foreground "Blue"))))
- (dired-face-executable ((t (nil))))
- (dired-face-flagged ((t (:foreground "Red" :weight bold))))
- (dired-face-marked ((t (:foreground "Red" :weight bold))))
- (dired-face-permissions ((t (nil))))
- (dired-face-setuid ((t (nil))))
- (dired-face-socket ((t (nil))))
- (dired-face-symlink ((t (:foreground "Purple"))))
- (ebrowse-default-face ((t (nil))))
- (ebrowse-file-name-face ((t (:italic t :slant italic))))
- (ebrowse-member-attribute-face ((t (:foreground "red"))))
- (ebrowse-member-class-face ((t (:foreground "purple"))))
- (ebrowse-progress-face ((t (:background "blue"))))
- (ebrowse-root-class-face ((t (:bold t :foreground "blue" :weight bold))))
- (ebrowse-tree-mark-face ((t (:foreground "red"))))
- (ediff-current-diff-face-A ((t (:background "pale green" :foreground "firebrick"))))
- (ediff-current-diff-face-Ancestor ((t (:background "VioletRed" :foreground "Black"))))
- (ediff-current-diff-face-B ((t (:background "Yellow" :foreground "DarkOrchid"))))
- (ediff-current-diff-face-C ((t (:background "Pink" :foreground "Navy"))))
- (ediff-even-diff-face-A ((t (:background "light grey" :foreground "Black"))))
- (ediff-even-diff-face-Ancestor ((t (:background "Grey" :foreground "White"))))
- (ediff-even-diff-face-B ((t (:background "Grey" :foreground "White"))))
- (ediff-even-diff-face-C ((t (:background "light grey" :foreground "Black"))))
- (ediff-fine-diff-face-A ((t (:background "sky blue" :foreground "Navy"))))
- (ediff-fine-diff-face-Ancestor ((t (:background "Green" :foreground "Black"))))
- (ediff-fine-diff-face-B ((t (:background "cyan" :foreground "Black"))))
- (ediff-fine-diff-face-C ((t (:background "Turquoise" :foreground "Black"))))
- (ediff-odd-diff-face-A ((t (:background "Grey" :foreground "White"))))
- (ediff-odd-diff-face-Ancestor ((t (:background "light grey" :foreground "Black"))))
- (ediff-odd-diff-face-B ((t (:background "light grey" :foreground "Black"))))
- (ediff-odd-diff-face-C ((t (:background "Grey" :foreground "White"))))
- (eshell-ls-archive-face ((t (:bold t :foreground "Orchid" :weight bold))))
- (eshell-ls-backup-face ((t (:foreground "OrangeRed"))))
- (eshell-ls-clutter-face ((t (:bold t :foreground "OrangeRed" :weight bold))))
- (eshell-ls-directory-face ((t (:bold t :foreground "Blue" :weight bold))))
- (eshell-ls-executable-face ((t (:bold t :foreground "ForestGreen" :weight bold))))
- (eshell-ls-missing-face ((t (:bold t :foreground "Red" :weight bold))))
- (eshell-ls-product-face ((t (:foreground "OrangeRed"))))
- (eshell-ls-readonly-face ((t (:foreground "Brown"))))
- (eshell-ls-special-face ((t (:bold t :foreground "Magenta" :weight bold))))
- (eshell-ls-symlink-face ((t (:bold t :foreground "Dark Cyan" :weight bold))))
- (eshell-ls-unreadable-face ((t (:foreground "Grey30"))))
- (eshell-prompt-face ((t (:bold t :foreground "Red" :weight bold))))
- (eshell-test-failed-face ((t (:bold t :foreground "OrangeRed" :weight bold))))
- (eshell-test-ok-face ((t (:bold t :foreground "Green" :weight bold))))
- (excerpt ((t (:italic t :slant italic))))
- (fixed ((t (:bold t :weight bold))))
- (fixed-pitch ((t (:family "courier"))))
- (flyspell-duplicate-face ((t (:bold t :foreground "Gold3" :underline t :weight bold))))
- (flyspell-incorrect-face ((t (:bold t :foreground "OrangeRed" :underline t :weight bold))))
- (font-lock-builtin-face ((t (:foreground "Orchid"))))
- (font-lock-comment-face ((t (:foreground "Firebrick"))))
- (font-lock-constant-face ((t (:foreground "CadetBlue"))))
- (font-lock-doc-face ((t (:foreground "RosyBrown"))))
- (font-lock-doc-string-face ((t (:foreground "RosyBrown"))))
- (font-lock-function-name-face ((t (:foreground "Blue"))))
- (font-lock-keyword-face ((t (:foreground "Purple"))))
- (font-lock-preprocessor-face ((t (:foreground "CadetBlue"))))
- (font-lock-reference-face ((t (:foreground "Orchid"))))
- (font-lock-string-face ((t (:foreground "RosyBrown"))))
- (font-lock-type-face ((t (:foreground "ForestGreen"))))
- (font-lock-variable-name-face ((t (:foreground "DarkGoldenrod"))))
- (font-lock-warning-face ((t (:bold t :foreground "Red" :weight bold))))
- (fringe ((t (:background "grey95"))))
- (gnus-cite-attribution-face ((t (:italic t :slant italic))))
- (gnus-cite-face-1 ((t (:foreground "MidnightBlue"))))
- (gnus-cite-face-10 ((t (:foreground "medium purple"))))
- (gnus-cite-face-11 ((t (:foreground "turquoise"))))
- (gnus-cite-face-2 ((t (:foreground "firebrick"))))
- (gnus-cite-face-3 ((t (:foreground "dark green"))))
- (gnus-cite-face-4 ((t (:foreground "OrangeRed"))))
- (gnus-cite-face-5 ((t (:foreground "dark khaki"))))
- (gnus-cite-face-6 ((t (:foreground "dark violet"))))
- (gnus-cite-face-7 ((t (:foreground "SteelBlue4"))))
- (gnus-cite-face-8 ((t (:foreground "magenta"))))
- (gnus-cite-face-9 ((t (:foreground "violet"))))
- (gnus-emphasis-bold ((t (:bold t :weight bold))))
- (gnus-emphasis-bold-italic ((t (:italic t :bold t :slant italic :weight bold))))
- (gnus-emphasis-highlight-words ((t (:background "black" :foreground "yellow"))))
- (gnus-emphasis-italic ((t (:italic t :slant italic))))
- (gnus-emphasis-underline ((t (:underline t))))
- (gnus-emphasis-underline-bold ((t (:bold t :underline t :weight bold))))
- (gnus-emphasis-underline-bold-italic ((t (:italic t :bold t :underline t :slant italic :weight bold))))
- (gnus-emphasis-underline-italic ((t (:italic t :underline t :slant italic))))
- (gnus-group-mail-1-empty-face ((t (:foreground "DeepPink3"))))
- (gnus-group-mail-1-face ((t (:bold t :foreground "DeepPink3" :weight bold))))
- (gnus-group-mail-2-empty-face ((t (:foreground "HotPink3"))))
- (gnus-group-mail-2-face ((t (:bold t :foreground "HotPink3" :weight bold))))
- (gnus-group-mail-3-empty-face ((t (:foreground "magenta4"))))
- (gnus-group-mail-3-face ((t (:bold t :foreground "magenta4" :weight bold))))
- (gnus-group-mail-low-empty-face ((t (:foreground "DeepPink4"))))
- (gnus-group-mail-low-face ((t (:bold t :foreground "DeepPink4" :weight bold))))
- (gnus-group-news-1-empty-face ((t (:foreground "ForestGreen"))))
- (gnus-group-news-1-face ((t (:bold t :foreground "ForestGreen" :weight bold))))
- (gnus-group-news-2-empty-face ((t (:foreground "CadetBlue4"))))
- (gnus-group-news-2-face ((t (:bold t :foreground "CadetBlue4" :weight bold))))
- (gnus-group-news-3-empty-face ((t (nil))))
- (gnus-group-news-3-face ((t (:bold t :weight bold))))
- (gnus-group-news-4-empty-face ((t (nil))))
- (gnus-group-news-4-face ((t (:bold t :weight bold))))
- (gnus-group-news-5-empty-face ((t (nil))))
- (gnus-group-news-5-face ((t (:bold t :weight bold))))
- (gnus-group-news-6-empty-face ((t (nil))))
- (gnus-group-news-6-face ((t (:bold t :weight bold))))
- (gnus-group-news-low-empty-face ((t (:foreground "DarkGreen"))))
- (gnus-group-news-low-face ((t (:bold t :foreground "DarkGreen" :weight bold))))
- (gnus-header-content-face ((t (:italic t :foreground "indianred4" :slant italic))))
- (gnus-header-from-face ((t (:foreground "red3"))))
- (gnus-header-name-face ((t (:foreground "maroon"))))
- (gnus-header-newsgroups-face ((t (:italic t :foreground "MidnightBlue" :slant italic))))
- (gnus-header-subject-face ((t (:foreground "red4"))))
- (gnus-signature-face ((t (:italic t :slant italic))))
- (gnus-splash-face ((t (:foreground "Brown"))))
- (gnus-summary-cancelled-face ((t (:background "black" :foreground "yellow"))))
- (gnus-summary-high-ancient-face ((t (:bold t :foreground "RoyalBlue" :weight bold))))
- (gnus-summary-high-read-face ((t (:bold t :foreground "DarkGreen" :weight bold))))
- (gnus-summary-high-ticked-face ((t (:bold t :foreground "firebrick" :weight bold))))
- (gnus-summary-high-unread-face ((t (:bold t :weight bold))))
- (gnus-summary-low-ancient-face ((t (:italic t :foreground "RoyalBlue" :slant italic))))
- (gnus-summary-low-read-face ((t (:italic t :foreground "DarkGreen" :slant italic))))
- (gnus-summary-low-ticked-face ((t (:italic t :foreground "firebrick" :slant italic))))
- (gnus-summary-low-unread-face ((t (:italic t :slant italic))))
- (gnus-summary-normal-ancient-face ((t (:foreground "RoyalBlue"))))
- (gnus-summary-normal-read-face ((t (:foreground "DarkGreen"))))
- (gnus-summary-normal-ticked-face ((t (:foreground "firebrick"))))
- (gnus-summary-normal-unread-face ((t (nil))))
- (gnus-summary-selected-face ((t (:underline t))))
- (header-line ((t (:box (:line-width -1 :style released-button) :background "grey90" :foreground "grey20" :box nil))))
- (hi-black-b ((t (:bold t :weight bold))))
- (hi-black-hb ((t (:bold t :family "helv" :weight bold :height 1.67))))
- (hi-blue ((t (:background "light blue"))))
- (hi-blue-b ((t (:bold t :foreground "blue" :weight bold))))
- (hi-green ((t (:background "green"))))
- (hi-green-b ((t (:bold t :foreground "green" :weight bold))))
- (hi-pink ((t (:background "pink"))))
- (hi-red-b ((t (:bold t :foreground "red" :weight bold))))
- (hi-yellow ((t (:background "yellow"))))
- (highlight ((t (:background "darkseagreen2"))))
- (highlight-changes-delete-face ((t (:foreground "red" :underline t))))
- (highlight-changes-face ((t (:foreground "red"))))
- (holiday-face ((t (:background "pink"))))
- (idlwave-help-link-face ((t (:foreground "Blue"))))
- (idlwave-shell-bp-face ((t (:background "Pink" :foreground "Black"))))
- (info-header-node ((t (:italic t :bold t :weight bold :slant italic :foreground "brown"))))
- (info-header-xref ((t (:bold t :weight bold :foreground "magenta4"))))
- (info-menu-5 ((t (:foreground "red1"))))
- (info-menu-header ((t (:bold t :family "helv" :weight bold))))
- (info-node ((t (:italic t :bold t :foreground "brown" :slant italic :weight bold))))
- (info-xref ((t (:bold t :foreground "magenta4" :weight bold))))
- (isearch ((t (:background "magenta4" :foreground "lightskyblue1"))))
- (isearch-lazy-highlight-face ((t (:background "paleturquoise"))))
- (italic ((t (:italic t :slant italic))))
- (log-view-file-face ((t (:bold t :background "grey70" :weight bold))))
- (log-view-message-face ((t (:background "grey85"))))
- (makefile-space-face ((t (:background "hotpink"))))
- (menu ((t (nil))))
- (message-cited-text-face ((t (:foreground "red"))))
- (message-header-cc-face ((t (:foreground "MidnightBlue"))))
- (message-header-name-face ((t (:foreground "cornflower blue"))))
- (message-header-newsgroups-face ((t (:italic t :bold t :foreground "blue4" :slant italic :weight bold))))
- (message-header-other-face ((t (:foreground "steel blue"))))
- (message-header-subject-face ((t (:bold t :foreground "navy blue" :weight bold))))
- (message-header-to-face ((t (:bold t :foreground "MidnightBlue" :weight bold))))
- (message-header-xheader-face ((t (:foreground "blue"))))
- (message-mml-face ((t (:foreground "ForestGreen"))))
- (message-separator-face ((t (:foreground "brown"))))
- (modeline ((t (:background "grey75" :foreground "black" :box (:line-width -1 :style released-button)))))
- (modeline-buffer-id ((t (:bold t :background "grey75" :foreground "black" :box (:line-width -1 :style released-button)))))
- (modeline-mousable ((t (:background "grey75" :foreground "black" :box (:line-width -1 :style released-button)))))
- (modeline-mousable-minor-mode ((t (:background "grey75" :foreground "black" :box (:line-width -1 :style released-button)))))
- (mouse ((t (:background "black"))))
- (primary-selection ((t (:background "lightgoldenrod2"))))
- (reb-match-0 ((t (:background "lightblue"))))
- (reb-match-1 ((t (:background "aquamarine"))))
- (reb-match-2 ((t (:background "springgreen"))))
- (reb-match-3 ((t (:background "yellow"))))
- (region ((t (:background "lightgoldenrod2"))))
- (scroll-bar ((t (:background "grey75"))))
- (secondary-selection ((t (:background "yellow"))))
- (sh-heredoc-face ((t (:foreground "tan"))))
- (show-paren-match-face ((t (:background "turquoise"))))
- (show-paren-mismatch-face ((t (:background "purple" :foreground "white"))))
- (show-tabs-space-face ((t (:foreground "yellow"))))
- (show-tabs-tab-face ((t (:foreground "red"))))
- (smerge-base-face ((t (:foreground "red"))))
- (smerge-markers-face ((t (:background "grey85"))))
- (smerge-mine-face ((t (:foreground "blue"))))
- (smerge-other-face ((t (:foreground "darkgreen"))))
- (speedbar-button-face ((t (:foreground "green4"))))
- (speedbar-directory-face ((t (:foreground "blue4"))))
- (speedbar-file-face ((t (:foreground "cyan4"))))
- (speedbar-highlight-face ((t (:background "green"))))
- (speedbar-selected-face ((t (:foreground "red" :underline t))))
- (speedbar-tag-face ((t (:foreground "brown"))))
- (strokes-char-face ((t (:background "lightgray"))))
- (term-black ((t (:stipple nil :background "white" :foreground "black" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :width normal :family "adobe-courier"))))
- (term-blackbg ((t (:stipple nil :background "black" :foreground "black" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :width normal :family "adobe-courier"))))
- (term-blue ((t (:stipple nil :background "white" :foreground "blue" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :width normal :family "adobe-courier"))))
- (term-bluebg ((t (:stipple nil :background "blue" :foreground "black" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :width normal :family "adobe-courier"))))
- (term-bold ((t (:bold t :stipple nil :background "white" :foreground "black" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight bold :width normal :family "adobe-courier"))))
- (term-cyan ((t (:stipple nil :background "white" :foreground "cyan" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :width normal :family "adobe-courier"))))
- (term-cyanbg ((t (:stipple nil :background "cyan" :foreground "black" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :width normal :family "adobe-courier"))))
- (term-default ((t (:stipple nil :background "white" :foreground "black" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :width normal :family "adobe-courier"))))
- (term-default-bg ((t (:stipple nil :foreground "black" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :width normal :family "adobe-courier"))))
- (term-default-bg-inv ((t (:stipple nil :foreground "black" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :width normal :family "adobe-courier"))))
- (term-default-fg ((t (:stipple nil :background "white" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :width normal :family "adobe-courier"))))
- (term-default-fg-inv ((t (:stipple nil :background "white" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :width normal :family "adobe-courier"))))
- (term-green ((t (:stipple nil :background "white" :foreground "green" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :width normal :family "adobe-courier"))))
- (term-greenbg ((t (:stipple nil :background "green" :foreground "black" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :width normal :family "adobe-courier"))))
- (term-invisible ((t (:stipple nil :foreground "black" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :width normal :family "adobe-courier"))))
- (term-invisible-inv ((t (:stipple nil :foreground "black" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :width normal :family "adobe-courier"))))
- (term-magenta ((t (:stipple nil :background "white" :foreground "magenta" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :width normal :family "adobe-courier"))))
- (term-magentabg ((t (:stipple nil :background "magenta" :foreground "black" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :width normal :family "adobe-courier"))))
- (term-red ((t (:stipple nil :background "white" :foreground "red" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :width normal :family "adobe-courier"))))
- (term-redbg ((t (:stipple nil :background "red" :foreground "black" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :width normal :family "adobe-courier"))))
- (term-underline ((t (:stipple nil :background "white" :foreground "black" :inverse-video nil :box nil :strike-through nil :overline nil :underline t :slant normal :weight normal :width normal :family "adobe-courier"))))
- (term-white ((t (:stipple nil :background "white" :foreground "white" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :width normal :family "adobe-courier"))))
- (term-whitebg ((t (:stipple nil :background "white" :foreground "black" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :width normal :family "adobe-courier"))))
- (term-yellow ((t (:stipple nil :background "white" :foreground "yellow" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :width normal :family "adobe-courier"))))
- (term-yellowbg ((t (:stipple nil :background "yellow" :foreground "black" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :width normal :family "adobe-courier"))))
- (tex-math-face ((t (:foreground "RosyBrown"))))
- (texinfo-heading-face ((t (:foreground "Blue"))))
- (tool-bar ((t (:background "grey75" :foreground "black" :box (:line-width 1 :style released-button)))))
- (tooltip ((t (:background "lightyellow" :foreground "black"))))
- (trailing-whitespace ((t (:background "red"))))
- (underline ((t (:underline t))))
- (variable-pitch ((t (:family "helv"))))
- (vcursor ((t (:background "cyan" :foreground "blue" :underline t))))
- (vhdl-font-lock-attribute-face ((t (:foreground "Orchid"))))
- (vhdl-font-lock-directive-face ((t (:foreground "CadetBlue"))))
- (vhdl-font-lock-enumvalue-face ((t (:foreground "Gold4"))))
- (vhdl-font-lock-function-face ((t (:foreground "Orchid4"))))
- (vhdl-font-lock-prompt-face ((t (:bold t :foreground "Red" :weight bold))))
- (vhdl-font-lock-reserved-words-face ((t (:bold t :foreground "Orange" :weight bold))))
- (vhdl-font-lock-translate-off-face ((t (:background "LightGray"))))
- (vhdl-speedbar-architecture-face ((t (:foreground "Blue"))))
- (vhdl-speedbar-architecture-selected-face ((t (:foreground "Blue" :underline t))))
- (vhdl-speedbar-configuration-face ((t (:foreground "DarkGoldenrod"))))
- (vhdl-speedbar-configuration-selected-face ((t (:foreground "DarkGoldenrod" :underline t))))
- (vhdl-speedbar-entity-face ((t (:foreground "ForestGreen"))))
- (vhdl-speedbar-entity-selected-face ((t (:foreground "ForestGreen" :underline t))))
- (vhdl-speedbar-instantiation-face ((t (:foreground "Brown"))))
- (vhdl-speedbar-instantiation-selected-face ((t (:foreground "Brown" :underline t))))
- (vhdl-speedbar-package-face ((t (:foreground "Grey50"))))
- (vhdl-speedbar-package-selected-face ((t (:foreground "Grey50" :underline t))))
- (viper-minibuffer-emacs-face ((t (:background "darkseagreen2" :foreground "Black"))))
- (viper-minibuffer-insert-face ((t (:background "pink" :foreground "Black"))))
- (viper-minibuffer-vi-face ((t (:background "grey" :foreground "DarkGreen"))))
- (viper-replace-overlay-face ((t (:background "darkseagreen2" :foreground "Black"))))
- (viper-search-face ((t (:background "khaki" :foreground "Black"))))
- (widget-button-face ((t (:bold t :weight bold))))
- (widget-button-pressed-face ((t (:foreground "red"))))
- (widget-documentation-face ((t (:foreground "dark green"))))
- (widget-field-face ((t (:background "gray85"))))
- (widget-inactive-face ((t (:foreground "dim gray"))))
- (widget-single-line-field-face ((t (:background "gray85"))))
- (woman-addition-face ((t (:foreground "orange"))))
- (woman-bold-face ((t (:bold t :foreground "blue" :weight bold))))
- (woman-italic-face ((t (:italic t :foreground "red" :underline t :slant italic))))
- (woman-unknown-face ((t (:foreground "brown"))))
- (zmacs-region ((t (:background "lightgoldenrod2")))))))
-
- (defun color-theme-jsc-light2 ()
- "Color theme by John S Cooper, created 2001-10-29.
- This builds on `color-theme-jsc-light'."
- (interactive)
- (color-theme-jsc-light)
- (let ((color-theme-is-cumulative t))
- (color-theme-install
- '(color-theme-jsc-light2
- ((vc-annotate-very-old-color . "#0046FF")
- (senator-eldoc-use-color . t))
- nil
- (bold ((t (:bold t :weight bold))))
- (bold-italic ((t (:italic t :bold t :slant italic :weight bold))))
- (change-log-file-face ((t (:foreground "Blue"))))
- (change-log-name-face ((t (:foreground "Maroon"))))
- (comint-highlight-prompt ((t (:foreground "dark blue"))))
- (custom-button-face ((t (:background "lightgrey" :foreground "black" :box (:line-width 2 :style released-button)))))
- (custom-face-tag-face ((t (:bold t :family "helv" :weight bold :height 1.2))))
- (custom-group-tag-face ((t (:bold t :foreground "blue" :weight bold :height 1.2))))
- (custom-group-tag-face-1 ((t (:bold t :family "helv" :foreground "red" :weight bold :height 1.2))))
- (custom-variable-tag-face ((t (:bold t :family "helv" :foreground "blue" :weight bold :height 1.2))))
- (font-lock-constant-face ((t (:foreground "Maroon"))))
- (font-lock-function-name-face ((t (:foreground "Blue"))))
- (font-lock-type-face ((t (:italic t :foreground "Navy" :slant italic))))
- (fringe ((t (:background "grey88"))))
- (gnus-group-mail-1-empty-face ((t (:foreground "Blue2"))))
- (gnus-group-news-1-empty-face ((t (:foreground "ForestGreen"))))
- (gnus-group-news-1-face ((t (:bold t :foreground "ForestGreen" :weight bold))))
- (gnus-header-content-face ((t (:italic t :foreground "indianred4" :slant italic))))
- (gnus-header-name-face ((t (:bold t :foreground "maroon" :weight bold))))
- (gnus-header-subject-face ((t (:foreground "red4"))))
- (gnus-signature-face ((t (:italic t :slant italic))))
- (gnus-summary-high-read-face ((t (:bold t :foreground "DarkGreen" :weight bold))))
- (gnus-summary-high-unread-face ((t (:bold t :weight bold))))
- (gnus-summary-normal-read-face ((t (:foreground "DarkGreen"))))
- (gnus-summary-normal-ticked-face ((t (:foreground "Navy"))))
- (gnus-summary-normal-unread-face ((t (:bold t :foreground "DarkGreen" :weight bold))))
- (header-line ((t (:background "grey90" :foreground "grey20" :box nil))))
- (highlight ((t (:background "darkseagreen2"))))
- (ido-subdir-face ((t (:foreground "red"))))
- (isearch ((t (:background "magenta4" :foreground "lightskyblue1"))))
- (mode-line ((t (:background "grey88" :foreground "black" :box (:line-width -1 :style released-button)))))
- (region ((t (:background "lightgoldenrod2"))))
- (scroll-bar ((t (nil))))
- (secondary-selection ((t (:background "yellow"))))
- (show-paren-match-face ((t (:background "turquoise"))))
- (show-paren-mismatch-face ((t (:background "purple" :foreground "white"))))
- (tooltip ((t (:background "lightyellow" :foreground "black"))))))))
-
- (defun color-theme-ld-dark ()
- "Dark Color theme by Linh Dang, created 2001-11-06."
- (interactive)
- (color-theme-install
- '(color-theme-ld-dark
- ((background-color . "black")
- (background-mode . dark)
- (border-color . "black")
- (cursor-color . "yellow")
- (foreground-color . "white")
- (mouse-color . "white"))
- ((align-highlight-change-face . highlight)
- (align-highlight-nochange-face . secondary-selection)
- (apropos-keybinding-face . underline)
- (apropos-label-face . italic)
- (apropos-match-face . secondary-selection)
- (apropos-property-face . bold-italic)
- (apropos-symbol-face . bold)
- (ebnf-except-border-color . "Black")
- (ebnf-line-color . "Black")
- (ebnf-non-terminal-border-color . "Black")
- (ebnf-repeat-border-color . "Black")
- (ebnf-special-border-color . "Black")
- (ebnf-terminal-border-color . "Black")
- (gnus-article-button-face . bold)
- (gnus-article-mouse-face . highlight)
- (gnus-carpal-button-face . bold)
- (gnus-carpal-header-face . bold-italic)
- (gnus-cite-attribution-face . gnus-cite-attribution-face)
- (gnus-mouse-face . highlight)
- (gnus-selected-tree-face . modeline)
- (gnus-signature-face . gnus-signature-face)
- (gnus-summary-selected-face . gnus-summary-selected-face)
- (help-highlight-face . underline)
- (list-matching-lines-face . bold)
- (ps-line-number-color . "black")
- (ps-zebra-color . 0.95)
- (tags-tag-face . default)
- (vc-annotate-very-old-color . "#0046FF")
- (view-highlight-face . highlight)
- (widget-mouse-face . highlight))
- (default ((t (:stipple nil :background "black" :foreground "white" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :width normal :family "outline-courier new"))))
- (Info-title-1-face ((t (:bold t :weight bold :family "helv" :height 1.728))))
- (Info-title-2-face ((t (:bold t :family "helv" :weight bold :height 1.44))))
- (Info-title-3-face ((t (:bold t :weight bold :family "helv" :height 1.2))))
- (Info-title-4-face ((t (:bold t :family "helv" :weight bold))))
- (bbdb-company ((t (:italic t :slant italic))))
- (bbdb-field-name ((t (:bold t :weight bold))))
- (bbdb-field-value ((t (nil))))
- (bbdb-name ((t (:underline t))))
- (bold ((t (:bold t :weight bold))))
- (bold-italic ((t (:italic t :bold t :slant italic :weight bold))))
- (border ((t (:background "black"))))
- (change-log-acknowledgement-face ((t (:italic t :slant oblique :foreground "AntiqueWhite3"))))
- (change-log-conditionals-face ((t (:foreground "Aquamarine"))))
- (change-log-date-face ((t (:italic t :slant oblique :foreground "BurlyWood"))))
- (change-log-email-face ((t (:foreground "Aquamarine"))))
- (change-log-file-face ((t (:bold t :family "Verdana" :weight bold :foreground "LightSkyBlue" :height 0.9))))
- (change-log-function-face ((t (:foreground "Aquamarine"))))
- (change-log-list-face ((t (:foreground "LightSkyBlue"))))
- (change-log-name-face ((t (:bold t :weight bold :foreground "Gold"))))
- (clear-case-mode-string-face ((t (:bold t :family "Arial" :box (:line-width 2 :color "grey" :style released-button) :foreground "black" :background "grey" :weight bold :height 0.9))))
- (comint-highlight-input ((t (:bold t :weight bold))))
- (comint-highlight-prompt ((t (:foreground "cyan"))))
- (cursor ((t (:background "yellow"))))
- (custom-button-face ((t (:background "lightgrey" :foreground "black" :box (:line-width 2 :style released-button)))))
- (custom-button-pressed-face ((t (:background "lightgrey" :foreground "black" :box (:line-width 2 :style pressed-button)))))
- (custom-changed-face ((t (:background "blue" :foreground "white"))))
- (custom-comment-face ((t (:background "dim gray"))))
- (custom-comment-tag-face ((t (:foreground "gray80"))))
- (custom-documentation-face ((t (nil))))
- (custom-face-tag-face ((t (:bold t :family "helv" :weight bold :height 1.1))))
- (custom-group-tag-face ((t (:bold t :family "helv" :foreground "light blue" :weight bold :height 1.1))))
- (custom-group-tag-face-1 ((t (:bold t :family "helv" :foreground "pink" :weight bold :height 1.1))))
- (custom-invalid-face ((t (:background "red" :foreground "yellow"))))
- (custom-modified-face ((t (:background "blue" :foreground "white"))))
- (custom-rogue-face ((t (:background "black" :foreground "pink"))))
- (custom-saved-face ((t (:underline t))))
- (custom-set-face ((t (:background "white" :foreground "blue"))))
- (custom-state-face ((t (:foreground "lime green"))))
- (custom-variable-button-face ((t (:bold t :underline t :weight bold))))
- (custom-variable-tag-face ((t (:bold t :family "helv" :foreground "light blue" :weight bold :height 1.2))))
- (diff-added-face ((t (nil))))
- (diff-changed-face ((t (nil))))
- (diff-context-face ((t (:foreground "grey70"))))
- (diff-file-header-face ((t (:bold t :background "grey60" :weight bold))))
- (diff-function-face ((t (:foreground "grey70"))))
- (diff-header-face ((t (:background "grey45"))))
- (diff-hunk-header-face ((t (:background "grey45"))))
- (diff-index-face ((t (:bold t :weight bold :background "grey60"))))
- (diff-nonexistent-face ((t (:bold t :weight bold :background "grey60"))))
- (diff-removed-face ((t (nil))))
- (fixed-pitch ((t (:family "courier"))))
- (font-lock-builtin-face ((t (:foreground "SteelBlue"))))
- (font-lock-comment-face ((t (:italic t :foreground "AntiqueWhite3" :slant oblique))))
- (font-lock-constant-face ((t (:bold t :foreground "Gold" :weight bold))))
- (font-lock-doc-face ((t (:italic t :slant oblique :foreground "BurlyWood"))))
- (font-lock-doc-string-face ((t (:italic t :slant oblique :foreground "BurlyWood"))))
- (font-lock-function-name-face ((t (:bold t :foreground "LightSkyBlue" :weight bold :height 0.9 :family "Verdana"))))
- (font-lock-keyword-face ((t (:foreground "LightSkyBlue"))))
- (font-lock-preprocessor-face ((t (:bold t :foreground "Gold" :weight bold))))
- (font-lock-reference-face ((t (:foreground "SteelBlue"))))
- (font-lock-string-face ((t (:italic t :foreground "BurlyWood" :slant oblique))))
- (font-lock-type-face ((t (:bold t :foreground "PaleGreen" :weight bold :height 0.9 :family "Verdana"))))
- (font-lock-variable-name-face ((t (:foreground "Aquamarine"))))
- (font-lock-warning-face ((t (:bold t :foreground "chocolate" :weight bold))))
- (fringe ((t (:family "outline-courier new" :width normal :weight normal :slant normal :underline nil :overline nil :strike-through nil :box nil :inverse-video nil :stipple nil :background "grey4" :foreground "Wheat"))))
- (gnus-cite-attribution-face ((t (:italic t :slant italic))))
- (gnus-cite-face-1 ((t (:foreground "light blue"))))
- (gnus-cite-face-10 ((t (:foreground "medium purple"))))
- (gnus-cite-face-11 ((t (:foreground "turquoise"))))
- (gnus-cite-face-2 ((t (:foreground "light cyan"))))
- (gnus-cite-face-3 ((t (:foreground "light yellow"))))
- (gnus-cite-face-4 ((t (:foreground "light pink"))))
- (gnus-cite-face-5 ((t (:foreground "pale green"))))
- (gnus-cite-face-6 ((t (:foreground "beige"))))
- (gnus-cite-face-7 ((t (:foreground "orange"))))
- (gnus-cite-face-8 ((t (:foreground "magenta"))))
- (gnus-cite-face-9 ((t (:foreground "violet"))))
- (gnus-emphasis-bold ((t (:bold t :weight bold))))
- (gnus-emphasis-bold-italic ((t (:italic t :bold t :slant italic :weight bold))))
- (gnus-emphasis-highlight-words ((t (:background "black" :foreground "yellow"))))
- (gnus-emphasis-italic ((t (:italic t :slant italic))))
- (gnus-emphasis-underline ((t (:underline t))))
- (gnus-emphasis-underline-bold ((t (:bold t :underline t :weight bold))))
- (gnus-emphasis-underline-bold-italic ((t (:italic t :bold t :underline t :slant italic :weight bold))))
- (gnus-emphasis-underline-italic ((t (:italic t :underline t :slant italic))))
- (gnus-group-mail-1-empty-face ((t (:foreground "aquamarine1"))))
- (gnus-group-mail-1-face ((t (:bold t :foreground "aquamarine1" :weight bold))))
- (gnus-group-mail-2-empty-face ((t (:foreground "aquamarine2"))))
- (gnus-group-mail-2-face ((t (:bold t :foreground "aquamarine2" :weight bold))))
- (gnus-group-mail-3-empty-face ((t (:foreground "aquamarine3"))))
- (gnus-group-mail-3-face ((t (:bold t :foreground "aquamarine3" :weight bold))))
- (gnus-group-mail-low-empty-face ((t (:foreground "aquamarine4"))))
- (gnus-group-mail-low-face ((t (:bold t :foreground "aquamarine4" :weight bold))))
- (gnus-group-news-1-empty-face ((t (:foreground "PaleTurquoise"))))
- (gnus-group-news-1-face ((t (:bold t :foreground "PaleTurquoise" :weight bold))))
- (gnus-group-news-2-empty-face ((t (:foreground "turquoise"))))
- (gnus-group-news-2-face ((t (:bold t :foreground "turquoise" :weight bold))))
- (gnus-group-news-3-empty-face ((t (nil))))
- (gnus-group-news-3-face ((t (:bold t :weight bold))))
- (gnus-group-news-4-empty-face ((t (nil))))
- (gnus-group-news-4-face ((t (:bold t :weight bold))))
- (gnus-group-news-5-empty-face ((t (nil))))
- (gnus-group-news-5-face ((t (:bold t :weight bold))))
- (gnus-group-news-6-empty-face ((t (nil))))
- (gnus-group-news-6-face ((t (:bold t :weight bold))))
- (gnus-group-news-low-empty-face ((t (:foreground "DarkTurquoise"))))
- (gnus-group-news-low-face ((t (:bold t :foreground "DarkTurquoise" :weight bold))))
- (gnus-header-content-face ((t (:italic t :foreground "forest green" :slant italic))))
- (gnus-header-from-face ((t (:foreground "spring green"))))
- (gnus-header-name-face ((t (:foreground "SeaGreen"))))
- (gnus-header-newsgroups-face ((t (:italic t :foreground "yellow" :slant italic))))
- (gnus-header-subject-face ((t (:foreground "SeaGreen3"))))
- (gnus-signature-face ((t (:italic t :slant italic))))
- (gnus-splash-face ((t (:foreground "Brown"))))
- (gnus-summary-cancelled-face ((t (:background "black" :foreground "yellow"))))
- (gnus-summary-high-ancient-face ((t (:bold t :foreground "SkyBlue" :weight bold))))
- (gnus-summary-high-read-face ((t (:bold t :foreground "PaleGreen" :weight bold))))
- (gnus-summary-high-ticked-face ((t (:bold t :foreground "pink" :weight bold))))
- (gnus-summary-high-unread-face ((t (:bold t :weight bold))))
- (gnus-summary-low-ancient-face ((t (:italic t :foreground "SkyBlue" :slant italic))))
- (gnus-summary-low-read-face ((t (:italic t :foreground "PaleGreen" :slant italic))))
- (gnus-summary-low-ticked-face ((t (:italic t :foreground "pink" :slant italic))))
- (gnus-summary-low-unread-face ((t (:italic t :slant italic))))
- (gnus-summary-normal-ancient-face ((t (:foreground "SkyBlue"))))
- (gnus-summary-normal-read-face ((t (:foreground "PaleGreen"))))
- (gnus-summary-normal-ticked-face ((t (:foreground "pink"))))
- (gnus-summary-normal-unread-face ((t (nil))))
- (gnus-summary-selected-face ((t (:underline t))))
- (header-line ((t (:family "Arial" :background "grey20" :foreground "grey75" :box (:line-width 3 :color "grey20" :style released-button) :height 0.9))))
- (highlight ((t (:background "darkolivegreen"))))
- (info-header-node ((t (:italic t :bold t :weight bold :slant italic :foreground "white"))))
- (info-header-xref ((t (:bold t :weight bold :foreground "cyan"))))
- (info-menu-5 ((t (:foreground "red1"))))
- (info-menu-header ((t (:bold t :family "helv" :weight bold))))
- (info-node ((t (:italic t :bold t :foreground "white" :slant italic :weight bold))))
- (info-xref ((t (:bold t :foreground "cyan" :weight bold))))
- (isearch ((t (:background "palevioletred2"))))
- (isearch-lazy-highlight-face ((t (:background "paleturquoise4"))))
- (italic ((t (:italic t :slant italic))))
- (makefile-space-face ((t (:background "hotpink"))))
- (menu ((t (nil))))
- (message-cited-text-face ((t (:foreground "red"))))
- (message-header-cc-face ((t (:bold t :foreground "green4" :weight bold))))
- (message-header-name-face ((t (:foreground "DarkGreen"))))
- (message-header-newsgroups-face ((t (:italic t :bold t :foreground "yellow" :slant italic :weight bold))))
- (message-header-other-face ((t (:foreground "#b00000"))))
- (message-header-subject-face ((t (:foreground "green3"))))
- (message-header-to-face ((t (:bold t :foreground "green2" :weight bold))))
- (message-header-xheader-face ((t (:foreground "blue"))))
- (message-mml-face ((t (:foreground "ForestGreen"))))
- (message-separator-face ((t (:foreground "blue3"))))
- (modeline ((t (:background "grey" :foreground "black" :box (:line-width 2 :color "grey" :style released-button) :height 0.9 :family "Arial"))))
- (modeline-mousable-minor-mode ((t (:background "grey" :foreground "black" :box (:line-width 2 :color "grey" :style released-button) :height 0.9 :family "Arial"))))
- (modeline-mousable ((t (:background "grey" :foreground "black" :box (:line-width 2 :color "grey" :style released-button) :height 0.9 :family "Arial"))))
- (modeline-buffer-id ((t (:background "grey" :foreground "black" :box (:line-width 2 :color "grey" :style released-button) :height 0.9 :family "Arial"))))
- (mouse ((t (:background "white"))))
- (primary-selection ((t (:background "DarkSlateGray"))))
- (region ((t (:background "DarkSlateGray"))))
- (scroll-bar ((t (nil))))
- (secondary-selection ((t (:background "SkyBlue4"))))
- (tool-bar ((t (:background "grey75" :foreground "black" :box (:line-width 1 :style released-button)))))
- (trailing-whitespace ((t (:background "white"))))
- (underline ((t (:underline t))))
- (variable-pitch ((t (:family "helv"))))
- (widget-button-face ((t (:bold t :weight bold))))
- (widget-button-pressed-face ((t (:foreground "red"))))
- (widget-documentation-face ((t (:foreground "lime green"))))
- (widget-field-face ((t (:background "dim gray"))))
- (widget-inactive-face ((t (:foreground "light gray"))))
- (widget-single-line-field-face ((t (:background "dim gray"))))
- (zmacs-region ((t (:background "DarkSlateGray")))))))
-
- (defun color-theme-deep-blue ()
- "Color theme by Tomas Cerha, created 2001-11-13."
- (interactive)
- (color-theme-install
- '(color-theme-deep-blue
- ((background-color . "#102e4e")
- (background-mode . dark)
- (border-color . "black")
- (cursor-color . "green")
- (foreground-color . "#eeeeee")
- (mouse-color . "white"))
- ((browse-kill-ring-separator-face . bold)
- (display-time-mail-face . mode-line)
- (help-highlight-face . underline)
- (list-matching-lines-face . secondary-selection)
- (vc-annotate-very-old-color . "#0046FF")
- (view-highlight-face . highlight)
- (widget-mouse-face . highlight))
- (default ((t (:stipple nil :background "#102e4e" :foreground "#eeeeee" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :width normal :family "misc-fixed"))))
- (Info-title-1-face ((t (:bold t :weight bold :family "helv" :height 1.728))))
- (Info-title-2-face ((t (:bold t :family "helv" :weight bold :height 1.44))))
- (Info-title-3-face ((t (:bold t :weight bold :family "helv" :height 1.2))))
- (Info-title-4-face ((t (:bold t :family "helv" :weight bold))))
- (bold ((t (:bold t :weight bold))))
- (bold-italic ((t (:italic t :bold t :slant italic :weight bold))))
- (border ((t (:background "black"))))
- (calendar-today-face ((t (:background "blue"))))
- (change-log-acknowledgement-face ((t (:italic t :slant italic :foreground "CadetBlue"))))
- (change-log-conditionals-face ((t (:foreground "SeaGreen2"))))
- (change-log-date-face ((t (:foreground "burlywood"))))
- (change-log-email-face ((t (:foreground "SeaGreen2"))))
- (change-log-file-face ((t (:bold t :weight bold :foreground "goldenrod"))))
- (change-log-function-face ((t (:foreground "SeaGreen2"))))
- (change-log-list-face ((t (:bold t :weight bold :foreground "DeepSkyBlue1"))))
- (change-log-name-face ((t (:foreground "gold"))))
- (comint-highlight-input ((t (:bold t :weight bold))))
- (comint-highlight-prompt ((t (:foreground "cyan"))))
- (cursor ((t (:background "green" :foreground "black"))))
- (cvs-filename-face ((t (:foreground "lightblue"))))
- (cvs-handled-face ((t (:foreground "pink"))))
- (cvs-header-face ((t (:bold t :foreground "lightyellow" :weight bold))))
- (cvs-marked-face ((t (:bold t :foreground "green" :weight bold))))
- (cvs-msg-face ((t (:italic t :slant italic))))
- (cvs-need-action-face ((t (:foreground "orange"))))
- (cvs-unknown-face ((t (:foreground "red"))))
- (diary-face ((t (:foreground "orange red"))))
- (diff-added-face ((t (nil))))
- (diff-changed-face ((t (nil))))
- (diff-context-face ((t (:foreground "grey70"))))
- (diff-file-header-face ((t (:bold t :background "grey60" :weight bold))))
- (diff-function-face ((t (:foreground "grey70"))))
- (diff-header-face ((t (:background "grey45"))))
- (diff-hunk-header-face ((t (:background "grey45"))))
- (diff-index-face ((t (:bold t :weight bold :background "grey60"))))
- (diff-nonexistent-face ((t (:bold t :weight bold :background "grey60"))))
- (diff-removed-face ((t (nil))))
- (fixed-pitch ((t (:family "fixed"))))
- (font-latex-bold-face ((t (:bold t :foreground "OliveDrab" :weight bold))))
- (font-latex-italic-face ((t (:italic t :foreground "OliveDrab" :slant italic))))
- (font-latex-math-face ((t (:foreground "burlywood"))))
- (font-latex-sedate-face ((t (:foreground "LightGray"))))
- (font-latex-string-face ((t (:foreground "LightSalmon"))))
- (font-latex-warning-face ((t (:bold t :foreground "Pink" :weight bold))))
- (font-lock-builtin-face ((t (:foreground "LightCoral"))))
- (font-lock-comment-face ((t (:italic t :foreground "CadetBlue" :slant italic))))
- (font-lock-constant-face ((t (:foreground "gold"))))
- (font-lock-doc-face ((t (:foreground "BlanchedAlmond"))))
- (font-lock-doc-string-face ((t (:foreground "BlanchedAlmond"))))
- (font-lock-function-name-face ((t (:bold t :foreground "goldenrod" :weight bold))))
- (font-lock-keyword-face ((t (:bold t :foreground "DeepSkyBlue1" :weight bold))))
- (font-lock-preprocessor-face ((t (:foreground "gold"))))
- (font-lock-reference-face ((t (:foreground "LightCoral"))))
- (font-lock-string-face ((t (:foreground "burlywood"))))
- (font-lock-type-face ((t (:foreground "CadetBlue1"))))
- (font-lock-variable-name-face ((t (:foreground "SeaGreen2"))))
- (font-lock-warning-face ((t (:foreground "yellow"))))
- (fringe ((t (:background "#405060"))))
- (header-line ((t (:box (:line-width 2 :style released-button) :background "grey20" :foreground "grey90" :box nil))))
- (highlight ((t (:background "darkgreen"))))
- (holiday-face ((t (:foreground "green"))))
- (info-header-node ((t (:foreground "DeepSkyBlue1"))))
- (info-header-xref ((t (:bold t :weight bold :foreground "SeaGreen2"))))
- (info-menu-5 ((t (:foreground "wheat"))))
- (info-menu-header ((t (:bold t :family "helv" :weight bold))))
- (info-node ((t (:foreground "DeepSkyBlue1"))))
- (info-xref ((t (:bold t :foreground "SeaGreen2" :weight bold))))
- (isearch ((t (:background "palevioletred2" :foreground "brown4"))))
- (isearch-lazy-highlight-face ((t (:background "paleturquoise4"))))
- (italic ((t (:italic t :slant italic))))
- (menu ((t (:background "gray" :foreground "black" :family "helvetica"))))
- (modeline ((t (:background "gray" :foreground "black" :box (:line-width 2 :style released-button)))))
- (modeline-buffer-id ((t (:background "gray" :foreground "black" :box (:line-width 2 :style released-button)))))
- (modeline-mousable ((t (:background "gray" :foreground "black" :box (:line-width 2 :style released-button)))))
- (modeline-mousable-minor-mode ((t (:background "gray" :foreground "black" :box (:line-width 2 :style released-button)))))
- (mouse ((t (:background "white"))))
- (region ((t (:background "DarkCyan"))))
- (scroll-bar ((t (:background "gray" :foreground "#506070"))))
- (secondary-selection ((t (:background "yellow" :foreground "gray10"))))
- (show-paren-match-face ((t (:bold t :foreground "yellow" :weight bold))))
- (show-paren-mismatch-face ((t (:bold t :foreground "red" :weight bold))))
- (tool-bar ((t (:background "grey75" :foreground "black" :box (:line-width 1 :style released-button)))))
- (tooltip ((t (:background "lightyellow" :foreground "black"))))
- (trailing-whitespace ((t (:background "#102e4e"))))
- (underline ((t (:underline t))))
- (variable-pitch ((t (:family "helv"))))
- (widget-button-face ((t (:bold t :weight bold))))
- (widget-button-pressed-face ((t (:foreground "red"))))
- (widget-documentation-face ((t (:foreground "lime green"))))
- (widget-field-face ((t (:background "dim gray"))))
- (widget-inactive-face ((t (:foreground "light gray"))))
- (widget-single-line-field-face ((t (:background "dim gray")))))))
-
- (defun color-theme-kingsajz ()
- "Color theme by Olgierd \"Kingsajz\" Ziolko, created 2001-12-04.
- Another theme with wheat on DarkSlatGrey. Based on Subtle Hacker.
- Used on Emacs 21.1 @ WinMe. Not tested on any other systems.
-
- Some faces uses Andale mono font (nice fixed-width font).
- It is available at: http://www.microsoft.com/typography/downloads/andale32.exe
-
- Hail Eris! All hail Discordia!"
- (interactive)
- (color-theme-install
- '(color-theme-kingsajz
- ((background-color . "darkslategrey")
- (background-mode . dark)
- (border-color . "black")
- (cursor-color . "LightGray")
- (foreground-color . "wheat")
- (mouse-color . "Grey"))
- ((apropos-keybinding-face . underline)
- (apropos-label-face face italic mouse-face highlight)
- (apropos-match-face . secondary-selection)
- (apropos-property-face . bold-italic)
- (apropos-symbol-face . info-xref)
- (display-time-mail-face . mode-line)
- (gnus-article-button-face . bold)
- (gnus-article-mouse-face . highlight)
- (gnus-carpal-button-face . bold)
- (gnus-carpal-header-face . bold-italic)
- (gnus-cite-attribution-face . gnus-cite-attribution-face)
- (gnus-mouse-face . highlight)
- (gnus-selected-tree-face . modeline)
- (gnus-signature-face . gnus-signature-face)
- (gnus-summary-selected-face . gnus-summary-selected-face)
- (gnus-treat-display-xface . head)
- (help-highlight-face . underline)
- (list-matching-lines-face . bold)
- (view-highlight-face . highlight)
- (widget-mouse-face . highlight))
- (default ((t (:stipple nil :background "darkslategrey" :foreground "wheat" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :width normal :family "outline-andale mono"))))
- (bbdb-field-name ((t (:foreground "green"))))
- (bg:erc-color-face0 ((t (:background "White"))))
- (bg:erc-color-face1 ((t (:background "black"))))
- (bg:erc-color-face10 ((t (:background "lightblue1"))))
- (bg:erc-color-face11 ((t (:background "cyan"))))
- (bg:erc-color-face12 ((t (:background "blue"))))
- (bg:erc-color-face13 ((t (:background "deeppink"))))
- (bg:erc-color-face14 ((t (:background "gray50"))))
- (bg:erc-color-face15 ((t (:background "gray90"))))
- (bg:erc-color-face2 ((t (:background "blue4"))))
- (bg:erc-color-face3 ((t (:background "green4"))))
- (bg:erc-color-face4 ((t (:background "red"))))
- (bg:erc-color-face5 ((t (:background "brown"))))
- (bg:erc-color-face6 ((t (:background "purple"))))
- (bg:erc-color-face7 ((t (:background "orange"))))
- (bg:erc-color-face8 ((t (:background "yellow"))))
- (bg:erc-color-face9 ((t (:background "green"))))
- (blue ((t (:foreground "cyan"))))
- (bold ((t (:bold t :foreground "OrangeRed" :weight bold :family "Arial"))))
- (bold-italic ((t (:italic t :bold t :slant italic :weight bold :family "Arial"))))
- (border ((t (:background "black"))))
- (calendar-today-face ((t (:underline t))))
- (comint-highlight-input ((t (:bold t :weight bold))))
- (comint-highlight-prompt ((t (:foreground "cyan"))))
- (cperl-array-face ((t (:foreground "Yellow"))))
- (cperl-hash-face ((t (:foreground "White"))))
- (cperl-nonoverridable-face ((t (:foreground "SkyBlue"))))
- (cursor ((t (:background "LightGray"))))
- (custom-button-face ((t (:foreground "MediumSlateBlue" :underline t))))
- (custom-button-pressed-face ((t (:background "lightgrey" :foreground "black" :box (:line-width 2 :style pressed-button)))))
- (custom-changed-face ((t (:background "blue" :foreground "white"))))
- (custom-comment-face ((t (:background "dim gray"))))
- (custom-comment-tag-face ((t (:foreground "gray80"))))
- (custom-documentation-face ((t (:foreground "Grey"))))
- (custom-face-tag-face ((t (:bold t :family "Arial" :weight bold :height 1.2))))
- (custom-group-tag-face ((t (:foreground "MediumAquamarine"))))
- (custom-group-tag-face-1 ((t (:bold t :family "Arial" :foreground "pink" :weight bold :height 1.2))))
- (custom-invalid-face ((t (:background "red" :foreground "yellow"))))
- (custom-modified-face ((t (:background "blue" :foreground "white"))))
- (custom-rogue-face ((t (:background "black" :foreground "pink"))))
- (custom-saved-face ((t (:underline t))))
- (custom-set-face ((t (:background "white" :foreground "blue"))))
- (custom-state-face ((t (:foreground "Coral"))))
- (custom-variable-button-face ((t (:underline t))))
- (custom-variable-tag-face ((t (:foreground "Aquamarine"))))
- (date ((t (:foreground "green"))))
- (diary-face ((t (:bold t :foreground "IndianRed" :weight bold))))
- (dired-face-directory ((t (:bold t :foreground "sky blue" :weight bold))))
- (dired-face-executable ((t (:foreground "green yellow"))))
- (dired-face-flagged ((t (:foreground "tomato"))))
- (dired-face-marked ((t (:foreground "light salmon"))))
- (dired-face-permissions ((t (:foreground "aquamarine"))))
- (erc-action-face ((t (:bold t :weight bold))))
- (erc-bold-face ((t (:bold t :weight bold))))
- (erc-default-face ((t (nil))))
- (erc-direct-msg-face ((t (:foreground "pale green"))))
- (erc-error-face ((t (:bold t :foreground "IndianRed" :weight bold))))
- (erc-highlight-face ((t (:bold t :foreground "pale green" :weight bold))))
- (erc-host-danger-face ((t (:foreground "red"))))
- (erc-input-face ((t (:foreground "light blue"))))
- (erc-inverse-face ((t (:background "steel blue"))))
- (erc-notice-face ((t (:foreground "light salmon"))))
- (erc-pal-face ((t (:foreground "pale green"))))
- (erc-prompt-face ((t (:bold t :foreground "light blue" :weight bold))))
- (erc-underline-face ((t (:underline t))))
- (eshell-ls-archive-face ((t (:bold t :foreground "IndianRed" :weight bold))))
- (eshell-ls-backup-face ((t (:foreground "Grey"))))
- (eshell-ls-clutter-face ((t (:bold t :foreground "DimGray" :weight bold))))
- (eshell-ls-directory-face ((t (:bold t :foreground "MediumSlateBlue" :weight bold))))
- (eshell-ls-executable-face ((t (:bold t :foreground "Coral" :weight bold))))
- (eshell-ls-missing-face ((t (:bold t :foreground "black" :weight bold))))
- (eshell-ls-picture-face ((t (:foreground "Violet"))))
- (eshell-ls-product-face ((t (:foreground "LightSalmon"))))
- (eshell-ls-readonly-face ((t (:foreground "Aquamarine"))))
- (eshell-ls-special-face ((t (:bold t :foreground "Gold" :weight bold))))
- (eshell-ls-symlink-face ((t (:bold t :foreground "White" :weight bold))))
- (eshell-ls-text-face ((t (:foreground "medium aquamarine"))))
- (eshell-ls-todo-face ((t (:bold t :foreground "aquamarine" :weight bold))))
- (eshell-ls-unreadable-face ((t (:foreground "DimGray"))))
- (eshell-prompt-face ((t (:foreground "powder blue"))))
- (face-1 ((t (:stipple nil :foreground "royal blue" :family "andale mono"))))
- (face-2 ((t (:stipple nil :foreground "DeepSkyBlue1" :overline nil :underline nil :slant normal :family "outline-andale mono"))))
- (face-3 ((t (:stipple nil :foreground "NavajoWhite3"))))
- (fg:erc-color-face0 ((t (:foreground "white"))))
- (fg:erc-color-face1 ((t (:foreground "beige"))))
- (fg:erc-color-face10 ((t (:foreground "pale goldenrod"))))
- (fg:erc-color-face11 ((t (:foreground "light goldenrod yellow"))))
- (fg:erc-color-face12 ((t (:foreground "light yellow"))))
- (fg:erc-color-face13 ((t (:foreground "yellow"))))
- (fg:erc-color-face14 ((t (:foreground "light goldenrod"))))
- (fg:erc-color-face15 ((t (:foreground "lime green"))))
- (fg:erc-color-face2 ((t (:foreground "lemon chiffon"))))
- (fg:erc-color-face3 ((t (:foreground "light cyan"))))
- (fg:erc-color-face4 ((t (:foreground "powder blue"))))
- (fg:erc-color-face5 ((t (:foreground "sky blue"))))
- (fg:erc-color-face6 ((t (:foreground "dark sea green"))))
- (fg:erc-color-face7 ((t (:foreground "pale green"))))
- (fg:erc-color-face8 ((t (:foreground "medium spring green"))))
- (fg:erc-color-face9 ((t (:foreground "khaki"))))
- (fixed-pitch ((t (:family "courier"))))
- (font-lock-builtin-face ((t (:bold t :foreground "PaleGreen" :weight bold))))
- (font-lock-comment-face ((t (:foreground "White"))))
- (font-lock-constant-face ((t (:bold t :foreground "Aquamarine" :weight bold))))
- (font-lock-doc-face ((t (:italic t :slant italic :foreground "LightSalmon"))))
- (font-lock-doc-string-face ((t (:foreground "LightSalmon"))))
- (font-lock-function-name-face ((t (:bold t :foreground "MediumSlateBlue" :weight bold))))
- (font-lock-keyword-face ((t (:foreground "Salmon"))))
- (font-lock-preprocessor-face ((t (:foreground "Salmon"))))
- (font-lock-reference-face ((t (:foreground "pale green"))))
- (font-lock-string-face ((t (:italic t :foreground "LightSalmon" :slant italic))))
- (font-lock-type-face ((t (:bold t :foreground "YellowGreen" :weight bold))))
- (font-lock-variable-name-face ((t (:italic t :bold t :foreground "Aquamarine" :slant italic :weight bold))))
- (font-lock-warning-face ((t (:bold t :foreground "IndianRed" :weight bold))))
- (fringe ((t (:background "darkslategrey"))))
- (gnus-cite-attribution-face ((t (:family "arial"))))
- (gnus-cite-face-1 ((t (:foreground "DarkGoldenrod3"))))
- (gnus-cite-face-10 ((t (nil))))
- (gnus-cite-face-11 ((t (nil))))
- (gnus-cite-face-2 ((t (:foreground "IndianRed3"))))
- (gnus-cite-face-3 ((t (:foreground "tomato"))))
- (gnus-cite-face-4 ((t (:foreground "yellow green"))))
- (gnus-cite-face-5 ((t (:foreground "SteelBlue3"))))
- (gnus-cite-face-6 ((t (:foreground "Azure3"))))
- (gnus-cite-face-7 ((t (:foreground "Azure4"))))
- (gnus-cite-face-8 ((t (:foreground "SpringGreen4"))))
- (gnus-cite-face-9 ((t (:foreground "SlateGray4"))))
- (gnus-emphasis-bold ((t (:bold t :foreground "greenyellow" :weight bold :family "Arial"))))
- (gnus-emphasis-bold-italic ((t (:italic t :bold t :foreground "OrangeRed1" :slant italic :weight bold :family "arial"))))
- (gnus-emphasis-highlight-words ((t (:background "black" :foreground "khaki"))))
- (gnus-emphasis-italic ((t (:italic t :bold t :foreground "orange" :slant italic :weight bold :family "Arial"))))
- (gnus-emphasis-underline ((t (:foreground "greenyellow" :underline t))))
- (gnus-emphasis-underline-bold ((t (:bold t :foreground "khaki" :underline t :weight bold :family "Arial"))))
- (gnus-emphasis-underline-bold-italic ((t (:italic t :bold t :underline t :slant italic :weight bold :family "Arial"))))
- (gnus-emphasis-underline-italic ((t (:italic t :foreground "orange" :underline t :slant italic :family "Arial"))))
- (gnus-group-mail-1-empty-face ((t (:foreground "Salmon4"))))
- (gnus-group-mail-1-face ((t (:bold t :foreground "firebrick1" :weight bold))))
- (gnus-group-mail-2-empty-face ((t (:foreground "turquoise4"))))
- (gnus-group-mail-2-face ((t (:bold t :foreground "turquoise" :weight bold))))
- (gnus-group-mail-3-empty-face ((t (:foreground "LightCyan4"))))
- (gnus-group-mail-3-face ((t (:bold t :foreground "LightCyan1" :weight bold))))
- (gnus-group-mail-low-empty-face ((t (:foreground "SteelBlue4"))))
- (gnus-group-mail-low-face ((t (:bold t :foreground "SteelBlue2" :weight bold))))
- (gnus-group-news-1-empty-face ((t (:foreground "Salmon4"))))
- (gnus-group-news-1-face ((t (:bold t :foreground "FireBrick1" :weight bold))))
- (gnus-group-news-2-empty-face ((t (:foreground "darkorange3"))))
- (gnus-group-news-2-face ((t (:bold t :foreground "dark orange" :weight bold))))
- (gnus-group-news-3-empty-face ((t (:foreground "turquoise4"))))
- (gnus-group-news-3-face ((t (:bold t :foreground "Aquamarine" :weight bold))))
- (gnus-group-news-4-empty-face ((t (:foreground "SpringGreen4"))))
- (gnus-group-news-4-face ((t (:bold t :foreground "SpringGreen2" :weight bold))))
- (gnus-group-news-5-empty-face ((t (:foreground "OliveDrab4"))))
- (gnus-group-news-5-face ((t (:bold t :foreground "OliveDrab2" :weight bold))))
- (gnus-group-news-6-empty-face ((t (:foreground "DarkGoldenrod4"))))
- (gnus-group-news-6-face ((t (:bold t :foreground "DarkGoldenrod3" :weight bold))))
- (gnus-group-news-low-empty-face ((t (:foreground "wheat4"))))
- (gnus-group-news-low-face ((t (:bold t :foreground "tan4" :weight bold))))
- (gnus-header-content-face ((t (:foreground "LightSkyBlue3"))))
- (gnus-header-from-face ((t (:bold t :foreground "light cyan" :weight bold))))
- (gnus-header-name-face ((t (:bold t :foreground "DodgerBlue1" :weight bold))))
- (gnus-header-newsgroups-face ((t (:italic t :bold t :foreground "LightSkyBlue3" :slant italic :weight bold))))
- (gnus-header-subject-face ((t (:bold t :foreground "light cyan" :weight bold))))
- (gnus-signature-face ((t (:italic t :foreground "salmon" :slant italic))))
- (gnus-splash-face ((t (:foreground "Firebrick1"))))
- (gnus-summary-cancelled-face ((t (:background "black" :foreground "yellow"))))
- (gnus-summary-high-ancient-face ((t (:bold t :foreground "MistyRose4" :weight bold))))
- (gnus-summary-high-read-face ((t (:bold t :foreground "tomato3" :weight bold))))
- (gnus-summary-high-ticked-face ((t (:bold t :foreground "coral" :weight bold))))
- (gnus-summary-high-unread-face ((t (:italic t :bold t :foreground "red1" :slant italic :weight bold))))
- (gnus-summary-low-ancient-face ((t (:italic t :foreground "DarkSeaGreen4" :slant italic))))
- (gnus-summary-low-read-face ((t (:foreground "SeaGreen4"))))
- (gnus-summary-low-ticked-face ((t (:italic t :foreground "Green4" :slant italic))))
- (gnus-summary-low-unread-face ((t (:italic t :foreground "green3" :slant italic))))
- (gnus-summary-normal-ancient-face ((t (:foreground "RoyalBlue"))))
- (gnus-summary-normal-read-face ((t (:foreground "khaki4"))))
- (gnus-summary-normal-ticked-face ((t (:foreground "khaki3"))))
- (gnus-summary-normal-unread-face ((t (:foreground "khaki"))))
- (gnus-summary-selected-face ((t (:foreground "gold" :underline t))))
- (green ((t (:foreground "green"))))
- (gui-button-face ((t (:foreground "red" :background "black"))))
- (gui-element ((t (:bold t :background "#ffffff" :foreground "#000000" :weight bold))))
- (header-line ((t (:box (:line-width -1 :style released-button) :background "grey20" :foreground "grey90" :box nil))))
- (highlight ((t (:background "PaleGreen" :foreground "DarkGreen"))))
- (highline-face ((t (:background "SeaGreen"))))
- (holiday-face ((t (:background "DimGray"))))
- (info-menu-5 ((t (:underline t))))
- (info-node ((t (:bold t :foreground "DodgerBlue1" :underline t :weight bold))))
- (info-xref ((t (:bold t :foreground "DodgerBlue3" :weight bold))))
- (isearch ((t (:background "sea green" :foreground "black"))))
- (isearch-lazy-highlight-face ((t (:background "paleturquoise4"))))
- (italic ((t (:italic t :foreground "chocolate3" :slant italic))))
- (menu ((t (nil))))
- (message-cited-text-face ((t (:foreground "White"))))
- (message-header-cc-face ((t (:foreground "light cyan"))))
- (message-header-name-face ((t (:foreground "DodgerBlue1"))))
- (message-header-newsgroups-face ((t (:italic t :bold t :foreground "LightSkyBlue3" :slant italic :weight bold))))
- (message-header-other-face ((t (:foreground "LightSkyBlue3"))))
- (message-header-subject-face ((t (:bold t :foreground "light cyan" :weight bold))))
- (message-header-to-face ((t (:bold t :foreground "light cyan" :weight bold))))
- (message-header-xheader-face ((t (:foreground "DodgerBlue3"))))
- (message-mml-face ((t (:foreground "ForestGreen"))))
- (message-separator-face ((t (:background "cornflower blue" :foreground "chocolate"))))
- (modeline ((t (:background "dark olive green" :foreground "wheat" :box (:line-width -1 :style released-button)))))
- (modeline-buffer-id ((t (:bold t :background "dark olive green" :foreground "beige" :weight bold :family "arial"))))
- (modeline-mousable ((t (:bold t :background "dark olive green" :foreground "yellow green" :weight bold :family "arial"))))
- (modeline-mousable-minor-mode ((t (:bold t :background "dark olive green" :foreground "wheat" :weight bold :family "arial"))))
- (mouse ((t (:background "Grey"))))
- (paren-blink-off ((t (:foreground "brown"))))
- (region ((t (:background "dark cyan" :foreground "cyan"))))
- (ruler-mode-column-number-face ((t (:box (:color "grey76" :line-width 1 :style released-button) :background "grey76" :stipple nil :inverse-video nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :width normal :family "outline-andale mono" :foreground "black"))))
- (ruler-mode-current-column-face ((t (:bold t :box (:color "grey76" :line-width 1 :style released-button) :background "grey76" :stipple nil :inverse-video nil :strike-through nil :overline nil :underline nil :slant normal :width normal :family "outline-andale mono" :foreground "yellow" :weight bold))))
- (ruler-mode-default-face ((t (:family "outline-andale mono" :width normal :weight normal :slant normal :underline nil :overline nil :strike-through nil :inverse-video nil :stipple nil :background "grey76" :foreground "grey64" :box (:color "grey76" :line-width 1 :style released-button)))))
- (ruler-mode-fill-column-face ((t (:box (:color "grey76" :line-width 1 :style released-button) :background "grey76" :stipple nil :inverse-video nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :width normal :family "outline-andale mono" :foreground "red"))))
- (ruler-mode-margins-face ((t (:box (:color "grey76" :line-width 1 :style released-button) :foreground "grey64" :stipple nil :inverse-video nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :width normal :family "outline-andale mono" :background "grey64"))))
- (ruler-mode-tab-stop-face ((t (:box (:color "grey76" :line-width 1 :style released-button) :background "grey76" :stipple nil :inverse-video nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :width normal :family "outline-andale mono" :foreground "steelblue"))))
- (scroll-bar ((t (nil))))
- (secondary-selection ((t (:background "Aquamarine" :foreground "SlateBlue"))))
- (show-paren-match-face ((t (:bold t :background "Aquamarine" :foreground "steel blue" :weight bold))))
- (show-paren-mismatch-face ((t (:background "Red" :foreground "White"))))
- (swbuff-current-buffer-face ((t (:bold t :foreground "red" :weight bold))))
- (text-cursor ((t (:background "Red" :foreground "white"))))
- (tool-bar ((t (:background "grey75" :foreground "black" :box (:line-width 1 :style released-button)))))
- (trailing-whitespace ((t (:background "red"))))
- (underline ((t (:underline t))))
- (variable-pitch ((t (:family "Arial"))))
- (w3m-anchor-face ((t (:bold t :foreground "DodgerBlue1" :weight bold))))
- (w3m-arrived-anchor-face ((t (:bold t :foreground "DodgerBlue3" :weight bold))))
- (w3m-header-line-location-content-face ((t (:background "dark olive green" :foreground "wheat"))))
- (w3m-header-line-location-title-face ((t (:background "dark olive green" :foreground "beige"))))
- (widget-button-face ((t (:bold t :foreground "green" :weight bold :family "courier"))))
- (widget-button-pressed-face ((t (:foreground "red"))))
- (widget-documentation-face ((t (:foreground "lime green"))))
- (widget-field-face ((t (:foreground "LightBlue"))))
- (widget-inactive-face ((t (:foreground "DimGray"))))
- (widget-single-line-field-face ((t (:foreground "LightBlue"))))
- (woman-bold-face ((t (:bold t :weight bold :family "Arial"))))
- (woman-italic-face ((t (:italic t :foreground "beige" :slant italic :family "Arial"))))
- (woman-unknown-face ((t (:foreground "LightSalmon"))))
- (zmacs-region ((t (:background "dark cyan" :foreground "cyan")))))))
-
- (defun color-theme-comidia ()
- "Color theme by Marcelo Dias de Toledo, created 2001-12-17.
- Steel blue on black."
- (interactive)
- (color-theme-install
- '(color-theme-comidia
- ((background-color . "Black")
- (background-mode . dark)
- (border-color . "black")
- (cursor-color . "SteelBlue")
- (foreground-color . "SteelBlue")
- (mouse-color . "SteelBlue"))
- ((display-time-mail-face . mode-line)
- (gnus-mouse-face . highlight)
- (gnus-summary-selected-face . gnus-summary-selected-face)
- (help-highlight-face . underline)
- (ispell-highlight-face . highlight)
- (list-matching-lines-face . bold)
- (view-highlight-face . highlight)
- (widget-mouse-face . highlight))
- (default ((t (:stipple nil :background "Black" :foreground "SteelBlue" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :width semi-condensed :family "misc-fixed"))))
- (bg:erc-color-face0 ((t (:background "White"))))
- (bg:erc-color-face1 ((t (:background "black"))))
- (bg:erc-color-face10 ((t (:background "lightblue1"))))
- (bg:erc-color-face11 ((t (:background "cyan"))))
- (bg:erc-color-face12 ((t (:background "blue"))))
- (bg:erc-color-face13 ((t (:background "deeppink"))))
- (bg:erc-color-face14 ((t (:background "gray50"))))
- (bg:erc-color-face15 ((t (:background "gray90"))))
- (bg:erc-color-face2 ((t (:background "blue4"))))
- (bg:erc-color-face3 ((t (:background "green4"))))
- (bg:erc-color-face4 ((t (:background "red"))))
- (bg:erc-color-face5 ((t (:background "brown"))))
- (bg:erc-color-face6 ((t (:background "purple"))))
- (bg:erc-color-face7 ((t (:background "orange"))))
- (bg:erc-color-face8 ((t (:background "yellow"))))
- (bg:erc-color-face9 ((t (:background "green"))))
- (bold ((t (:bold t :weight bold))))
- (bold-italic ((t (:italic t :bold t :slant italic :weight bold))))
- (border ((t (:background "black"))))
- (comint-highlight-input ((t (:bold t :weight bold))))
- (comint-highlight-prompt ((t (:foreground "cyan"))))
- (cursor ((t (:background "SteelBlue"))))
- (erc-action-face ((t (:bold t :weight bold))))
- (erc-bold-face ((t (:bold t :weight bold))))
- (erc-dangerous-host-face ((t (:foreground "red"))))
- (erc-default-face ((t (nil))))
- (erc-direct-msg-face ((t (:foreground "IndianRed"))))
- (erc-error-face ((t (:background "Red" :foreground "White"))))
- (erc-fool-face ((t (:foreground "dim gray"))))
- (erc-input-face ((t (:foreground "brown"))))
- (erc-inverse-face ((t (:background "Black" :foreground "White"))))
- (erc-keyword-face ((t (:bold t :foreground "pale green" :weight bold))))
- (erc-notice-face ((t (:bold t :foreground "SlateBlue" :weight bold))))
- (erc-pal-face ((t (:bold t :foreground "Magenta" :weight bold))))
- (erc-prompt-face ((t (:bold t :background "lightBlue2" :foreground "Black" :weight bold))))
- (erc-timestamp-face ((t (:bold t :foreground "green" :weight bold))))
- (erc-underline-face ((t (:underline t))))
- (fg:erc-color-face0 ((t (:foreground "White"))))
- (fg:erc-color-face1 ((t (:foreground "black"))))
- (fg:erc-color-face10 ((t (:foreground "lightblue1"))))
- (fg:erc-color-face11 ((t (:foreground "cyan"))))
- (fg:erc-color-face12 ((t (:foreground "blue"))))
- (fg:erc-color-face13 ((t (:foreground "deeppink"))))
- (fg:erc-color-face14 ((t (:foreground "gray50"))))
- (fg:erc-color-face15 ((t (:foreground "gray90"))))
- (fg:erc-color-face2 ((t (:foreground "blue4"))))
- (fg:erc-color-face3 ((t (:foreground "green4"))))
- (fg:erc-color-face4 ((t (:foreground "red"))))
- (fg:erc-color-face5 ((t (:foreground "brown"))))
- (fg:erc-color-face6 ((t (:foreground "purple"))))
- (fg:erc-color-face7 ((t (:foreground "orange"))))
- (fg:erc-color-face8 ((t (:foreground "yellow"))))
- (fg:erc-color-face9 ((t (:foreground "green"))))
- (fixed-pitch ((t (:family "courier"))))
- (font-lock-builtin-face ((t (:foreground "LightSteelBlue"))))
- (font-lock-comment-face ((t (:foreground "chocolate1"))))
- (font-lock-constant-face ((t (:foreground "Aquamarine"))))
- (font-lock-doc-face ((t (:foreground "LightSalmon"))))
- (font-lock-doc-string-face ((t (:foreground "LightSalmon"))))
- (font-lock-function-name-face ((t (:foreground "LightSkyBlue"))))
- (font-lock-keyword-face ((t (:foreground "Cyan"))))
- (font-lock-preprocessor-face ((t (:foreground "Aquamarine"))))
- (font-lock-reference-face ((t (:foreground "LightSteelBlue"))))
- (font-lock-string-face ((t (:foreground "LightSalmon"))))
- (font-lock-type-face ((t (:foreground "PaleGreen"))))
- (font-lock-variable-name-face ((t (:foreground "LightGoldenrod"))))
- (font-lock-warning-face ((t (:bold t :foreground "Pink" :weight bold))))
- (fringe ((t (:background "grey10"))))
- (gnus-group-mail-1-empty-face ((t (:foreground "aquamarine1"))))
- (gnus-group-mail-1-face ((t (:bold t :foreground "aquamarine1" :weight bold))))
- (gnus-group-mail-2-empty-face ((t (:foreground "aquamarine2"))))
- (gnus-group-mail-2-face ((t (:bold t :foreground "aquamarine2" :weight bold))))
- (gnus-group-mail-3-empty-face ((t (:foreground "aquamarine3"))))
- (gnus-group-mail-3-face ((t (:bold t :foreground "aquamarine3" :weight bold))))
- (gnus-group-mail-low-empty-face ((t (:foreground "aquamarine4"))))
- (gnus-group-mail-low-face ((t (:bold t :foreground "aquamarine4" :weight bold))))
- (gnus-group-news-1-empty-face ((t (:foreground "PaleTurquoise"))))
- (gnus-group-news-1-face ((t (:bold t :foreground "PaleTurquoise" :weight bold))))
- (gnus-group-news-2-empty-face ((t (:foreground "turquoise"))))
- (gnus-group-news-2-face ((t (:bold t :foreground "turquoise" :weight bold))))
- (gnus-group-news-3-empty-face ((t (nil))))
- (gnus-group-news-3-face ((t (:bold t :weight bold))))
- (gnus-group-news-4-empty-face ((t (nil))))
- (gnus-group-news-4-face ((t (:bold t :weight bold))))
- (gnus-group-news-5-empty-face ((t (nil))))
- (gnus-group-news-5-face ((t (:bold t :weight bold))))
- (gnus-group-news-6-empty-face ((t (nil))))
- (gnus-group-news-6-face ((t (:bold t :weight bold))))
- (gnus-group-news-low-empty-face ((t (:foreground "DarkTurquoise"))))
- (gnus-group-news-low-face ((t (:bold t :foreground "DarkTurquoise" :weight bold))))
- (gnus-splash-face ((t (:foreground "Brown"))))
- (gnus-summary-cancelled-face ((t (:background "black" :foreground "yellow"))))
- (gnus-summary-high-ancient-face ((t (:bold t :foreground "SkyBlue" :weight bold))))
- (gnus-summary-high-read-face ((t (:bold t :foreground "PaleGreen" :weight bold))))
- (gnus-summary-high-ticked-face ((t (:bold t :foreground "pink" :weight bold))))
- (gnus-summary-high-unread-face ((t (:bold t :weight bold))))
- (gnus-summary-low-ancient-face ((t (:italic t :foreground "SkyBlue" :slant italic))))
- (gnus-summary-low-read-face ((t (:italic t :foreground "PaleGreen" :slant italic))))
- (gnus-summary-low-ticked-face ((t (:italic t :foreground "pink" :slant italic))))
- (gnus-summary-low-unread-face ((t (:italic t :slant italic))))
- (gnus-summary-normal-ancient-face ((t (:foreground "SkyBlue"))))
- (gnus-summary-normal-read-face ((t (:foreground "PaleGreen"))))
- (gnus-summary-normal-ticked-face ((t (:foreground "pink"))))
- (gnus-summary-normal-unread-face ((t (nil))))
- (gnus-summary-selected-face ((t (:underline t))))
- (header-line ((t (:family "neep" :width condensed :box (:line-width 1 :style none) :background "grey20" :foreground "grey90" :box nil))))
- (highlight ((t (:background "darkolivegreen"))))
- (isearch ((t (:background "palevioletred2" :foreground "brown4"))))
- (isearch-lazy-highlight-face ((t (:background "paleturquoise4"))))
- (italic ((t (:italic t :slant italic))))
- (menu ((t (nil))))
- (message-cited-text-face ((t (:foreground "red"))))
- (message-header-cc-face ((t (:bold t :foreground "green4" :weight bold))))
- (message-header-name-face ((t (:foreground "DarkGreen"))))
- (message-header-newsgroups-face ((t (:italic t :bold t :foreground "yellow" :slant italic :weight bold))))
- (message-header-other-face ((t (:foreground "#b00000"))))
- (message-header-subject-face ((t (:foreground "green3"))))
- (message-header-to-face ((t (:bold t :foreground "green2" :weight bold))))
- (message-header-xheader-face ((t (:foreground "blue"))))
- (message-mml-face ((t (:foreground "ForestGreen"))))
- (message-separator-face ((t (:foreground "blue3"))))
- (modeline ((t (:background "Gray10" :foreground "SteelBlue" :box (:line-width 1 :style none) :width condensed :family "neep"))))
- (modeline-buffer-id ((t (:background "Gray10" :foreground "SteelBlue" :box (:line-width 1 :style none) :width condensed :family "neep"))))
- (modeline-mousable-minor-mode ((t (:background "Gray10" :foreground "SteelBlue" :box (:line-width 1 :style none) :width condensed :family "neep"))))
- (modeline-mousable ((t (:background "Gray10" :foreground "SteelBlue" :box (:line-width 1 :style none) :width condensed :family "neep"))))
- (mouse ((t (:background "SteelBlue"))))
- (primary-selection ((t (:background "blue3"))))
- (region ((t (:background "blue3"))))
- (scroll-bar ((t (:background "grey75"))))
- (secondary-selection ((t (:background "SkyBlue4"))))
- (speedbar-button-face ((t (:foreground "green3"))))
- (speedbar-directory-face ((t (:foreground "light blue"))))
- (speedbar-file-face ((t (:foreground "cyan"))))
- (speedbar-highlight-face ((t (:background "sea green"))))
- (speedbar-selected-face ((t (:foreground "red" :underline t))))
- (speedbar-tag-face ((t (:foreground "yellow"))))
- (tool-bar ((t (:background "grey75" :foreground "black" :box (:line-width 1 :style released-button)))))
- (tooltip ((t (:background "lightyellow" :foreground "black"))))
- (trailing-whitespace ((t (:background "red"))))
- (underline ((t (:underline t))))
- (variable-pitch ((t (:family "helv"))))
- (widget-button-face ((t (:bold t :weight bold))))
- (widget-button-pressed-face ((t (:foreground "red"))))
- (widget-documentation-face ((t (:foreground "lime green"))))
- (widget-field-face ((t (:background "dim gray"))))
- (widget-inactive-face ((t (:foreground "light gray"))))
- (widget-single-line-field-face ((t (:background "dim gray"))))
- (zmacs-region ((t (:background "blue3")))))))
-
- (defun color-theme-katester ()
- "Color theme by walterh@rocketmail.com, created 2001-12-12.
- A pastelly-mac like color-theme."
- (interactive)
- (color-theme-standard)
- (let ((color-theme-is-cumulative t))
- (color-theme-install
- '(color-theme-katester
- ((background-color . "ivory")
- (cursor-color . "slateblue")
- (foreground-color . "black")
- (mouse-color . "slateblue"))
- (default ((t ((:background "ivory" :foreground "black")))))
- (bold ((t (:bold t))))
- (font-lock-string-face ((t (:foreground "maroon"))))
- (font-lock-keyword-face ((t (:foreground "blue"))))
- (font-lock-constant-face ((t (:foreground "darkblue"))))
- (font-lock-type-face ((t (:foreground "black"))))
- (font-lock-variable-name-face ((t (:foreground "black"))))
- (font-lock-function-name-face ((t (:bold t :underline t))))
- (font-lock-comment-face ((t (:background "seashell"))))
- (highlight ((t (:background "lavender"))))
- (italic ((t (:italic t))))
- (modeline ((t (:background "moccasin" :foreground "black"))))
- (region ((t (:background "lavender" ))))
- (underline ((t (:underline t))))))))
-
- (defun color-theme-arjen ()
- "Color theme by awiersma, created 2001-08-27."
- (interactive)
- (color-theme-install
- '(color-theme-arjen
- ((background-color . "black")
- (background-mode . dark)
- (border-color . "black")
- (cursor-color . "yellow")
- (foreground-color . "White")
- (mouse-color . "sienna1"))
- ((buffers-tab-face . buffers-tab)
- (cperl-here-face . font-lock-string-face)
- (cperl-invalid-face quote underline)
- (cperl-pod-face . font-lock-comment-face)
- (cperl-pod-head-face . font-lock-variable-name-face)
- (vc-mode-face . highlight))
- (default ((t (:background "black" :foreground "white"))))
- (blue ((t (:foreground "blue"))))
- (bold ((t (:bold t))))
- (bold-italic ((t (:bold t))))
- (border-glyph ((t (nil))))
- (buffers-tab ((t (:background "black" :foreground "white"))))
- (calendar-today-face ((t (:underline t))))
- (cperl-array-face ((t (:foreground "darkseagreen"))))
- (cperl-hash-face ((t (:foreground "darkseagreen"))))
- (cperl-nonoverridable-face ((t (:foreground "SkyBlue"))))
- (custom-button-face ((t (nil))))
- (custom-changed-face ((t (:background "blue" :foreground "white"))))
- (custom-documentation-face ((t (nil))))
- (custom-face-tag-face ((t (:underline t))))
- (custom-group-tag-face ((t (:underline t :foreground "light blue"))))
- (custom-group-tag-face-1 ((t (:underline t :foreground "pink"))))
- (custom-invalid-face ((t (:background "red" :foreground "yellow"))))
- (custom-modified-face ((t (:background "blue" :foreground "white"))))
- (custom-rogue-face ((t (:background "black" :foreground "pink"))))
- (custom-saved-face ((t (:underline t))))
- (custom-set-face ((t (:background "white" :foreground "blue"))))
- (custom-state-face ((t (:foreground "lime green"))))
- (custom-variable-button-face ((t (:underline t :bold t))))
- (custom-variable-tag-face ((t (:underline t :foreground "light blue"))))
- (diary-face ((t (:foreground "IndianRed"))))
- (erc-action-face ((t (:bold t))))
- (erc-bold-face ((t (:bold t))))
- (erc-default-face ((t (nil))))
- (erc-direct-msg-face ((t (:foreground "sandybrown"))))
- (erc-error-face ((t (:bold t :foreground "IndianRed"))))
- (erc-input-face ((t (:foreground "Beige"))))
- (erc-inverse-face ((t (:background "wheat" :foreground "darkslategrey"))))
- (erc-notice-face ((t (:foreground "MediumAquamarine"))))
- (erc-pal-face ((t (:foreground "pale green"))))
- (erc-prompt-face ((t (:foreground "MediumAquamarine"))))
- (erc-underline-face ((t (:underline t))))
- (eshell-ls-archive-face ((t (:bold t :foreground "IndianRed"))))
- (eshell-ls-backup-face ((t (:foreground "Grey"))))
- (eshell-ls-clutter-face ((t (:foreground "DimGray"))))
- (eshell-ls-directory-face ((t (:bold t :foreground "MediumSlateBlue"))))
- (eshell-ls-executable-face ((t (:foreground "Coral"))))
- (eshell-ls-missing-face ((t (:foreground "black"))))
- (eshell-ls-picture-face ((t (:foreground "Violet"))))
- (eshell-ls-product-face ((t (:foreground "sandybrown"))))
- (eshell-ls-readonly-face ((t (:foreground "Aquamarine"))))
- (eshell-ls-special-face ((t (:foreground "Gold"))))
- (eshell-ls-symlink-face ((t (:foreground "White"))))
- (eshell-ls-unreadable-face ((t (:foreground "DimGray"))))
- (eshell-prompt-face ((t (:foreground "MediumAquamarine"))))
- (fl-comment-face ((t (:foreground "pink"))))
- (fl-doc-string-face ((t (:foreground "purple"))))
- (fl-function-name-face ((t (:foreground "red"))))
- (fl-keyword-face ((t (:foreground "cadetblue"))))
- (fl-string-face ((t (:foreground "green"))))
- (fl-type-face ((t (:foreground "yellow"))))
- (font-lock-builtin-face ((t (:foreground "LightSteelBlue"))))
- (font-lock-comment-face ((t (:foreground "IndianRed"))))
- (font-lock-constant-face ((t (:foreground "Aquamarine"))))
- (font-lock-doc-string-face ((t (:foreground "DarkOrange"))))
- (font-lock-function-name-face ((t (:foreground "YellowGreen"))))
- (font-lock-keyword-face ((t (:foreground "PaleYellow"))))
- (font-lock-preprocessor-face ((t (:foreground "Aquamarine"))))
- (font-lock-reference-face ((t (:foreground "SlateBlue"))))
- (font-lock-string-face ((t (:foreground "Orange"))))
- (font-lock-type-face ((t (:foreground "Green"))))
- (font-lock-variable-name-face ((t (:foreground "darkseagreen"))))
- (font-lock-warning-face ((t (:bold t :foreground "Pink"))))
- (qt-classes-face ((t (:foreground "Red"))))
- (gnus-cite-attribution-face ((t (nil))))
- (gnus-cite-face-1 ((t (:bold nil :foreground "deep sky blue"))))
- (gnus-cite-face-10 ((t (:foreground "medium purple"))))
- (gnus-cite-face-11 ((t (:foreground "turquoise"))))
- (gnus-cite-face-2 ((t (:bold nil :foreground "cadetblue"))))
- (gnus-cite-face-3 ((t (:bold nil :foreground "gold"))))
- (gnus-cite-face-4 ((t (:foreground "light pink"))))
- (gnus-cite-face-5 ((t (:foreground "pale green"))))
- (gnus-cite-face-6 ((t (:bold nil :foreground "chocolate"))))
- (gnus-cite-face-7 ((t (:foreground "orange"))))
- (gnus-cite-face-8 ((t (:foreground "magenta"))))
- (gnus-cite-face-9 ((t (:foreground "violet"))))
- (gnus-emphasis-bold ((t (:bold nil))))
- (gnus-emphasis-bold-italic ((t (:bold nil))))
- (gnus-emphasis-highlight-words ((t (:background "black" :foreground "yellow"))))
- (gnus-emphasis-italic ((t (nil))))
- (gnus-emphasis-underline ((t (:underline t))))
- (gnus-emphasis-underline-bold ((t (:underline t :bold nil))))
- (gnus-emphasis-underline-bold-italic ((t (:underline t :bold nil))))
- (gnus-emphasis-underline-italic ((t (:underline t))))
- (gnus-group-mail-1-empty-face ((t (:foreground "aquamarine1"))))
- (gnus-group-mail-1-face ((t (:bold nil :foreground "aquamarine1"))))
- (gnus-group-mail-2-empty-face ((t (:foreground "aquamarine2"))))
- (gnus-group-mail-2-face ((t (:bold nil :foreground "aquamarine2"))))
- (gnus-group-mail-3-empty-face ((t (:foreground "aquamarine3"))))
- (gnus-group-mail-3-face ((t (:bold nil :foreground "aquamarine3"))))
- (gnus-group-mail-low-empty-face ((t (:foreground "aquamarine4"))))
- (gnus-group-mail-low-face ((t (:bold nil :foreground "aquamarine4"))))
- (gnus-group-news-1-empty-face ((t (:foreground "PaleTurquoise"))))
- (gnus-group-news-1-face ((t (:bold nil :foreground "PaleTurquoise"))))
- (gnus-group-news-2-empty-face ((t (:foreground "turquoise"))))
- (gnus-group-news-2-face ((t (:bold nil :foreground "turquoise"))))
- (gnus-group-news-3-empty-face ((t (nil))))
- (gnus-group-news-3-face ((t (:bold nil))))
- (gnus-group-news-4-empty-face ((t (nil))))
- (gnus-group-news-4-face ((t (:bold nil))))
- (gnus-group-news-5-empty-face ((t (nil))))
- (gnus-group-news-5-face ((t (:bold nil))))
- (gnus-group-news-6-empty-face ((t (nil))))
- (gnus-group-news-6-face ((t (:bold nil))))
- (gnus-group-news-low-empty-face ((t (:foreground "DarkTurquoise"))))
- (gnus-group-news-low-face ((t (:bold nil :foreground "DarkTurquoise"))))
- (gnus-header-content-face ((t (:foreground "forest green"))))
- (gnus-header-from-face ((t (:bold nil :foreground "spring green"))))
- (gnus-header-name-face ((t (:foreground "deep sky blue"))))
- (gnus-header-newsgroups-face ((t (:bold nil :foreground "purple"))))
- (gnus-header-subject-face ((t (:bold nil :foreground "orange"))))
- (gnus-signature-face ((t (:bold nil :foreground "khaki"))))
- (gnus-splash-face ((t (:foreground "Brown"))))
- (gnus-summary-cancelled-face ((t (:background "black" :foreground "yellow"))))
- (gnus-summary-high-ancient-face ((t (:bold nil :foreground "SkyBlue"))))
- (gnus-summary-high-read-face ((t (:bold nil :foreground "PaleGreen"))))
- (gnus-summary-high-ticked-face ((t (:bold nil :foreground "pink"))))
- (gnus-summary-high-unread-face ((t (:bold nil))))
- (gnus-summary-low-ancient-face ((t (:foreground "SkyBlue"))))
- (gnus-summary-low-read-face ((t (:foreground "PaleGreen"))))
- (gnus-summary-low-ticked-face ((t (:foreground "pink"))))
- (gnus-summary-low-unread-face ((t (nil))))
- (gnus-summary-normal-ancient-face ((t (:foreground "SkyBlue"))))
- (gnus-summary-normal-read-face ((t (:foreground "PaleGreen"))))
- (gnus-summary-normal-ticked-face ((t (:foreground "pink"))))
- (gnus-summary-normal-unread-face ((t (nil))))
- (gnus-summary-selected-face ((t (:underline t))))
- (green ((t (:foreground "green"))))
- (gui-button-face ((t (:background "grey75" :foreground "black"))))
- (gui-element ((t (:background "#D4D0C8" :foreground "black"))))
- (highlight ((t (:background "darkolivegreen"))))
- (highline-face ((t (:background "SeaGreen"))))
- (holiday-face ((t (:background "DimGray"))))
- (info-menu-5 ((t (:underline t))))
- (info-node ((t (:underline t :bold t :foreground "DodgerBlue1"))))
- (info-xref ((t (:underline t :foreground "DodgerBlue1"))))
- (isearch ((t (:background "blue"))))
- (isearch-secondary ((t (:foreground "red3"))))
- (italic ((t (nil))))
- (left-margin ((t (nil))))
- (list-mode-item-selected ((t (:background "gray68" :foreground "white"))))
- (message-cited-text-face ((t (:bold t :foreground "green"))))
- (message-header-cc-face ((t (:bold t :foreground "green4"))))
- (message-header-name-face ((t (:bold t :foreground "orange"))))
- (message-header-newsgroups-face ((t (:bold t :foreground "violet"))))
- (message-header-other-face ((t (:bold t :foreground "chocolate"))))
- (message-header-subject-face ((t (:bold t :foreground "yellow"))))
- (message-header-to-face ((t (:bold t :foreground "cadetblue"))))
- (message-header-xheader-face ((t (:bold t :foreground "light blue"))))
- (message-mml-face ((t (:bold t :foreground "Green3"))))
- (message-separator-face ((t (:foreground "blue3"))))
- (modeline ((t (:background "DarkRed" :foreground "white" :box (:line-width 1 :style released-button)))))
- (modeline-buffer-id ((t (:background "DarkRed" :foreground "white"))))
- (modeline-mousable ((t (:background "DarkRed" :foreground "white"))))
- (modeline-mousable-minor-mode ((t (:background "DarkRed" :foreground "white"))))
- (p4-depot-added-face ((t (:foreground "blue"))))
- (p4-depot-deleted-face ((t (:foreground "red"))))
- (p4-depot-unmapped-face ((t (:foreground "grey30"))))
- (p4-diff-change-face ((t (:foreground "dark green"))))
- (p4-diff-del-face ((t (:foreground "red"))))
- (p4-diff-file-face ((t (:background "gray90"))))
- (p4-diff-head-face ((t (:background "gray95"))))
- (p4-diff-ins-face ((t (:foreground "blue"))))
- (pointer ((t (nil))))
- (primary-selection ((t (:background "blue"))))
- (red ((t (:foreground "red"))))
- (region ((t (:background "blue"))))
- (right-margin ((t (nil))))
- (secondary-selection ((t (:background "darkslateblue"))))
- (show-paren-match-face ((t (:background "Aquamarine" :foreground "SlateBlue"))))
- (show-paren-mismatch-face ((t (:background "Red" :foreground "White"))))
- (text-cursor ((t (:background "yellow" :foreground "black"))))
- (toolbar ((t (nil))))
- (underline ((nil (:underline nil))))
- (vertical-divider ((t (nil))))
- (widget ((t (nil))))
- (widget-button-face ((t (:bold t))))
- (widget-button-pressed-face ((t (:foreground "red"))))
- (widget-documentation-face ((t (:foreground "lime green"))))
- (widget-field-face ((t (:background "dim gray"))))
- (widget-inactive-face ((t (:foreground "light gray"))))
- (widget-single-line-field-face ((t (:background "dim gray"))))
- (woman-bold-face ((t (:bold t))))
- (woman-italic-face ((t (:foreground "beige"))))
- (woman-unknown-face ((t (:foreground "LightSalmon"))))
- (yellow ((t (:foreground "yellow"))))
- (zmacs-region ((t (:background "snow" :foreground "blue")))))))
-
- (defun color-theme-tty-dark ()
- "Color theme by Oivvio Polite, created 2002-02-01. Good for tty display."
- (interactive)
- (color-theme-install
- '(color-theme-tty-dark
- ((background-color . "black")
- (background-mode . dark)
- (border-color . "blue")
- (cursor-color . "red")
- (foreground-color . "white")
- (mouse-color . "black"))
- ((ispell-highlight-face . highlight)
- (list-matching-lines-face . bold)
- (tinyreplace-:face . highlight)
- (view-highlight-face . highlight))
- (default ((t (nil))))
- (bold ((t (:underline t :background "black" :foreground "white"))))
- (bold-italic ((t (:underline t :foreground "white"))))
- (calendar-today-face ((t (:underline t))))
- (diary-face ((t (:foreground "red"))))
- (font-lock-builtin-face ((t (:foreground "blue"))))
- (font-lock-comment-face ((t (:foreground "cyan"))))
- (font-lock-constant-face ((t (:foreground "magenta"))))
- (font-lock-function-name-face ((t (:foreground "cyan"))))
- (font-lock-keyword-face ((t (:foreground "red"))))
- (font-lock-string-face ((t (:foreground "green"))))
- (font-lock-type-face ((t (:foreground "yellow"))))
- (font-lock-variable-name-face ((t (:foreground "blue"))))
- (font-lock-warning-face ((t (:bold t :foreground "magenta"))))
- (highlight ((t (:background "blue" :foreground "yellow"))))
- (holiday-face ((t (:background "cyan"))))
- (info-menu-5 ((t (:underline t))))
- (info-node ((t (:italic t :bold t))))
- (info-xref ((t (:bold t))))
- (italic ((t (:underline t :background "red"))))
- (message-cited-text-face ((t (:foreground "red"))))
- (message-header-cc-face ((t (:bold t :foreground "green"))))
- (message-header-name-face ((t (:foreground "green"))))
- (message-header-newsgroups-face ((t (:italic t :bold t :foreground "yellow"))))
- (message-header-other-face ((t (:foreground "#b00000"))))
- (message-header-subject-face ((t (:foreground "green"))))
- (message-header-to-face ((t (:bold t :foreground "green"))))
- (message-header-xheader-face ((t (:foreground "blue"))))
- (message-mml-face ((t (:foreground "green"))))
- (message-separator-face ((t (:foreground "blue"))))
-
- (modeline ((t (:background "white" :foreground "blue"))))
- (modeline-buffer-id ((t (:background "white" :foreground "red"))))
- (modeline-mousable ((t (:background "white" :foreground "magenta"))))
- (modeline-mousable-minor-mode ((t (:background "white" :foreground "yellow"))))
- (region ((t (:background "white" :foreground "black"))))
- (zmacs-region ((t (:background "cyan" :foreground "black"))))
- (secondary-selection ((t (:background "blue"))))
- (show-paren-match-face ((t (:background "red"))))
- (show-paren-mismatch-face ((t (:background "magenta" :foreground "white"))))
- (underline ((t (:underline t)))))))
-
- (defun color-theme-aliceblue ()
- "Color theme by Girish Bharadwaj, created 2002-03-27.
- Includes comint prompt, custom, font-lock, isearch,
- jde, senator, speedbar, and widget."
- (interactive)
- (color-theme-install
- '(color-theme-aliceblue
- ((background-color . "AliceBlue")
- (background-mode . light)
- (border-color . "black")
- (cursor-color . "black")
- (foreground-color . "DarkSlateGray4")
- (mouse-color . "black"))
- ((help-highlight-face . underline)
- (list-matching-lines-face . bold)
- (semantic-which-function-use-color . t)
- (senator-eldoc-use-color . t)
- (view-highlight-face . highlight)
- (widget-mouse-face . highlight))
- (default ((t (:stipple nil :background "AliceBlue" :foreground "DarkSlateGray4" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :width normal :family "outline-courier new"))))
- (bold ((t (:bold t :weight bold))))
- (bold-italic ((t (:italic t :bold t :slant italic :weight bold))))
- (border ((t (:background "black"))))
- (comint-highlight-input ((t (:bold t :weight bold))))
- (comint-highlight-prompt ((t (:foreground "dark blue"))))
- (cursor ((t (:background "black"))))
- (custom-button-face ((t (:background "lightgrey" :foreground "black" :box (:line-width 2 :style released-button)))))
- (custom-button-pressed-face ((t (:background "lightgrey" :foreground "black" :box (:line-width 2 :style pressed-button)))))
- (custom-changed-face ((t (:background "blue" :foreground "white"))))
- (custom-comment-face ((t (:background "gray85"))))
- (custom-comment-tag-face ((t (:foreground "blue4"))))
- (custom-documentation-face ((t (nil))))
- (custom-face-tag-face ((t (:bold t :family "helv" :weight bold :height 1.2))))
- (custom-group-tag-face ((t (:bold t :foreground "blue" :weight bold :height 1.2))))
- (custom-group-tag-face-1 ((t (:bold t :family "helv" :foreground "red" :weight bold :height 1.2))))
- (custom-invalid-face ((t (:background "red" :foreground "yellow"))))
- (custom-modified-face ((t (:background "blue" :foreground "white"))))
- (custom-rogue-face ((t (:background "black" :foreground "pink"))))
- (custom-saved-face ((t (:underline t))))
- (custom-set-face ((t (:background "white" :foreground "blue"))))
- (custom-state-face ((t (:foreground "dark green"))))
- (custom-variable-button-face ((t (:bold t :underline t :weight bold))))
- (custom-variable-tag-face ((t (:bold t :family "helv" :foreground "blue" :weight bold :height 1.2))))
- (fixed-pitch ((t (:family "courier"))))
- (font-lock-builtin-face ((t (:foreground "Orchid"))))
- (font-lock-comment-face ((t (:italic t :foreground "Firebrick" :slant oblique))))
- (font-lock-constant-face ((t (:foreground "CadetBlue"))))
- (font-lock-function-name-face ((t (:bold t :foreground "Blue" :weight extra-bold :family "outline-verdana"))))
- (font-lock-keyword-face ((t (:bold t :foreground "Purple" :weight semi-bold :family "outline-verdana"))))
- (font-lock-preprocessor-face ((t (:foreground "CadetBlue"))))
- (font-lock-reference-face ((t (:foreground "Orchid"))))
- (font-lock-string-face ((t (:foreground "RosyBrown"))))
- (font-lock-type-face ((t (:italic t :foreground "ForestGreen" :slant italic))))
- (font-lock-variable-name-face ((t (:foreground "DarkGoldenrod" :width condensed))))
- (font-lock-warning-face ((t (:bold t :foreground "Red" :weight bold))))
- (fringe ((t (:background "DarkSlateBlue"))))
- (header-line ((t (:box (:line-width -1 :style released-button) :background "grey90" :foreground "grey20" :box nil))))
- (highlight ((t (:background "darkseagreen2"))))
- (isearch ((t (:background "magenta4" :foreground "lightskyblue1"))))
- (isearch-lazy-highlight-face ((t (:background "paleturquoise"))))
- (italic ((t (:italic t :slant italic))))
- (jde-bug-breakpoint-cursor ((t (:background "brown" :foreground "cyan"))))
- (jde-db-active-breakpoint-face ((t (:background "red" :foreground "black"))))
- (jde-db-requested-breakpoint-face ((t (:background "yellow" :foreground "black"))))
- (jde-db-spec-breakpoint-face ((t (:background "green" :foreground "black"))))
- (jde-java-font-lock-api-face ((t (:foreground "dark goldenrod"))))
- (jde-java-font-lock-bold-face ((t (:bold t :weight bold))))
- (jde-java-font-lock-code-face ((t (nil))))
- (jde-java-font-lock-constant-face ((t (:foreground "CadetBlue"))))
- (jde-java-font-lock-doc-tag-face ((t (:foreground "green4"))))
- (jde-java-font-lock-italic-face ((t (:italic t :slant italic))))
- (jde-java-font-lock-link-face ((t (:foreground "blue" :underline t :slant normal))))
- (jde-java-font-lock-modifier-face ((t (:foreground "Orchid"))))
- (jde-java-font-lock-number-face ((t (:foreground "RosyBrown"))))
- (jde-java-font-lock-operator-face ((t (:foreground "medium blue"))))
- (jde-java-font-lock-package-face ((t (:foreground "blue3"))))
- (jde-java-font-lock-pre-face ((t (nil))))
- (jde-java-font-lock-underline-face ((t (:underline t))))
- (menu ((t (nil))))
- (modeline ((t (:background "grey75" :foreground "black" :box (:line-width -1 :style released-button)))))
- (modeline-buffer-id ((t (:background "grey75" :foreground "black"))))
- (modeline-mousable ((t (:background "grey75" :foreground "black"))))
- (modeline-mousable-minor-mode ((t (:background "grey75" :foreground "black"))))
- (mouse ((t (:background "black"))))
- (primary-selection ((t (:background "lightgoldenrod2"))))
- (region ((t (:background "lightgoldenrod2"))))
- (scroll-bar ((t (nil))))
- (secondary-selection ((t (:background "yellow"))))
- (semantic-dirty-token-face ((t (:background "lightyellow"))))
- (semantic-unmatched-syntax-face ((t (:underline "red"))))
- (senator-intangible-face ((t (:foreground "gray25"))))
- (senator-momentary-highlight-face ((t (:background "gray70"))))
- (senator-read-only-face ((t (:background "#CCBBBB"))))
- (show-paren-match-face ((t (:background "turquoise"))))
- (show-paren-mismatch-face ((t (:background "purple" :foreground "white"))))
- (speedbar-button-face ((t (:foreground "green4"))))
- (speedbar-directory-face ((t (:foreground "blue4"))))
- (speedbar-file-face ((t (:foreground "cyan4"))))
- (speedbar-highlight-face ((t (:background "green"))))
- (speedbar-selected-face ((t (:foreground "red" :underline t))))
- (speedbar-tag-face ((t (:foreground "brown"))))
- (template-message-face ((t (:bold t :weight bold))))
- (tool-bar ((t (:background "grey75" :foreground "black" :box (:line-width 1 :style released-button)))))
- (trailing-whitespace ((t (:background "red"))))
- (underline ((t (:underline t))))
- (variable-pitch ((t (:family "helv"))))
- (widget-button-face ((t (:bold t :weight bold))))
- (widget-button-pressed-face ((t (:foreground "red"))))
- (widget-documentation-face ((t (:foreground "dark green"))))
- (widget-field-face ((t (:background "gray85"))))
- (widget-inactive-face ((t (:foreground "dim gray"))))
- (widget-single-line-field-face ((t (:background "gray85"))))
- (trailing-whitespace ((t (:background "red"))))
- (underline ((t (:underline t))))
- (variable-pitch ((t (:family "helv"))))
- (widget-button-face ((t (:bold t :weight bold))))
- (widget-button-pressed-face ((t (:foreground "red"))))
- (widget-documentation-face ((t (:foreground "dark green"))))
- (widget-field-face ((t (:background "gray85"))))
- (widget-inactive-face ((t (:foreground "dim gray"))))
- (widget-single-line-field-face ((t (:background "gray85"))))
- (zmacs-region ((t (:background "lightgoldenrod2")))))))
-
- (defun color-theme-black-on-gray ()
- "Color theme by sbhojwani, created 2002-04-03.
- Includes ecb, font-lock, paren, semantic, and widget faces.
- Some of the font-lock faces are disabled, ie. they look just
- like the default face. This is for people that don't like
- the look of \"angry fruit salad\" when editing."
- (interactive)
- (color-theme-install
- '(color-theme-black-on-gray
- ((background-color . "white")
- (background-mode . light)
- (border-color . "blue")
- (foreground-color . "black"))
- ((buffers-tab-face . buffers-tab)
- (ecb-directories-general-face . ecb-default-general-face)
- (ecb-directory-face . ecb-default-highlight-face)
- (ecb-history-face . ecb-default-highlight-face)
- (ecb-history-general-face . ecb-default-general-face)
- (ecb-method-face . ecb-default-highlight-face)
- (ecb-methods-general-face . ecb-default-general-face)
- (ecb-source-face . ecb-default-highlight-face)
- (ecb-source-in-directories-buffer-face . ecb-source-in-directories-buffer-face)
- (ecb-sources-general-face . ecb-default-general-face)
- (ecb-token-header-face . ecb-token-header-face))
- (default ((t (nil))))
- (blue ((t (:foreground "blue"))))
- (bold ((t (:bold t :size "10pt"))))
- (bold-italic ((t (:italic t :bold t :size "10pt"))))
- (border-glyph ((t (:size "11pt"))))
- (buffers-tab ((t (:background "gray75"))))
- (display-time-mail-balloon-enhance-face ((t (:background "orange"))))
- (display-time-mail-balloon-gnus-group-face ((t (:foreground "blue"))))
- (display-time-time-balloon-face ((t (:foreground "red"))))
- (ecb-bucket-token-face ((t (:bold t :size "10pt"))))
- (ecb-default-general-face ((t (nil))))
- (ecb-default-highlight-face ((t (:background "cornflower blue" :foreground "yellow"))))
- (ecb-directories-general-face ((t (nil))))
- (ecb-directory-face ((t (:background "cornflower blue" :foreground "yellow"))))
- (ecb-history-face ((t (:background "cornflower blue" :foreground "yellow"))))
- (ecb-history-general-face ((t (nil))))
- (ecb-method-face ((t (:background "cornflower blue" :foreground "yellow"))))
- (ecb-methods-general-face ((t (nil))))
- (ecb-source-face ((t (:background "cornflower blue" :foreground "yellow"))))
- (ecb-source-in-directories-buffer-face ((t (:foreground "medium blue"))))
- (ecb-sources-general-face ((t (nil))))
- (ecb-token-header-face ((t (:background "SeaGreen1"))))
- (ecb-type-token-class-face ((t (:bold t :size "10pt"))))
- (ecb-type-token-enum-face ((t (:bold t :size "10pt"))))
- (ecb-type-token-group-face ((t (:bold t :size "10pt" :foreground "dimgray"))))
- (ecb-type-token-interface-face ((t (:bold t :size "10pt"))))
- (ecb-type-token-struct-face ((t (:bold t :size "10pt"))))
- (ecb-type-token-typedef-face ((t (:bold t :size "10pt"))))
- (font-lock-builtin-face ((t (:foreground "red3"))))
- (font-lock-constant-face ((t (:foreground "blue3"))))
- (font-lock-comment-face ((t (:foreground "blue"))))
- (font-lock-doc-face ((t (:foreground "green4"))))
- (font-lock-doc-string-face ((t (:foreground "green4"))))
- (font-lock-function-name-face ((t (nil))))
- (font-lock-keyword-face ((t (nil))))
- (font-lock-preprocessor-face ((t (:foreground "blue3"))))
- (font-lock-reference-face ((t (:foreground "red3"))))
- (font-lock-string-face ((t (nil))))
- (font-lock-type-face ((t (nil))))
- (font-lock-variable-name-face ((t (nil))))
- (font-lock-warning-face ((t (nil))))
- (green ((t (:foreground "green"))))
- (gui-button-face ((t (:background "grey75"))))
- (gui-element ((t (:size "8pt" :background "gray75"))))
- (highlight ((t (:background "darkseagreen2"))))
- (isearch ((t (:background "paleturquoise"))))
- (isearch-secondary ((t (:foreground "red3"))))
- (italic ((t (:size "10pt"))))
- (left-margin ((t (nil))))
- (list-mode-item-selected ((t (:background "gray68"))))
- (modeline ((t (:background "gray75"))))
- (modeline-buffer-id ((t (:background "gray75" :foreground "blue4"))))
- (modeline-mousable ((t (:background "gray75" :foreground "firebrick"))))
- (modeline-mousable-minor-mode ((t (:background "gray75" :foreground "green4"))))
- (paren-blink-off ((t (:foreground "gray"))))
- (paren-match ((t (:background "darkseagreen2"))))
- (paren-mismatch ((t (nil))))
- (pointer ((t (nil))))
- (primary-selection ((t (:background "gray65"))))
- (red ((t (:foreground "red"))))
- (region ((t (:background "gray65"))))
- (right-margin ((t (nil))))
- (secondary-selection ((t (:background "paleturquoise"))))
- (semantic-dirty-token-face ((t (nil))))
- (semantic-unmatched-syntax-face ((t (nil))))
- (text-cursor ((t (:background "red" :foreground "gray"))))
- (toolbar ((t (:background "gray75"))))
- (underline ((t (:underline t))))
- (vertical-divider ((t (:background "gray75"))))
- (widget ((t (:size "8pt" :background "gray75"))))
- (widget-button-face ((t (:bold t))))
- (widget-button-pressed-face ((t (:foreground "red"))))
- (widget-documentation-face ((t (:foreground "dark green"))))
- (widget-field-face ((t (:background "gray85"))))
- (widget-inactive-face ((t (nil))))
- (yellow ((t (:foreground "yellow"))))
- (zmacs-region ((t (:background "gray65")))))))
-
- (defun color-theme-dark-blue2 ()
- "Color theme by Chris McMahan, created 2002-04-12.
- Includes antlr, bbdb, change-log, comint, cperl, custom cvs, diff,
- dired, display-time, ebrowse, ecb, ediff, erc, eshell, fl, font-lock,
- gnus, hi, highlight, html-helper, hyper-apropos, info, isearch, jde,
- message, mmm, paren, semantic, senator, sgml, smerge, speedbar,
- strokes, term, vhdl, viper, vm, widget, xref, xsl, xxml. Yes, it is
- a large theme."
- (interactive)
- (color-theme-install
- '(color-theme-dark-blue2
- ((background-color . "#233b5a")
- (background-mode . dark)
- (background-toolbar-color . "#cf3ccf3ccf3c")
- (border-color . "black")
- (bottom-toolbar-shadow-color . "#79e77df779e7")
- (cursor-color . "Yellow")
- (foreground-color . "#fff8dc")
- (mouse-color . "Grey")
- (top-toolbar-shadow-color . "#fffffbeeffff")
- (viper-saved-cursor-color-in-replace-mode . "Red3"))
- ((blank-space-face . blank-space-face)
- (blank-tab-face . blank-tab-face)
- (cperl-invalid-face . underline)
- (ecb-directories-general-face . ecb-directories-general-face)
- (ecb-directory-face . ecb-directory-face)
- (ecb-history-face . ecb-history-face)
- (ecb-history-general-face . ecb-history-general-face)
- (ecb-method-face . ecb-method-face)
- (ecb-methods-general-face . ecb-methods-general-face)
- (ecb-source-face . ecb-source-face)
- (ecb-source-in-directories-buffer-face . ecb-sources-face)
- (ecb-sources-general-face . ecb-sources-general-face)
- (ecb-token-header-face . ecb-token-header-face)
- (gnus-article-button-face . bold)
- (gnus-article-mouse-face . highlight)
- (gnus-cite-attribution-face . gnus-cite-attribution-face)
- (gnus-signature-face . gnus-signature-face)
- (gnus-summary-selected-face . gnus-summary-selected-face)
- (help-highlight-face . underline)
- (highline-face . highline-face)
- (highline-vertical-face . highline-vertical-face)
- (list-matching-lines-face . bold)
- (ps-zebra-color . 0.95)
- (senator-eldoc-use-color . t)
- (sgml-set-face . t)
- (tags-tag-face . default)
- (view-highlight-face . highlight)
- (vm-highlight-url-face . bold-italic)
- (vm-highlighted-header-face . bold)
- (vm-mime-button-face . gui-button-face)
- (vm-summary-highlight-face . bold)
- (widget-mouse-face . highlight))
- (default ((t (:stipple nil :background "#233b5a" :foreground "#fff8dc" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :width normal :family "outline-lucida console"))))
- (Info-title-1-face ((t (:bold t :weight bold :height 1.728 :family "helv"))))
- (Info-title-2-face ((t (:bold t :weight bold :height 1.44 :family "helv"))))
- (Info-title-3-face ((t (:bold t :weight bold :height 1.2 :family "helv"))))
- (Info-title-4-face ((t (:bold t :weight bold :family "helv"))))
- (antlr-font-lock-keyword-face ((t (:bold t :foreground "Gray85" :weight bold))))
- (antlr-font-lock-literal-face ((t (:bold t :foreground "Gray85" :weight bold))))
- (antlr-font-lock-ruledef-face ((t (:bold t :foreground "Gray85" :weight bold))))
- (antlr-font-lock-ruleref-face ((t (:foreground "Gray85"))))
- (antlr-font-lock-tokendef-face ((t (:bold t :foreground "Gray85" :weight bold))))
- (antlr-font-lock-tokenref-face ((t (:foreground "Gray85"))))
- (bbdb-company ((t (:italic t :slant italic))))
- (bbdb-field-name ((t (:bold t :weight bold))))
- (bbdb-field-value ((t (nil))))
- (bbdb-name ((t (:underline t))))
- (bg:erc-color-face0 ((t (:background "White"))))
- (bg:erc-color-face1 ((t (:background "black"))))
- (bg:erc-color-face10 ((t (:background "lightblue1"))))
- (bg:erc-color-face11 ((t (:background "cyan"))))
- (bg:erc-color-face12 ((t (:background "blue"))))
- (bg:erc-color-face13 ((t (:background "deeppink"))))
- (bg:erc-color-face14 ((t (:background "gray50"))))
- (bg:erc-color-face15 ((t (:background "gray90"))))
- (bg:erc-color-face2 ((t (:background "blue4"))))
- (bg:erc-color-face3 ((t (:background "green4"))))
- (bg:erc-color-face4 ((t (:background "red"))))
- (bg:erc-color-face5 ((t (:background "brown"))))
- (bg:erc-color-face6 ((t (:background "purple"))))
- (bg:erc-color-face7 ((t (:background "orange"))))
- (bg:erc-color-face8 ((t (:background "yellow"))))
- (bg:erc-color-face9 ((t (:background "green"))))
- (blank-space-face ((t (:background "LightGray"))))
- (blank-tab-face ((t (:background "Wheat"))))
- (blue ((t (:foreground "blue"))))
- (bold ((t (:bold t :foreground "cyan" :weight bold))))
- (bold-italic ((t (:italic t :bold t :foreground "cyan2" :slant italic :weight bold))))
- (border ((t (:background "black"))))
- (border-glyph ((t (nil))))
- (buffers-tab ((t (:background "gray30" :foreground "LightSkyBlue"))))
- (calendar-today-face ((t (:underline t))))
- (change-log-acknowledgement-face ((t (:foreground "firebrick"))))
- (change-log-conditionals-face ((t (:background "sienna" :foreground "khaki"))))
- (change-log-date-face ((t (:foreground "gold"))))
- (change-log-email-face ((t (:foreground "khaki" :underline t))))
- (change-log-file-face ((t (:bold t :foreground "lemon chiffon" :weight bold))))
- (change-log-function-face ((t (:background "sienna" :foreground "khaki"))))
- (change-log-list-face ((t (:foreground "wheat"))))
- (change-log-name-face ((t (:bold t :foreground "light goldenrod" :weight bold))))
- (comint-highlight-input ((t (:bold t :weight bold))))
- (comint-highlight-prompt ((t (:foreground "cyan"))))
- (comint-input-face ((t (:foreground "deepskyblue"))))
- (cperl-array-face ((t (:bold t :background "lightyellow2" :foreground "Blue" :weight bold))))
- (cperl-hash-face ((t (:italic t :bold t :background "lightyellow2" :foreground "Red" :slant italic :weight bold))))
- (cperl-invalid-face ((t (:foreground "white"))))
- (cperl-nonoverridable-face ((t (:foreground "chartreuse3"))))
- (cursor ((t (:background "Yellow"))))
- (custom-button-face ((t (:bold t :weight bold))))
- (custom-button-pressed-face ((t (:background "lightgrey" :foreground "gray30"))))
- (custom-changed-face ((t (:background "blue" :foreground "white"))))
- (custom-comment-face ((t (:foreground "white"))))
- (custom-comment-tag-face ((t (:foreground "white"))))
- (custom-documentation-face ((t (:foreground "light blue"))))
- (custom-face-tag-face ((t (:underline t))))
- (custom-group-tag-face ((t (:bold t :foreground "gray85" :underline t :weight bold))))
- (custom-group-tag-face-1 ((t (:foreground "gray85" :underline t))))
- (custom-invalid-face ((t (:background "red" :foreground "yellow"))))
- (custom-modified-face ((t (:background "blue" :foreground "white"))))
- (custom-rogue-face ((t (:background "gray30" :foreground "pink"))))
- (custom-saved-face ((t (:underline t))))
- (custom-set-face ((t (:background "white" :foreground "blue"))))
- (custom-state-face ((t (:foreground "gray85"))))
- (custom-variable-button-face ((t (:bold t :underline t :weight bold))))
- (custom-variable-tag-face ((t (:bold t :foreground "gray85" :underline t :weight bold))))
- (cvs-filename-face ((t (:foreground "white"))))
- (cvs-handled-face ((t (:foreground "pink"))))
- (cvs-header-face ((t (:foreground "green"))))
- (cvs-marked-face ((t (:bold t :foreground "green3" :weight bold))))
- (cvs-msg-face ((t (:foreground "gray85"))))
- (cvs-need-action-face ((t (:foreground "yellow"))))
- (cvs-unknown-face ((t (:foreground "grey"))))
- (cyan ((t (:foreground "cyan"))))
- (diary-face ((t (:bold t :foreground "gray85" :weight bold))))
- (diff-added-face ((t (nil))))
- (diff-changed-face ((t (nil))))
- (diff-context-face ((t (:foreground "grey50"))))
- (diff-file-header-face ((t (:bold t :background "grey70" :weight bold))))
- (diff-function-face ((t (:foreground "grey50"))))
- (diff-header-face ((t (:foreground "lemon chiffon"))))
- (diff-hunk-header-face ((t (:background "grey85"))))
- (diff-index-face ((t (:bold t :background "grey70" :weight bold))))
- (diff-nonexistent-face ((t (:bold t :background "grey70" :weight bold))))
- (diff-removed-face ((t (nil))))
- (dired-face-boring ((t (:foreground "Gray65"))))
- (dired-face-directory ((t (:bold t :weight bold))))
- (dired-face-executable ((t (:foreground "gray85"))))
- (dired-face-flagged ((t (:background "LightSlateGray"))))
- (dired-face-header ((t (:background "grey75" :foreground "gray30"))))
- (dired-face-marked ((t (:background "PaleVioletRed"))))
- (dired-face-permissions ((t (:background "grey75" :foreground "gray30"))))
- (dired-face-setuid ((t (:foreground "gray85"))))
- (dired-face-socket ((t (:foreground "gray85"))))
- (dired-face-symlink ((t (:foreground "cyan"))))
- (display-time-mail-balloon-enhance-face ((t (:background "orange"))))
- (display-time-mail-balloon-gnus-group-face ((t (:foreground "blue"))))
- (display-time-time-balloon-face ((t (:foreground "gray85"))))
- (ebrowse-default-face ((t (nil))))
- (ebrowse-file-name-face ((t (:italic t :slant italic))))
- (ebrowse-member-attribute-face ((t (:foreground "red"))))
- (ebrowse-member-class-face ((t (:foreground "Gray85"))))
- (ebrowse-progress-face ((t (:background "blue"))))
- (ebrowse-root-class-face ((t (:bold t :foreground "Gray85" :weight bold))))
- (ebrowse-tree-mark-face ((t (:foreground "Gray85"))))
- (ecb-bucket-token-face ((t (:bold t :weight bold))))
- (ecb-default-general-face ((t (:height 1.0))))
- (ecb-default-highlight-face ((t (:background "magenta" :height 1.0))))
- (ecb-directories-general-face ((t (:height 0.9))))
- (ecb-directory-face ((t (:background "Cyan4"))))
- (ecb-history-face ((t (:background "Cyan4"))))
- (ecb-history-general-face ((t (:height 0.9))))
- (ecb-method-face ((t (:background "Cyan4" :slant normal :weight normal))))
- (ecb-methods-general-face ((t (:slant normal))))
- (ecb-source-face ((t (:background "Cyan4"))))
- (ecb-source-in-directories-buffer-face ((t (:foreground "LightBlue1"))))
- (ecb-sources-face ((t (:foreground "LightBlue1"))))
- (ecb-sources-general-face ((t (:height 0.9))))
- (ecb-token-header-face ((t (:background "Steelblue4"))))
- (ecb-type-token-class-face ((t (:bold t :weight bold))))
- (ecb-type-token-enum-face ((t (:bold t :weight bold))))
- (ecb-type-token-group-face ((t (:bold t :foreground "dim gray" :weight bold))))
- (ecb-type-token-interface-face ((t (:bold t :weight bold))))
- (ecb-type-token-struct-face ((t (:bold t :weight bold))))
- (ecb-type-token-typedef-face ((t (:bold t :weight bold))))
- (ediff-current-diff-face-A ((t (:background "pale green" :foreground "firebrick"))))
- (ediff-current-diff-face-Ancestor ((t (:background "VioletRed" :foreground "Gray30"))))
- (ediff-current-diff-face-B ((t (:background "Yellow" :foreground "DarkOrchid"))))
- (ediff-current-diff-face-C ((t (:background "Pink" :foreground "Navy"))))
- (ediff-even-diff-face-A ((t (:background "light grey" :foreground "Gray30"))))
- (ediff-even-diff-face-Ancestor ((t (:background "Grey" :foreground "White"))))
- (ediff-even-diff-face-B ((t (:background "Grey" :foreground "White"))))
- (ediff-even-diff-face-C ((t (:background "light grey" :foreground "Gray30"))))
- (ediff-fine-diff-face-A ((t (:background "sky blue" :foreground "Navy"))))
- (ediff-fine-diff-face-Ancestor ((t (:background "Green" :foreground "Gray30"))))
- (ediff-fine-diff-face-B ((t (:background "cyan" :foreground "Gray30"))))
- (ediff-fine-diff-face-C ((t (:background "Turquoise" :foreground "Gray30"))))
- (ediff-odd-diff-face-A ((t (:background "Grey" :foreground "White"))))
- (ediff-odd-diff-face-Ancestor ((t (:background "light grey" :foreground "Gray30"))))
- (ediff-odd-diff-face-B ((t (:background "light grey" :foreground "Gray30"))))
- (ediff-odd-diff-face-C ((t (:background "Grey" :foreground "White"))))
- (erc-action-face ((t (:bold t :weight bold))))
- (erc-bold-face ((t (:bold t :weight bold))))
- (erc-dangerous-host-face ((t (:foreground "red"))))
- (erc-default-face ((t (nil))))
- (erc-direct-msg-face ((t (:foreground "pale green"))))
- (erc-error-face ((t (:bold t :foreground "gray85" :weight bold))))
- (erc-fool-face ((t (:foreground "Gray85"))))
- (erc-highlight-face ((t (:bold t :foreground "pale green" :weight bold))))
- (erc-input-face ((t (:foreground "light blue"))))
- (erc-inverse-face ((t (:background "Black" :foreground "White"))))
- (erc-keyword-face ((t (:bold t :foreground "pale green" :weight bold))))
- (erc-notice-face ((t (:foreground "light salmon"))))
- (erc-pal-face ((t (:foreground "pale green"))))
- (erc-prompt-face ((t (:bold t :foreground "light blue" :weight bold))))
- (erc-timestamp-face ((t (:bold t :foreground "green" :weight bold))))
- (erc-underline-face ((t (:underline t))))
- (eshell-ls-archive-face ((t (:bold t :weight bold))))
- (eshell-ls-backup-face ((t (:foreground "gray85"))))
- (eshell-ls-clutter-face ((t (:bold t :foreground "gray85" :weight bold))))
- (eshell-ls-directory-face ((t (:bold t :foreground "Cyan" :weight bold))))
- (eshell-ls-executable-face ((t (:bold t :weight bold))))
- (eshell-ls-missing-face ((t (:bold t :weight bold))))
- (eshell-ls-picture-face ((t (:foreground "gray85"))))
- (eshell-ls-product-face ((t (:foreground "gray85"))))
- (eshell-ls-readonly-face ((t (:foreground "gray70"))))
- (eshell-ls-special-face ((t (:bold t :weight bold))))
- (eshell-ls-symlink-face ((t (:bold t :weight bold))))
- (eshell-ls-text-face ((t (:foreground "gray85"))))
- (eshell-ls-todo-face ((t (:bold t :weight bold))))
- (eshell-ls-unreadable-face ((t (:foreground "gray85"))))
- (eshell-prompt-face ((t (:bold t :foreground "Yellow" :weight bold))))
- (eshell-test-failed-face ((t (:bold t :weight bold))))
- (eshell-test-ok-face ((t (:bold t :weight bold))))
- (excerpt ((t (:italic t :slant italic))))
- (ff-paths-non-existant-file-face ((t (:bold t :foreground "gray85" :weight bold))))
- (fg:black ((t (:foreground "black"))))
- (fg:erc-color-face0 ((t (:foreground "White"))))
- (fg:erc-color-face1 ((t (:foreground "black"))))
- (fg:erc-color-face10 ((t (:foreground "lightblue1"))))
- (fg:erc-color-face11 ((t (:foreground "cyan"))))
- (fg:erc-color-face12 ((t (:foreground "blue"))))
- (fg:erc-color-face13 ((t (:foreground "deeppink"))))
- (fg:erc-color-face14 ((t (:foreground "gray50"))))
- (fg:erc-color-face15 ((t (:foreground "gray90"))))
- (fg:erc-color-face2 ((t (:foreground "blue4"))))
- (fg:erc-color-face3 ((t (:foreground "green4"))))
- (fg:erc-color-face4 ((t (:foreground "red"))))
- (fg:erc-color-face5 ((t (:foreground "brown"))))
- (fg:erc-color-face6 ((t (:foreground "purple"))))
- (fg:erc-color-face7 ((t (:foreground "orange"))))
- (fg:erc-color-face8 ((t (:foreground "yellow"))))
- (fg:erc-color-face9 ((t (:foreground "green"))))
- (fixed ((t (:bold t :weight bold))))
- (fixed-pitch ((t (:family "outline-lucida console"))))
- (fl-comment-face ((t (:foreground "gray85"))))
- (fl-function-name-face ((t (:foreground "green"))))
- (fl-keyword-face ((t (:foreground "LightGreen"))))
- (fl-string-face ((t (:foreground "light coral"))))
- (fl-type-face ((t (:foreground "cyan"))))
- (flyspell-duplicate-face ((t (:bold t :foreground "Gold3" :underline t :weight bold))))
- (flyspell-incorrect-face ((t (:bold t :foreground "OrangeRed" :underline t :weight bold))))
- (font-latex-bold-face ((t (nil))))
- (font-latex-italic-face ((t (nil))))
- (font-latex-math-face ((t (nil))))
- (font-latex-sedate-face ((t (:foreground "Gray85"))))
- (font-latex-string-face ((t (:foreground "orange"))))
- (font-latex-warning-face ((t (:foreground "gold"))))
- (font-lock-builtin-face ((t (:bold t :foreground "LightSteelBlue" :weight bold))))
- (font-lock-comment-face ((t (:italic t :foreground "medium aquamarine" :slant italic))))
- (font-lock-constant-face ((t (:bold t :foreground "Aquamarine" :weight bold))))
- (font-lock-doc-face ((t (:bold t :weight bold))))
- (font-lock-doc-string-face ((t (:bold t :foreground "aquamarine" :weight bold))))
- (font-lock-exit-face ((t (:foreground "green"))))
- (font-lock-function-name-face ((t (:italic t :bold t :foreground "LightSkyBlue" :slant italic :weight bold))))
- (font-lock-keyword-face ((t (:bold t :foreground "Cyan" :weight bold))))
- (font-lock-preprocessor-face ((t (:foreground "Gray85"))))
- (font-lock-reference-face ((t (:foreground "cyan"))))
- (font-lock-string-face ((t (:italic t :foreground "aquamarine" :slant italic))))
- (font-lock-type-face ((t (:bold t :foreground "PaleGreen" :weight bold))))
- (font-lock-variable-name-face ((t (:italic t :bold t :foreground "LightGoldenrod" :slant italic :weight bold))))
- (font-lock-warning-face ((t (:bold t :foreground "Salmon" :weight bold))))
- (fringe ((t (:background "#3c5473"))))
- (gnus-cite-attribution-face ((t (:italic t :bold t :foreground "beige" :underline t :slant italic :weight bold))))
- (gnus-cite-face-1 ((t (:foreground "gold"))))
- (gnus-cite-face-10 ((t (:foreground "coral"))))
- (gnus-cite-face-11 ((t (:foreground "turquoise"))))
- (gnus-cite-face-2 ((t (:foreground "wheat"))))
- (gnus-cite-face-3 ((t (:foreground "light pink"))))
- (gnus-cite-face-4 ((t (:foreground "khaki"))))
- (gnus-cite-face-5 ((t (:foreground "pale green"))))
- (gnus-cite-face-6 ((t (:foreground "beige"))))
- (gnus-cite-face-7 ((t (:foreground "orange"))))
- (gnus-cite-face-8 ((t (:foreground "magenta"))))
- (gnus-cite-face-9 ((t (:foreground "violet"))))
- (gnus-emphasis-bold ((t (:bold t :foreground "light gray" :weight bold))))
- (gnus-emphasis-bold-italic ((t (:italic t :bold t :foreground "cyan" :slant italic :weight bold))))
- (gnus-emphasis-highlight-words ((t (:background "gray30" :foreground "gold"))))
- (gnus-emphasis-italic ((t (:italic t :foreground "cyan" :slant italic))))
- (gnus-emphasis-underline ((t (:foreground "white" :underline t))))
- (gnus-emphasis-underline-bold ((t (:bold t :foreground "white" :underline t :weight bold))))
- (gnus-emphasis-underline-bold-italic ((t (:italic t :bold t :foreground "white" :underline t :slant italic :weight bold))))
- (gnus-emphasis-underline-italic ((t (:italic t :foreground "white" :underline t :slant italic))))
- (gnus-filterhist-face-1 ((t (nil))))
- (gnus-group-mail-1-empty-face ((t (:foreground "Magenta"))))
- (gnus-group-mail-1-face ((t (:bold t :foreground "Magenta" :weight bold))))
- (gnus-group-mail-2-empty-face ((t (:foreground "aquamarine2"))))
- (gnus-group-mail-2-face ((t (:bold t :foreground "aquamarine2" :weight bold))))
- (gnus-group-mail-3-empty-face ((t (:foreground "Cyan"))))
- (gnus-group-mail-3-face ((t (:bold t :foreground "Cyan" :weight bold))))
- (gnus-group-mail-low-empty-face ((t (:foreground "Wheat"))))
- (gnus-group-mail-low-face ((t (:bold t :foreground "Gray85" :weight bold))))
- (gnus-group-news-1-empty-face ((t (:foreground "PaleTurquoise"))))
- (gnus-group-news-1-face ((t (:bold t :foreground "PaleTurquoise" :weight bold))))
- (gnus-group-news-2-empty-face ((t (:foreground "turquoise"))))
- (gnus-group-news-2-face ((t (:bold t :foreground "turquoise" :weight bold))))
- (gnus-group-news-3-empty-face ((t (:foreground "wheat"))))
- (gnus-group-news-3-face ((t (:bold t :foreground "Wheat" :weight bold))))
- (gnus-group-news-4-empty-face ((t (:foreground "Aquamarine"))))
- (gnus-group-news-4-face ((t (:bold t :weight bold))))
- (gnus-group-news-5-empty-face ((t (:foreground "MediumAquamarine"))))
- (gnus-group-news-5-face ((t (:bold t :weight bold))))
- (gnus-group-news-6-empty-face ((t (:foreground "MediumAquamarine"))))
- (gnus-group-news-6-face ((t (:bold t :weight bold))))
- (gnus-group-news-low-empty-face ((t (:foreground "MediumAquamarine"))))
- (gnus-group-news-low-face ((t (:bold t :foreground "MediumAquamarine" :weight bold))))
- (gnus-header-content-face ((t (:italic t :foreground "Wheat" :slant italic))))
- (gnus-header-from-face ((t (:bold t :foreground "light yellow" :weight bold))))
- (gnus-header-name-face ((t (:bold t :foreground "Wheat" :weight bold))))
- (gnus-header-newsgroups-face ((t (:italic t :bold t :foreground "gold" :slant italic :weight bold))))
- (gnus-header-subject-face ((t (:bold t :foreground "Gold" :weight bold))))
- (gnus-picons-face ((t (:background "white" :foreground "gray30"))))
- (gnus-picons-xbm-face ((t (:background "white" :foreground "gray30"))))
- (gnus-signature-face ((t (:italic t :foreground "white" :slant italic))))
- (gnus-splash ((t (:foreground "Brown"))))
- (gnus-splash-face ((t (:foreground "orange"))))
- (gnus-summary-cancelled-face ((t (:background "gray30" :foreground "orange"))))
- (gnus-summary-high-ancient-face ((t (:bold t :foreground "SkyBlue" :weight bold))))
- (gnus-summary-high-read-face ((t (:bold t :foreground "gray85" :weight bold))))
- (gnus-summary-high-ticked-face ((t (:bold t :foreground "coral" :weight bold))))
- (gnus-summary-high-unread-face ((t (:italic t :bold t :foreground "gold" :slant italic :weight bold))))
- (gnus-summary-low-ancient-face ((t (:italic t :foreground "SkyBlue" :slant italic))))
- (gnus-summary-low-read-face ((t (:italic t :foreground "gray85" :slant italic))))
- (gnus-summary-low-ticked-face ((t (:italic t :bold t :foreground "coral" :slant italic :weight bold))))
- (gnus-summary-low-unread-face ((t (:italic t :foreground "white" :slant italic))))
- (gnus-summary-normal-ancient-face ((t (:foreground "SkyBlue"))))
- (gnus-summary-normal-read-face ((t (:foreground "gray70"))))
- (gnus-summary-normal-ticked-face ((t (:bold t :foreground "pink" :weight bold))))
- (gnus-summary-normal-unread-face ((t (:bold t :foreground "gray85" :weight bold))))
- (gnus-summary-selected-face ((t (:foreground "white" :underline t))))
- (gnus-x-face ((t (:background "white" :foreground "gray30"))))
- (green ((t (:foreground "green"))))
- (gui-button-face ((t (:background "grey75" :foreground "gray30"))))
- (gui-element ((t (:background "Gray80"))))
- (header-line ((t (:background "grey20" :foreground "grey90"))))
- (hi-black-b ((t (:bold t :weight bold))))
- (hi-black-hb ((t (:bold t :weight bold :height 1.67 :family "helv"))))
- (hi-blue ((t (:background "light blue"))))
- (hi-blue-b ((t (:bold t :foreground "blue" :weight bold))))
- (hi-green ((t (:background "green"))))
- (hi-green-b ((t (:bold t :foreground "green" :weight bold))))
- (hi-pink ((t (:background "pink"))))
- (hi-red-b ((t (:bold t :foreground "red" :weight bold))))
- (hi-yellow ((t (:background "yellow"))))
- (highlight ((t (:background "SkyBlue3"))))
- (highlight-changes-delete-face ((t (:foreground "gray85" :underline t))))
- (highlight-changes-face ((t (:foreground "gray85"))))
- (highline-face ((t (:background "#3c5473"))))
- (highline-vertical-face ((t (:background "lightcyan"))))
- (holiday-face ((t (:background "pink" :foreground "gray30"))))
- (html-helper-bold-face ((t (:bold t :weight bold))))
- (html-helper-bold-italic-face ((t (nil))))
- (html-helper-builtin-face ((t (:foreground "gray85" :underline t))))
- (html-helper-italic-face ((t (:bold t :foreground "yellow" :weight bold))))
- (html-helper-underline-face ((t (:underline t))))
- (html-tag-face ((t (:bold t :weight bold))))
- (hyper-apropos-documentation ((t (:foreground "white"))))
- (hyper-apropos-heading ((t (:bold t :weight bold))))
- (hyper-apropos-hyperlink ((t (:foreground "sky blue"))))
- (hyper-apropos-major-heading ((t (:bold t :weight bold))))
- (hyper-apropos-section-heading ((t (:bold t :weight bold))))
- (hyper-apropos-warning ((t (:bold t :foreground "gray85" :weight bold))))
- (ibuffer-marked-face ((t (:foreground "gray85"))))
- (idlwave-help-link-face ((t (:foreground "Blue"))))
- (idlwave-shell-bp-face ((t (:background "Pink" :foreground "Black"))))
- (info-header-node ((t (:italic t :bold t :foreground "brown" :slant italic :weight bold))))
- (info-header-xref ((t (:bold t :foreground "magenta4" :weight bold))))
- (info-menu-5 ((t (:underline t))))
- (info-menu-6 ((t (nil))))
- (info-menu-header ((t (:bold t :weight bold :family "helv"))))
- (info-node ((t (:italic t :bold t :slant italic :weight bold))))
- (info-xref ((t (:bold t :weight bold))))
- (isearch ((t (:background "LightSeaGreen"))))
- (isearch-lazy-highlight-face ((t (:background "cyan4"))))
- (isearch-secondary ((t (:foreground "red3"))))
- (italic ((t (:italic t :bold t :slant italic :weight bold))))
- (jde-bug-breakpoint-cursor ((t (:background "brown" :foreground "cyan"))))
- (jde-bug-breakpoint-marker ((t (:background "yellow" :foreground "red"))))
- (jde-java-font-lock-api-face ((t (:foreground "LightBlue"))))
- (jde-java-font-lock-bold-face ((t (:bold t :weight bold))))
- (jde-java-font-lock-code-face ((t (nil))))
- (jde-java-font-lock-constant-face ((t (:foreground "LightBlue"))))
- (jde-java-font-lock-doc-tag-face ((t (:foreground "LightBlue"))))
- (jde-java-font-lock-italic-face ((t (:italic t :slant italic))))
- (jde-java-font-lock-link-face ((t (:foreground "cyan3" :underline t))))
- (jde-java-font-lock-modifier-face ((t (:foreground "LightBlue"))))
- (jde-java-font-lock-number-face ((t (:foreground "RosyBrown"))))
- (jde-java-font-lock-operator-face ((t (:foreground "cyan3"))))
- (jde-java-font-lock-package-face ((t (:foreground "LightBlue"))))
- (jde-java-font-lock-pre-face ((t (nil))))
- (jde-java-font-lock-underline-face ((t (:underline t))))
- (lazy-highlight-face ((t (:bold t :foreground "yellow" :weight bold))))
- (left-margin ((t (nil))))
- (linemenu-face ((t (:background "gray30"))))
- (list-mode-item-selected ((t (:background "gray68"))))
- (log-view-file-face ((t (:bold t :background "grey70" :weight bold))))
- (log-view-message-face ((t (:background "grey85"))))
- (magenta ((t (:foreground "gray85"))))
- (makefile-space-face ((t (:background "hotpink" :foreground "white"))))
- (man-bold ((t (:bold t :weight bold))))
- (man-heading ((t (:bold t :weight bold))))
- (man-italic ((t (:foreground "yellow"))))
- (man-xref ((t (:underline t))))
- (menu ((t (:background "wheat" :foreground "gray30"))))
- (message-cited-text ((t (:foreground "orange"))))
- (message-cited-text-face ((t (:foreground "medium aquamarine"))))
- (message-header-cc-face ((t (:bold t :foreground "gray85" :weight bold))))
- (message-header-contents ((t (:foreground "white"))))
- (message-header-name-face ((t (:foreground "gray85"))))
- (message-header-newsgroups-face ((t (:italic t :bold t :foreground "yellow" :slant italic :weight bold))))
- (message-header-other-face ((t (:foreground "gray85"))))
- (message-header-subject-face ((t (:bold t :foreground "green3" :weight bold))))
- (message-header-to-face ((t (:bold t :foreground "green2" :weight bold))))
- (message-header-xheader-face ((t (:foreground "blue"))))
- (message-headers ((t (:bold t :foreground "orange" :weight bold))))
- (message-highlighted-header-contents ((t (:bold t :weight bold))))
- (message-mml-face ((t (:bold t :foreground "gray85" :weight bold))))
- (message-separator-face ((t (:foreground "gray85"))))
- (message-url ((t (:bold t :foreground "pink" :weight bold))))
- (mmm-default-submode-face ((t (:background "#c0c0c5"))))
- (mmm-face ((t (:background "black" :foreground "green"))))
- (modeline ((t (:background "#3c5473" :foreground "lightgray" :box (:line-width -1 :style released-button :family "helv")))))
- (modeline-buffer-id ((t (:background "white" :foreground "DeepSkyBlue3" :slant normal :weight normal :width normal :family "outline-verdana"))))
- (modeline-mousable ((t (:background "white" :foreground "DeepSkyBlue3"))))
- (modeline-mousable-minor-mode ((t (:background "white" :foreground "DeepSkyBlue3"))))
- (mouse ((t (:background "Grey"))))
- (my-summary-highlight-face ((t (:background "PaleTurquoise4" :foreground "White"))))
- (my-url-face ((t (:foreground "LightBlue"))))
- (nil ((t (nil))))
- (paren-blink-off ((t (:foreground "gray80"))))
- (paren-face-match ((t (:background "turquoise"))))
- (paren-face-mismatch ((t (:background "purple" :foreground "white"))))
- (paren-face-no-match ((t (:background "yellow" :foreground "gray30"))))
- (paren-match ((t (:background "darkseagreen2"))))
- (paren-mismatch ((t (:background "RosyBrown" :foreground "gray30"))))
- (paren-mismatch-face ((t (:bold t :background "white" :foreground "red" :weight bold))))
- (paren-no-match-face ((t (:bold t :background "white" :foreground "red" :weight bold))))
- (pointer ((t (nil))))
- (primary-selection ((t (:background "gray40"))))
- (reb-match-0 ((t (:background "lightblue"))))
- (reb-match-1 ((t (:background "aquamarine"))))
- (reb-match-2 ((t (:background "springgreen"))))
- (reb-match-3 ((t (:background "yellow"))))
- (red ((t (:foreground "red"))))
- (region ((t (:background "Cyan4"))))
- (right-margin ((t (nil))))
- (scroll-bar ((t (:background "grey75"))))
- (secondary-selection ((t (:background "gray60"))))
- (semantic-dirty-token-face ((t (:background "gray10"))))
- (semantic-intangible-face ((t (:foreground "gray25"))))
- (semantic-read-only-face ((t (:background "gray25"))))
- (semantic-unmatched-syntax-face ((t (:underline "red"))))
- (senator-intangible-face ((t (:foreground "gray75"))))
- (senator-momentary-highlight-face ((t (:background "gray70"))))
- (senator-read-only-face ((t (:background "#664444"))))
- (sgml-comment-face ((t (:foreground "dark turquoise"))))
- (sgml-doctype-face ((t (:foreground "turquoise"))))
- (sgml-end-tag-face ((t (:foreground "aquamarine"))))
- (sgml-entity-face ((t (:foreground "gray85"))))
- (sgml-ignored-face ((t (:background "gray60" :foreground "gray40"))))
- (sgml-ms-end-face ((t (:foreground "green"))))
- (sgml-ms-start-face ((t (:foreground "yellow"))))
- (sgml-pi-face ((t (:foreground "lime green"))))
- (sgml-sgml-face ((t (:foreground "brown"))))
- (sgml-short-ref-face ((t (:foreground "deep sky blue"))))
- (sgml-start-tag-face ((t (:foreground "aquamarine"))))
- (sh-heredoc-face ((t (:foreground "tan"))))
- (shell-option-face ((t (:foreground "gray85"))))
- (shell-output-2-face ((t (:foreground "gray85"))))
- (shell-output-3-face ((t (:foreground "gray85"))))
- (shell-output-face ((t (:bold t :weight bold))))
- (shell-prompt-face ((t (:foreground "yellow"))))
- (show-paren-match-face ((t (:bold t :background "turquoise" :weight bold))))
- (show-paren-mismatch-face ((t (:bold t :background "RosyBrown" :foreground "white" :weight bold))))
- (show-tabs-space-face ((t (:foreground "yellow"))))
- (show-tabs-tab-face ((t (:foreground "red"))))
- (smerge-base-face ((t (:foreground "red"))))
- (smerge-markers-face ((t (:background "grey85"))))
- (smerge-mine-face ((t (:foreground "Gray85"))))
- (smerge-other-face ((t (:foreground "darkgreen"))))
- (speedbar-button-face ((t (:bold t :weight bold))))
- (speedbar-directory-face ((t (:bold t :weight bold))))
- (speedbar-file-face ((t (:bold t :weight bold))))
- (speedbar-highlight-face ((t (:background "sea green"))))
- (speedbar-selected-face ((t (:underline t))))
- (speedbar-tag-face ((t (:foreground "yellow"))))
- (strokes-char-face ((t (:background "lightgray"))))
- (swbuff-current-buffer-face ((t (:bold t :foreground "gray85" :weight bold))))
- (template-message-face ((t (:bold t :weight bold))))
- (term-black ((t (:foreground "black"))))
- (term-blackbg ((t (:background "black"))))
- (term-blue ((t (:foreground "blue"))))
- (term-bluebg ((t (:background "blue"))))
- (term-bold ((t (:bold t :weight bold))))
- (term-cyan ((t (:foreground "cyan"))))
- (term-cyanbg ((t (:background "cyan"))))
- (term-default ((t (:background "gray80" :foreground "gray30" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :width normal :family "outline-lucida console"))))
- (term-default-bg ((t (nil))))
- (term-default-bg-inv ((t (nil))))
- (term-default-fg ((t (nil))))
- (term-default-fg-inv ((t (nil))))
- (term-green ((t (:foreground "green"))))
- (term-greenbg ((t (:background "green"))))
- (term-invisible ((t (nil))))
- (term-invisible-inv ((t (nil))))
- (term-magenta ((t (:foreground "magenta"))))
- (term-magentabg ((t (:background "magenta"))))
- (term-red ((t (:foreground "red"))))
- (term-redbg ((t (:background "red"))))
- (term-underline ((t (:underline t))))
- (term-white ((t (:foreground "white"))))
- (term-whitebg ((t (:background "white"))))
- (term-yellow ((t (:foreground "yellow"))))
- (term-yellowbg ((t (:background "yellow"))))
- (tex-math-face ((t (:foreground "RosyBrown"))))
- (texinfo-heading-face ((t (:foreground "Blue"))))
- (text-cursor ((t (:background "Red3" :foreground "gray80"))))
- (tool-bar ((t (:background "grey75" :foreground "black"))))
- (toolbar ((t (:background "Gray80"))))
- (tooltip ((t (:background "lightyellow" :foreground "black"))))
- (trailing-whitespace ((t (:background "red"))))
- (underline ((t (:underline t))))
- (variable-pitch ((t (:family "helv"))))
- (vc-annotate-face-0046FF ((t (:background "black" :foreground "wheat"))))
- (vcursor ((t (:background "cyan" :foreground "blue" :underline t))))
- (vertical-divider ((t (:background "Gray80"))))
- (vhdl-font-lock-attribute-face ((t (:foreground "gray85"))))
- (vhdl-font-lock-directive-face ((t (:foreground "gray85"))))
- (vhdl-font-lock-enumvalue-face ((t (:foreground "gray85"))))
- (vhdl-font-lock-function-face ((t (:foreground "gray85"))))
- (vhdl-font-lock-prompt-face ((t (:bold t :foreground "gray85" :weight bold))))
- (vhdl-font-lock-reserved-words-face ((t (:bold t :foreground "gray85" :weight bold))))
- (vhdl-font-lock-translate-off-face ((t (:background "LightGray"))))
- (vhdl-speedbar-architecture-face ((t (:foreground "gray85"))))
- (vhdl-speedbar-architecture-selected-face ((t (:foreground "gray85" :underline t))))
- (vhdl-speedbar-configuration-face ((t (:foreground "gray85"))))
- (vhdl-speedbar-configuration-selected-face ((t (:foreground "gray85" :underline t))))
- (vhdl-speedbar-entity-face ((t (:foreground "gray85"))))
- (vhdl-speedbar-entity-selected-face ((t (:foreground "gray85" :underline t))))
- (vhdl-speedbar-instantiation-face ((t (:foreground "gray85"))))
- (vhdl-speedbar-instantiation-selected-face ((t (:foreground "gray85" :underline t))))
- (vhdl-speedbar-package-face ((t (:foreground "gray85"))))
- (vhdl-speedbar-package-selected-face ((t (:foreground "gray85" :underline t))))
- (viper-minibuffer-emacs-face ((t (:background "darkseagreen2" :foreground "Black"))))
- (viper-minibuffer-insert-face ((t (:background "pink" :foreground "Black"))))
- (viper-minibuffer-vi-face ((t (:background "grey" :foreground "DarkGreen"))))
- (viper-replace-overlay-face ((t (:background "darkseagreen2" :foreground "Black"))))
- (viper-search-face ((t (:background "khaki" :foreground "Black"))))
- (vm-header-content-face ((t (:italic t :foreground "wheat" :slant italic))))
- (vm-header-from-face ((t (:italic t :foreground "wheat" :slant italic))))
- (vm-header-name-face ((t (:foreground "cyan"))))
- (vm-header-subject-face ((t (:foreground "cyan"))))
- (vm-header-to-face ((t (:italic t :foreground "cyan" :slant italic))))
- (vm-message-cited-face ((t (:foreground "Gray80"))))
- (vm-monochrome-image ((t (:background "white" :foreground "gray30"))))
- (vm-summary-face-1 ((t (:foreground "MediumAquamarine"))))
- (vm-summary-face-2 ((t (:foreground "MediumAquamarine"))))
- (vm-summary-face-3 ((t (:foreground "MediumAquamarine"))))
- (vm-summary-face-4 ((t (:foreground "MediumAquamarine"))))
- (vm-summary-highlight-face ((t (:foreground "White"))))
- (vm-xface ((t (:background "white" :foreground "gray30"))))
- (vmpc-pre-sig-face ((t (:foreground "gray85"))))
- (vmpc-sig-face ((t (:foreground "gray85"))))
- (vvb-face ((t (:background "pink" :foreground "gray30"))))
- (w3m-anchor-face ((t (:bold t :foreground "gray85" :weight bold))))
- (w3m-arrived-anchor-face ((t (:bold t :foreground "gray85" :weight bold))))
- (w3m-header-line-location-content-face ((t (:background "dark olive green" :foreground "wheat"))))
- (w3m-header-line-location-title-face ((t (:background "dark olive green" :foreground "beige"))))
- (white ((t (:foreground "white"))))
- (widget ((t (nil))))
- (widget-button-face ((t (:bold t :weight bold))))
- (widget-button-pressed-face ((t (:foreground "gray85"))))
- (widget-documentation-face ((t (:foreground "dark green"))))
- (widget-field-face ((t (:background "gray85" :foreground "gray30"))))
- (widget-inactive-face ((t (:foreground "dim gray"))))
- (widget-single-line-field-face ((t (:background "dim gray" :foreground "white"))))
- (woman-addition-face ((t (:foreground "orange"))))
- (woman-bold-face ((t (:bold t :weight bold))))
- (woman-italic-face ((t (:foreground "beige"))))
- (woman-unknown-face ((t (:foreground "LightSalmon"))))
- (x-face ((t (:background "white" :foreground "gray30"))))
- (xrdb-option-name-face ((t (:foreground "gray85"))))
- (xref-keyword-face ((t (:foreground "gray85"))))
- (xref-list-default-face ((t (nil))))
- (xref-list-pilot-face ((t (:foreground "gray85"))))
- (xref-list-symbol-face ((t (:foreground "navy"))))
- (xsl-fo-alternate-face ((t (:foreground "Yellow"))))
- (xsl-fo-main-face ((t (:foreground "PaleGreen"))))
- (xsl-other-element-face ((t (:foreground "Coral"))))
- (xsl-xslt-alternate-face ((t (:foreground "LightGray"))))
- (xsl-xslt-main-face ((t (:foreground "Wheat"))))
- (xxml-emph-1-face ((t (:background "lightyellow"))))
- (xxml-emph-2-face ((t (:background "lightyellow"))))
- (xxml-header-1-face ((t (:background "seashell1" :foreground "MediumAquamarine"))))
- (xxml-header-2-face ((t (:background "seashell1" :foreground "SkyBlue"))))
- (xxml-header-3-face ((t (:background "seashell1"))))
- (xxml-header-4-face ((t (:background "seashell1"))))
- (xxml-interaction-face ((t (:background "lightcyan"))))
- (xxml-rug-face ((t (:background "cyan"))))
- (xxml-sparkle-face ((t (:background "yellow"))))
- (xxml-unbreakable-space-face ((t (:foreground "grey" :underline t))))
- (yellow ((t (:foreground "yellow"))))
- (zmacs-region ((t (:background "Cyan4")))))))
-
- (defun color-theme-blue-mood ()
- "Color theme by Nelson Loyola, created 2002-04-15.
- Includes cperl, custom, font-lock, p4, speedbar, widget."
- (interactive)
- (color-theme-install
- '(color-theme-blue-mood
- ((background-color . "DodgerBlue4")
- (background-mode . dark)
- (background-toolbar-color . "#bfbfbfbfbfbf")
- (border-color . "Blue")
- (border-color . "#000000000000")
- (bottom-toolbar-shadow-color . "#6c6c68686868")
- (cursor-color . "DarkGoldenrod1")
- (foreground-color . "white smoke")
- (mouse-color . "black")
- (top-toolbar-shadow-color . "#e5e5e0e0e1e1"))
- ((vc-annotate-very-old-color . "#0046FF"))
- (default ((t (nil))))
- (blue ((t (:foreground "blue"))))
- (bold ((t (:bold t))))
- (bold-italic ((t (nil))))
- (border-glyph ((t (nil))))
- (cmode-bracket-face ((t (:bold t))))
- (cperl-array-face ((t (:bold t :foreground "wheat"))))
- (cperl-hash-face ((t (:bold t :foreground "chartreuse"))))
- (custom-button-face ((t (nil))))
- (custom-changed-face ((t (:background "blue" :foreground "white"))))
- (custom-documentation-face ((t (nil))))
- (custom-face-tag-face ((t (:underline t))))
- (custom-group-tag-face ((t (:underline t :foreground "blue"))))
- (custom-group-tag-face-1 ((t (:underline t :foreground "red"))))
- (custom-invalid-face ((t (:background "red" :foreground "yellow"))))
- (custom-modified-face ((t (:background "blue" :foreground "white"))))
- (custom-rogue-face ((t (:background "black" :foreground "pink"))))
- (custom-saved-face ((t (:underline t))))
- (custom-set-face ((t (:background "white" :foreground "blue"))))
- (custom-state-face ((t (:bold t :foreground "cyan"))))
- (custom-variable-button-face ((t (:underline t :bold t))))
- (custom-variable-tag-face ((t (:underline t :foreground "blue"))))
- (ff-paths-non-existant-file-face ((t (:bold t :foreground "NavyBlue"))))
- (font-lock-builtin-face ((t (:bold t :foreground "wheat"))))
- (font-lock-comment-face ((t (:bold t :foreground "gray72"))))
- (font-lock-constant-face ((t (:bold t :foreground "cyan3"))))
- (font-lock-doc-string-face ((t (:foreground "#00C000"))))
- (font-lock-function-name-face ((t (:bold t :foreground "chartreuse"))))
- (font-lock-keyword-face ((t (:bold t :foreground "gold1"))))
- (font-lock-other-emphasized-face ((t (:bold t :foreground "gold1"))))
- (font-lock-other-type-face ((t (:bold t :foreground "gold1"))))
- (font-lock-preprocessor-face ((t (:foreground "plum"))))
- (font-lock-reference-face ((t (:bold t :foreground "orangered"))))
- (font-lock-string-face ((t (:foreground "tomato"))))
- (font-lock-type-face ((t (:bold t :foreground "gold1"))))
- (font-lock-variable-name-face ((t (:foreground "light yellow"))))
- (font-lock-warning-face ((t (:foreground "tomato"))))
- (green ((t (:foreground "green"))))
- (gui-button-face ((t (:background "grey75" :foreground "black"))))
- (gui-element ((t (:size "nil" :background "#e7e3d6" :foreground" #000000"))))
- (highlight ((t (:background "red" :foreground "yellow"))))
- (isearch ((t (:bold t :background "pale turquoise" :foreground "blue"))))
- (italic ((t (nil))))
- (lazy-highlight-face ((t (:bold t :foreground "dark magenta"))))
- (left-margin ((t (nil))))
- (list-mode-item-selected ((t (:bold t :background "gray68" :foreground "yellow"))))
- (modeline ((t (:background "goldenrod" :foreground "darkblue"))))
- (modeline-buffer-id ((t (:background "goldenrod" :foreground "darkblue"))))
- (modeline-mousable ((t (:background "goldenrod" :foreground "darkblue"))))
- (modeline-mousable-minor-mode ((t (:background "goldenrod" :foreground "darkblue"))))
- (my-tab-face ((t (:background "SlateBlue1"))))
- (p4-depot-added-face ((t (:foreground "steelblue1"))))
- (p4-depot-deleted-face ((t (:foreground "red"))))
- (p4-depot-unmapped-face ((t (:foreground "grey90"))))
- (p4-diff-change-face ((t (:foreground "dark green"))))
- (p4-diff-del-face ((t (:bold t :foreground "salmon"))))
- (p4-diff-file-face ((t (:background "blue"))))
- (p4-diff-head-face ((t (:background "blue"))))
- (p4-diff-ins-face ((t (:foreground "steelblue1"))))
- (paren-blink-off ((t (:foreground "DodgerBlue4"))))
- (paren-match ((t (:background "red" :foreground "yellow"))))
- (paren-mismatch ((t (:background "DeepPink"))))
- (pointer ((t (:background "white"))))
- (primary-selection ((t (:bold t :background "medium sea green"))))
- (red ((t (:foreground "red"))))
- (region ((t (:background "red" :foreground "yellow"))))
- (right-margin ((t (nil))))
- (secondary-selection ((t (:background "gray91" :foreground "sienna3"))))
- (show-paren-match-face ((t (:background "cyan3" :foreground "blue"))))
- (show-paren-mismatch-face ((t (:background "red" :foreground "blue"))))
- (show-trailing-whitespace ((t (:background "red" :foreground "blue"))))
- (speedbar-button-face ((t (:foreground "white"))))
- (speedbar-directory-face ((t (:foreground "gray"))))
- (speedbar-file-face ((t (:foreground "gold1"))))
- (speedbar-highlight-face ((t (:background "lightslateblue" :foreground "gold1"))))
- (speedbar-selected-face ((t (:underline t :foreground "red"))))
- (speedbar-tag-face ((t (:foreground "chartreuse"))))
- (text-cursor ((t (:background "DarkGoldenrod1" :foreground "DodgerBlue4"))))
- (toolbar ((t (:background "#e7e3d6" :foreground "#000000"))))
- (underline ((t (:underline t))))
- (vertical-divider ((t (:background "#e7e3d6" :foreground "#000000"))))
- (widget-button-face ((t (:bold t))))
- (widget-button-pressed-face ((t (:foreground "red"))))
- (widget-documentation-face ((t (:foreground "dark green"))))
- (widget-field-face ((t (:background "gray85"))))
- (widget-inactive-face ((t (:foreground "dim gray"))))
- (widget-single-line-field-face ((t (:background "gray85"))))
- (yellow ((t (:foreground "yellow"))))
- (zmacs-region ((t (:background "white" :foreground "midnightblue")))))))
-
- (defun color-theme-euphoria ()
- "Color theme by oGLOWo, created 2000-04-19.
- Green on black theme including font-lock, speedbar, and widget."
- (interactive)
- (color-theme-install
- '(color-theme-euphoria
- ((background-color . "black")
- (background-mode . dark)
- (border-color . "black")
- (cursor-color . "yellow")
- (foreground-color . "#00ff00")
- (mouse-color . "yellow"))
- ((help-highlight-face . underline)
- (list-matching-lines-face . bold)
- (widget-mouse-face . highlight))
- (default ((t (:stipple nil :background "black" :foreground "#00ff00" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :width normal :family "misc-fixed"))))
- (bold ((t (:bold t :weight bold))))
- (bold-italic ((t (:italic t :bold t :slant italic :weight bold))))
- (border ((t (:background "black"))))
- (comint-highlight-input ((t (:bold t :weight bold))))
- (comint-highlight-prompt ((t (:foreground "cyan"))))
- (cursor ((t (:background "yellow"))))
- (fixed-pitch ((t (:family "courier"))))
- (font-lock-builtin-face ((t (:foreground "magenta"))))
- (font-lock-comment-face ((t (:foreground "deeppink"))))
- (font-lock-constant-face ((t (:foreground "blue"))))
- (font-lock-doc-face ((t (:foreground "cyan"))))
- (font-lock-doc-string-face ((t (:foreground "cyan"))))
- (font-lock-function-name-face ((t (:foreground "purple"))))
- (font-lock-keyword-face ((t (:foreground "red"))))
- (font-lock-preprocessor-face ((t (:foreground "blue1"))))
- (font-lock-reference-face ((t (nil))))
- (font-lock-string-face ((t (:foreground "cyan"))))
- (font-lock-type-face ((t (:foreground "yellow"))))
- (font-lock-variable-name-face ((t (:foreground "violet"))))
- (font-lock-warning-face ((t (:bold t :foreground "red" :weight bold))))
- (fringe ((t (:background "gray16" :foreground "#00ff00"))))
- (header-line ((t (:box (:line-width -1 :style released-button) :background "grey20" :foreground "grey90" :box nil))))
- (highlight ((t (:background "darkolivegreen"))))
- (horizontal-divider ((t (:background "gray16" :foreground "#00ff00"))))
- (isearch ((t (:background "palevioletred2" :foreground "brown4"))))
- (isearch-lazy-highlight-face ((t (:background "paleturquoise4"))))
- (italic ((t (:italic t :slant italic))))
- (menu ((t (:background "gray16" :foreground "green"))))
- (modeline ((t (:background "gray16" :foreground "#00ff00" :box (:line-width -1 :style released-button)))))
- (modeline-buffer-id ((t (:background "gray16" :foreground "#00ff00"))))
- (modeline-mousable ((t (:background "gray16" :foreground "#00ff00"))))
- (modeline-mousable-minor-mode ((t (:background "gray16" :foreground "#00ff00"))))
- (mouse ((t (:background "yellow"))))
- (primary-selection ((t (:background "#00ff00" :foreground "black"))))
- (region ((t (:background "steelblue" :foreground "white"))))
- (scroll-bar ((t (:background "gray16" :foreground "#00ff00"))))
- (secondary-selection ((t (:background "#00ff00" :foreground "black"))))
- (show-paren-match-face ((t (:background "turquoise"))))
- (show-paren-mismatch-face ((t (:background "purple" :foreground "white"))))
- (speedbar-button-face ((t (:foreground "#00ff00"))))
- (speedbar-directory-face ((t (:foreground "#00ff00"))))
- (speedbar-file-face ((t (:foreground "cyan"))))
- (speedbar-highlight-face ((t (:background "#00ff00" :foreground "purple"))))
- (speedbar-selected-face ((t (:foreground "deeppink" :underline t))))
- (speedbar-tag-face ((t (:foreground "yellow"))))
- (tool-bar ((t (:background "gray16" :foreground "green" :box (:line-width 1 :style released-button)))))
- (tooltip ((t (:background "gray16" :foreground "#00ff00"))))
- (trailing-whitespace ((t (:background "red"))))
- (underline ((t (:underline t))))
- (variable-pitch ((t (:family "helv"))))
- (vertical-divider ((t (:background "gray16" :foreground "#00ff00"))))
- (widget-button-face ((t (:bold t :weight bold))))
- (widget-button-pressed-face ((t (:foreground "red"))))
- (widget-documentation-face ((t (:foreground "lime green"))))
- (widget-field-face ((t (:background "dim gray"))))
- (widget-inactive-face ((t (:foreground "light gray"))))
- (widget-single-line-field-face ((t (:background "dim gray"))))
- (zmacs-region ((t (:background "steelblue" :foreground "white")))))))
-
- (defun color-theme-resolve ()
- "Color theme by Damien Elmes, created 2002-04-24.
- A white smoke on blue color theme."
- (interactive)
- (color-theme-install
- '(color-theme-resolve
- ((background-color . "#00457f")
- (background-mode . dark)
- (border-color . "black")
- (cursor-color . "DarkGoldenrod1")
- (foreground-color . "white smoke")
- (mouse-color . "white"))
- ((display-time-mail-face . mode-line)
- (help-highlight-face . underline)
- (list-matching-lines-face . bold)
- (view-highlight-face . highlight)
- (widget-mouse-face . highlight))
- (default ((t (:stipple nil :background "#00457f" :foreground "white smoke" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :width normal :family "b&h-lucidatypewriter"))))
- (bold ((t (:bold t :foreground "snow2" :weight bold))))
- (bold-italic ((t (:italic t :bold t :slant italic :weight bold))))
- (border ((t (:background "black"))))
- (calendar-today-face ((t (:underline t))))
- (comint-highlight-input ((t (:bold t :weight bold))))
- (comint-highlight-prompt ((t (:foreground "cyan"))))
- (cperl-array-face ((t (:bold t :foreground "wheat" :weight bold))))
- (cperl-hash-face ((t (:bold t :foreground "chartreuse" :weight bold))))
- (cursor ((t (:background "DarkGoldenrod1"))))
- (diary-face ((t (:foreground "yellow"))))
- (erc-input-face ((t (:foreground "lightblue2"))))
- (erc-notice-face ((t (:foreground "lightyellow3"))))
- (fixed-pitch ((t (:family "courier"))))
- (font-latex-bold-face ((t (:bold t :foreground "DarkOliveGreen" :weight bold))))
- (font-latex-italic-face ((t (:italic t :foreground "DarkOliveGreen" :slant italic))))
- (font-latex-math-face ((t (:foreground "burlywood"))))
- (font-latex-sedate-face ((t (:foreground "LightGray"))))
- (font-latex-string-face ((t (:foreground "RosyBrown"))))
- (font-latex-warning-face ((t (:bold t :foreground "Red" :weight bold))))
- (font-lock-builtin-face ((t (:foreground "wheat"))))
- (font-lock-comment-face ((t (:foreground "light steel blue"))))
- (font-lock-constant-face ((t (:foreground "seashell3"))))
- (font-lock-doc-face ((t (:foreground "plum"))))
- (font-lock-doc-string-face ((t (:foreground "#008000"))))
- (font-lock-function-name-face ((t (:foreground "thistle1"))))
- (font-lock-keyword-face ((t (:foreground "wheat"))))
- (font-lock-other-emphasized-face ((t (:bold t :foreground "gold1" :weight bold))))
- (font-lock-other-type-face ((t (:bold t :foreground "gold1" :weight bold))))
- (font-lock-preprocessor-face ((t (:foreground "#800080"))))
- (font-lock-reference-face ((t (:foreground "wheat"))))
- (font-lock-string-face ((t (:foreground "plum"))))
- (font-lock-type-face ((t (:foreground "lawn green"))))
- (font-lock-variable-name-face ((t (:foreground "light yellow"))))
- (font-lock-warning-face ((t (:foreground "plum"))))
- (fringe ((t (:background "#000000"))))
- (gnus-cite-attribution-face ((t (:italic t :slant italic))))
- (gnus-cite-face-1 ((t (:foreground "light blue"))))
- (gnus-cite-face-10 ((t (:foreground "medium purple"))))
- (gnus-cite-face-11 ((t (:foreground "turquoise"))))
- (gnus-cite-face-2 ((t (:foreground "light cyan"))))
- (gnus-cite-face-3 ((t (:foreground "light yellow"))))
- (gnus-cite-face-4 ((t (:foreground "light pink"))))
- (gnus-cite-face-5 ((t (:foreground "pale green"))))
- (gnus-cite-face-6 ((t (:foreground "beige"))))
- (gnus-cite-face-7 ((t (:foreground "orange"))))
- (gnus-cite-face-8 ((t (:foreground "magenta"))))
- (gnus-cite-face-9 ((t (:foreground "violet"))))
- (gnus-emphasis-bold ((t (:bold t :weight bold))))
- (gnus-emphasis-bold-italic ((t (:italic t :bold t :slant italic :weight bold))))
- (gnus-emphasis-highlight-words ((t (:background "black" :foreground "yellow"))))
- (gnus-emphasis-italic ((t (:italic t :slant italic))))
- (gnus-emphasis-underline ((t (:underline t))))
- (gnus-emphasis-underline-bold ((t (:bold t :underline t :weight bold))))
- (gnus-emphasis-underline-bold-italic ((t (:italic t :bold t :underline t :slant italic :weight bold))))
- (gnus-emphasis-underline-italic ((t (:italic t :underline t :slant italic))))
- (gnus-group-mail-1-empty-face ((t (:foreground "aquamarine1"))))
- (gnus-group-mail-1-face ((t (:bold t :foreground "aquamarine1" :weight bold))))
- (gnus-group-mail-2-empty-face ((t (:foreground "aquamarine2"))))
- (gnus-group-mail-2-face ((t (:bold t :foreground "aquamarine2" :weight bold))))
- (gnus-group-mail-3-empty-face ((t (:foreground "aquamarine3"))))
- (gnus-group-mail-3-face ((t (:bold t :foreground "aquamarine3" :weight bold))))
- (gnus-group-mail-low-empty-face ((t (:foreground "aquamarine4"))))
- (gnus-group-mail-low-face ((t (:bold t :foreground "aquamarine4" :weight bold))))
- (gnus-group-news-1-empty-face ((t (:foreground "PaleTurquoise"))))
- (gnus-group-news-1-face ((t (:bold t :foreground "PaleTurquoise" :weight bold))))
- (gnus-group-news-2-empty-face ((t (:foreground "turquoise"))))
- (gnus-group-news-2-face ((t (:bold t :foreground "turquoise" :weight bold))))
- (gnus-group-news-3-empty-face ((t (nil))))
- (gnus-group-news-3-face ((t (:bold t :weight bold))))
- (gnus-group-news-4-empty-face ((t (nil))))
- (gnus-group-news-4-face ((t (:bold t :weight bold))))
- (gnus-group-news-5-empty-face ((t (nil))))
- (gnus-group-news-5-face ((t (:bold t :weight bold))))
- (gnus-group-news-6-empty-face ((t (nil))))
- (gnus-group-news-6-face ((t (:bold t :weight bold))))
- (gnus-group-news-low-empty-face ((t (:foreground "DarkTurquoise"))))
- (gnus-group-news-low-face ((t (:bold t :foreground "DarkTurquoise" :weight bold))))
- (gnus-header-content-face ((t (:italic t :foreground "snow2" :slant italic))))
- (gnus-header-from-face ((t (:foreground "spring green"))))
- (gnus-header-name-face ((t (:bold t :foreground "snow2" :weight bold))))
- (gnus-header-newsgroups-face ((t (:italic t :foreground "yellow" :slant italic))))
- (gnus-header-subject-face ((t (:bold t :foreground "peach puff" :weight bold))))
- (gnus-signature-face ((t (:italic t :slant italic))))
- (gnus-splash-face ((t (:foreground "Brown"))))
- (gnus-summary-cancelled-face ((t (:background "black" :foreground "yellow"))))
- (gnus-summary-high-ancient-face ((t (:bold t :foreground "SkyBlue" :weight bold))))
- (gnus-summary-high-read-face ((t (:bold t :foreground "PaleGreen" :weight bold))))
- (gnus-summary-high-ticked-face ((t (:bold t :foreground "pink" :weight bold))))
- (gnus-summary-high-unread-face ((t (:bold t :weight bold))))
- (gnus-summary-low-ancient-face ((t (:italic t :foreground "SkyBlue" :slant italic))))
- (gnus-summary-low-read-face ((t (:italic t :foreground "PaleGreen" :slant italic))))
- (gnus-summary-low-ticked-face ((t (:italic t :foreground "pink" :slant italic))))
- (gnus-summary-low-unread-face ((t (:italic t :slant italic))))
- (gnus-summary-normal-ancient-face ((t (:foreground "SkyBlue"))))
- (gnus-summary-normal-read-face ((t (:foreground "PaleGreen"))))
- (gnus-summary-normal-ticked-face ((t (:foreground "pink"))))
- (gnus-summary-normal-unread-face ((t (nil))))
- (gnus-summary-selected-face ((t (:underline t))))
- (header-line ((t (:background "grey20" :foreground "grey90"))))
- (highlight ((t (:background "gray91" :foreground "firebrick"))))
- (highline-face ((t (:background "paleturquoise" :foreground "black"))))
- (holiday-face ((t (:background "chocolate4"))))
- (isearch ((t (:background "palevioletred2" :foreground "brown4"))))
- (isearch-lazy-highlight-face ((t (:background "paleturquoise4"))))
- (italic ((t (:italic t :slant italic))))
- (menu ((t (nil))))
- (message-cited-text-face ((t (:foreground "seashell3"))))
- (message-header-cc-face ((t (:bold t :foreground "snow2" :weight bold))))
- (message-header-name-face ((t (:bold t :foreground "snow1" :weight bold))))
- (message-header-newsgroups-face ((t (:italic t :bold t :foreground "blue4" :slant italic :weight bold))))
- (message-header-other-face ((t (:foreground "snow2"))))
- (message-header-subject-face ((t (:bold t :foreground "snow2" :weight bold))))
- (message-header-to-face ((t (:bold t :foreground "snow2" :weight bold))))
- (message-header-xheader-face ((t (:foreground "blue"))))
- (message-mml-face ((t (:foreground "ForestGreen"))))
- (message-separator-face ((t (:foreground "misty rose"))))
- (modeline ((t (:foreground "white" :background "#001040" :box (:line-width -1 :style released-button)))))
- (modeline-buffer-id ((t (:foreground "white" :background "#001040"))))
- (modeline-mousable ((t (:foreground "white" :background "#001040"))))
- (modeline-mousable-minor-mode ((t (:foreground "white" :background "#001040"))))
- (mouse ((t (:background "white"))))
- (my-tab-face ((t (:background "SlateBlue1"))))
- (p4-diff-del-face ((t (:bold t :foreground "salmon" :weight bold))))
- (primary-selection ((t (:background "gray91" :foreground "DodgerBlue4"))))
- (region ((t (:background "gray91" :foreground "DodgerBlue4"))))
- (scroll-bar ((t (:background "grey75"))))
- (secondary-selection ((t (:background "gray91" :foreground "sienna3"))))
- (show-paren-match-face ((t (:background "cyan3" :foreground "blue"))))
- (show-paren-mismatch-face ((t (:background "red" :foreground "blue"))))
- (tool-bar ((t (:background "grey75" :foreground "black"))))
- (tooltip ((t (:background "lightyellow" :foreground "black"))))
- (trailing-whitespace ((t (:background "red"))))
- (underline ((t (:underline t))))
- (variable-pitch ((t (:family "helv"))))
- (widget-button-face ((t (:bold t :weight bold))))
- (widget-button-pressed-face ((t (:foreground "red"))))
- (widget-documentation-face ((t (:foreground "dark green"))))
- (widget-field-face ((t (:background "steel blue"))))
- (widget-inactive-face ((t (:foreground "grey"))))
- (widget-single-line-field-face ((t (:background "gray85"))))
- (zmacs-region ((t (:background "gray91" :foreground "DodgerBlue4")))))))
-
- (defun color-theme-xp ()
- "Color theme by Girish Bharadwaj, created 2002-04-25.
- Includes custom, erc, font-lock, jde, semantic, speedbar, widget."
- (interactive)
- (color-theme-install
- '(color-theme-xp
- ((background-color . "lightyellow2")
- (background-mode . light)
- (border-color . "black")
- (cursor-color . "black")
- (foreground-color . "gray20")
- (mouse-color . "black"))
- ((help-highlight-face . underline)
- (list-matching-lines-face . bold)
- (semantic-which-function-use-color . t)
- (senator-eldoc-use-color . t)
- (view-highlight-face . highlight)
- (widget-mouse-face . highlight))
- (default ((t (:stipple nil :background "lightyellow2" :foreground "gray20" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :width normal :family "outline-courier new"))))
- (bg:erc-color-face0 ((t (:background "White"))))
- (bg:erc-color-face1 ((t (:background "black"))))
- (bg:erc-color-face10 ((t (:background "lightblue1"))))
- (bg:erc-color-face11 ((t (:background "cyan"))))
- (bg:erc-color-face12 ((t (:background "blue"))))
- (bg:erc-color-face13 ((t (:background "deeppink"))))
- (bg:erc-color-face14 ((t (:background "gray50"))))
- (bg:erc-color-face15 ((t (:background "gray90"))))
- (bg:erc-color-face2 ((t (:background "blue4"))))
- (bg:erc-color-face3 ((t (:background "green4"))))
- (bg:erc-color-face4 ((t (:background "red"))))
- (bg:erc-color-face5 ((t (:background "brown"))))
- (bg:erc-color-face6 ((t (:background "purple"))))
- (bg:erc-color-face7 ((t (:background "orange"))))
- (bg:erc-color-face8 ((t (:background "yellow"))))
- (bg:erc-color-face9 ((t (:background "green"))))
- (bold ((t (:bold t :weight bold))))
- (bold-italic ((t (:italic t :bold t :slant italic :weight bold))))
- (border ((t (:background "black"))))
- (button ((t (:underline t))))
- (comint-highlight-input ((t (:bold t :weight bold))))
- (comint-highlight-prompt ((t (:foreground "dark blue"))))
- (cursor ((t (:background "black"))))
- (custom-button-face ((t (:background "lightgrey" :foreground "black" :box (:line-width 2 :style released-button)))))
- (custom-button-pressed-face ((t (:background "lightgrey" :foreground "black" :box (:line-width 2 :style pressed-button)))))
- (custom-changed-face ((t (:background "blue" :foreground "white"))))
- (custom-comment-face ((t (:background "gray85"))))
- (custom-comment-tag-face ((t (:foreground "blue4"))))
- (custom-documentation-face ((t (nil))))
- (custom-face-tag-face ((t (:bold t :family "helv" :weight bold :height 1.2))))
- (custom-group-tag-face ((t (:bold t :foreground "blue" :weight bold :height 1.2))))
- (custom-group-tag-face-1 ((t (:bold t :family "helv" :foreground "red" :weight bold :height 1.2))))
- (custom-invalid-face ((t (:background "red" :foreground "yellow"))))
- (custom-modified-face ((t (:background "blue" :foreground "white"))))
- (custom-rogue-face ((t (:background "black" :foreground "pink"))))
- (custom-saved-face ((t (:underline t))))
- (custom-set-face ((t (:background "white" :foreground "blue"))))
- (custom-state-face ((t (:foreground "dark green"))))
- (custom-variable-button-face ((t (:bold t :underline t :weight bold))))
- (custom-variable-tag-face ((t (:bold t :family "helv" :foreground "blue" :weight bold :height 1.2))))
- (erc-action-face ((t (:bold t :weight bold))))
- (erc-bold-face ((t (:bold t :weight bold))))
- (erc-default-face ((t (nil))))
- (erc-direct-msg-face ((t (:foreground "IndianRed"))))
- (erc-error-face ((t (:background "Red" :foreground "White"))))
- (erc-input-face ((t (:foreground "brown"))))
- (erc-inverse-face ((t (:background "Black" :foreground "White"))))
- (erc-notice-face ((t (:bold t :foreground "SlateBlue" :weight bold))))
- (erc-prompt-face ((t (:bold t :background "lightBlue2" :foreground "Black" :weight bold))))
- (erc-timestamp-face ((t (:bold t :foreground "green" :weight bold))))
- (erc-underline-face ((t (:underline t))))
- (fg:erc-color-face0 ((t (:foreground "White"))))
- (fg:erc-color-face1 ((t (:foreground "black"))))
- (fg:erc-color-face10 ((t (:foreground "lightblue1"))))
- (fg:erc-color-face11 ((t (:foreground "cyan"))))
- (fg:erc-color-face12 ((t (:foreground "blue"))))
- (fg:erc-color-face13 ((t (:foreground "deeppink"))))
- (fg:erc-color-face14 ((t (:foreground "gray50"))))
- (fg:erc-color-face15 ((t (:foreground "gray90"))))
- (fg:erc-color-face2 ((t (:foreground "blue4"))))
- (fg:erc-color-face3 ((t (:foreground "green4"))))
- (fg:erc-color-face4 ((t (:foreground "red"))))
- (fg:erc-color-face5 ((t (:foreground "brown"))))
- (fg:erc-color-face6 ((t (:foreground "purple"))))
- (fg:erc-color-face7 ((t (:foreground "orange"))))
- (fg:erc-color-face8 ((t (:foreground "yellow"))))
- (fg:erc-color-face9 ((t (:foreground "green"))))
- (fixed-pitch ((t (:family "courier"))))
- (font-lock-builtin-face ((t (:foreground "magenta3" :underline t :height 0.9))))
- (font-lock-comment-face ((t (:italic t :foreground "gray60" :slant oblique :height 0.9))))
- (font-lock-constant-face ((t (:bold t :foreground "medium purple" :weight bold :height 0.9))))
- (font-lock-function-name-face ((t (:bold t :foreground "black" :weight bold))))
- (font-lock-keyword-face ((t (:bold t :foreground "blue" :weight bold))))
- (font-lock-string-face ((t (:foreground "red" :height 0.9))))
- (font-lock-type-face ((t (:foreground "Royalblue"))))
- (font-lock-variable-name-face ((t (:bold t :foreground "maroon" :weight bold :height 0.9))))
- (font-lock-warning-face ((t (:bold t :foreground "Red" :weight bold))))
- (fringe ((t (:background "dodgerblue"))))
- (header-line ((t (:underline "red" :overline "red" :background "grey90" :foreground "grey20" :box nil))))
- (highlight ((t (:background "darkseagreen2"))))
- (isearch ((t (:background "magenta2" :foreground "lightskyblue1"))))
- (isearch-lazy-highlight-face ((t (:background "paleturquoise"))))
- (italic ((t (:italic t :slant italic))))
- (jde-bug-breakpoint-cursor ((t (:background "brown" :foreground "cyan"))))
- (jde-db-active-breakpoint-face ((t (:background "red" :foreground "black"))))
- (jde-db-requested-breakpoint-face ((t (:background "yellow" :foreground "black"))))
- (jde-db-spec-breakpoint-face ((t (:background "green" :foreground "black"))))
- (jde-java-font-lock-api-face ((t (:foreground "dark goldenrod"))))
- (jde-java-font-lock-bold-face ((t (:bold t :weight bold))))
- (jde-java-font-lock-code-face ((t (nil))))
- (jde-java-font-lock-constant-face ((t (:foreground "CadetBlue"))))
- (jde-java-font-lock-doc-tag-face ((t (:foreground "green4"))))
- (jde-java-font-lock-italic-face ((t (:italic t :slant italic))))
- (jde-java-font-lock-link-face ((t (:foreground "cadetblue" :underline t :slant normal))))
- (jde-java-font-lock-modifier-face ((t (:foreground "Orchid"))))
- (jde-java-font-lock-number-face ((t (:foreground "RosyBrown"))))
- (jde-java-font-lock-operator-face ((t (:foreground "medium blue"))))
- (jde-java-font-lock-package-face ((t (:foreground "blue3"))))
- (jde-java-font-lock-pre-face ((t (nil))))
- (jde-java-font-lock-underline-face ((t (:underline t))))
- (menu ((t (nil))))
- (minibuffer-prompt ((t (:foreground "dark blue"))))
- (modeline ((t (:background "dodgerblue" :foreground "black" :overline "red" :underline "red"))))
- (modeline-buffer-id ((t (:background "dodgerblue" :foreground "black"))))
- (modeline-mousable ((t (:background "dodgerblue" :foreground "black"))))
- (modeline-mousable-minor-mode ((t (:background "dodgerblue" :foreground "black"))))
- (mode-line-inactive ((t (:italic t :underline "red" :overline "red" :background "white" :foreground "cadetblue" :box (:line-width -1 :color "grey75") :slant oblique :weight light))))
- (mouse ((t (:background "black"))))
- (primary-selection ((t (:background "lightgoldenrod2"))))
- (region ((t (:background "lightgoldenrod2"))))
- (scroll-bar ((t (nil))))
- (secondary-selection ((t (:background "yellow"))))
- (semantic-dirty-token-face ((t (:background "lightyellow"))))
- (semantic-unmatched-syntax-face ((t (:underline "red"))))
- (senator-intangible-face ((t (:foreground "gray25"))))
- (senator-momentary-highlight-face ((t (:background "gray70"))))
- (senator-read-only-face ((t (:background "#CCBBBB"))))
- (show-paren-match-face ((t (:background "turquoise"))))
- (show-paren-mismatch-face ((t (:background "purple" :foreground "white"))))
- (speedbar-button-face ((t (:foreground "green4"))))
- (speedbar-directory-face ((t (:foreground "blue4"))))
- (speedbar-file-face ((t (:foreground "cyan4"))))
- (speedbar-highlight-face ((t (:background "green"))))
- (speedbar-selected-face ((t (:foreground "red" :underline t))))
- (speedbar-tag-face ((t (:foreground "brown"))))
- (template-message-face ((t (:bold t :weight bold))))
- (tool-bar ((t (:background "grey75" :foreground "black" :box (:line-width 1 :style released-button)))))
- (tooltip ((t (:background "lightyellow" :foreground "black"))))
- (trailing-whitespace ((t (:background "red"))))
- (underline ((t (:underline t))))
- (variable-pitch ((t (:family "helv"))))
- (widget-button-face ((t (:bold t :weight bold))))
- (widget-button-pressed-face ((t (:foreground "red"))))
- (widget-documentation-face ((t (:foreground "dark green"))))
- (widget-field-face ((t (:background "gray85"))))
- (widget-inactive-face ((t (:foreground "dim gray"))))
- (widget-single-line-field-face ((t (:background "gray85"))))
- (zmacs-region ((t (:background "lightgoldenrod2")))))))
-
- (defun color-theme-gray30 ()
- "Color theme by Girish Bharadwaj, created 2002-04-22."
- (interactive)
- (color-theme-install
- '(color-theme-gray30
- ((background-color . "grey30")
- (background-mode . dark)
- (border-color . "black")
- (cursor-color . "black")
- (foreground-color . "gainsboro")
- (mouse-color . "black"))
- ((help-highlight-face . underline)
- (list-matching-lines-face . bold)
- (semantic-which-function-use-color . t)
- (senator-eldoc-use-color . t)
- (widget-mouse-face . highlight))
- (default ((t (:stipple nil :background "grey30" :foreground "gainsboro" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :width normal :family "outline-courier new"))))
- (bg:erc-color-face0 ((t (:background "White"))))
- (bg:erc-color-face1 ((t (:background "black"))))
- (bg:erc-color-face10 ((t (:background "lightblue1"))))
- (bg:erc-color-face11 ((t (:background "cyan"))))
- (bg:erc-color-face12 ((t (:background "blue"))))
- (bg:erc-color-face13 ((t (:background "deeppink"))))
- (bg:erc-color-face14 ((t (:background "gray50"))))
- (bg:erc-color-face15 ((t (:background "gray90"))))
- (bg:erc-color-face2 ((t (:background "blue4"))))
- (bg:erc-color-face3 ((t (:background "green4"))))
- (bg:erc-color-face4 ((t (:background "red"))))
- (bg:erc-color-face5 ((t (:background "brown"))))
- (bg:erc-color-face6 ((t (:background "purple"))))
- (bg:erc-color-face7 ((t (:background "orange"))))
- (bg:erc-color-face8 ((t (:background "yellow"))))
- (bg:erc-color-face9 ((t (:background "green"))))
- (bold ((t (:bold t :weight bold))))
- (bold-italic ((t (:italic t :bold t :slant italic :weight bold))))
- (border ((t (:background "black"))))
- (button ((t (:underline t))))
- (comint-highlight-input ((t (:bold t :weight bold))))
- (comint-highlight-prompt ((t (:foreground "cyan"))))
- (cursor ((t (:background "black"))))
- (custom-button-face ((t (:background "lightgrey" :foreground "black" :box (:line-width 2 :style released-button)))))
- (custom-button-pressed-face ((t (:background "lightgrey" :foreground "black" :box (:line-width 2 :style pressed-button)))))
- (custom-changed-face ((t (:background "blue" :foreground "white"))))
- (custom-comment-face ((t (:background "dim gray"))))
- (custom-comment-tag-face ((t (:foreground "gray80"))))
- (custom-documentation-face ((t (nil))))
- (custom-face-tag-face ((t (:bold t :family "helv" :weight bold :height 1.2))))
- (custom-group-tag-face ((t (:bold t :foreground "light blue" :weight bold :height 1.2))))
- (custom-group-tag-face-1 ((t (:bold t :family "helv" :foreground "pink" :weight bold :height 1.2))))
- (custom-invalid-face ((t (:background "red" :foreground "yellow"))))
- (custom-modified-face ((t (:background "blue" :foreground "white"))))
- (custom-rogue-face ((t (:background "black" :foreground "pink"))))
- (custom-saved-face ((t (:underline t))))
- (custom-set-face ((t (:background "white" :foreground "blue"))))
- (custom-state-face ((t (:foreground "lime green"))))
- (custom-variable-button-face ((t (:bold t :underline t :weight bold))))
- (custom-variable-tag-face ((t (:bold t :family "helv" :foreground "light blue" :weight bold :height 1.2))))
- (erc-action-face ((t (:bold t :weight bold))))
- (erc-bold-face ((t (:bold t :weight bold))))
- (erc-default-face ((t (nil))))
- (erc-direct-msg-face ((t (:foreground "IndianRed"))))
- (erc-error-face ((t (:background "Red" :foreground "White"))))
- (erc-input-face ((t (:foreground "brown"))))
- (erc-inverse-face ((t (:background "Black" :foreground "White"))))
- (erc-notice-face ((t (:bold t :foreground "SlateBlue" :weight bold))))
- (erc-prompt-face ((t (:bold t :background "lightBlue2" :foreground "Black" :weight bold))))
- (erc-timestamp-face ((t (:bold t :foreground "green" :weight bold))))
- (erc-underline-face ((t (:underline t))))
- (eshell-ls-archive-face ((t (:bold t :foreground "Orchid" :weight bold))))
- (eshell-ls-backup-face ((t (:foreground "LightSalmon"))))
- (eshell-ls-clutter-face ((t (:bold t :foreground "OrangeRed" :weight bold))))
- (eshell-ls-directory-face ((t (:bold t :foreground "SkyBlue" :weight bold))))
- (eshell-ls-executable-face ((t (:bold t :foreground "Green" :weight bold))))
- (eshell-ls-missing-face ((t (:bold t :foreground "Red" :weight bold))))
- (eshell-ls-product-face ((t (:foreground "LightSalmon"))))
- (eshell-ls-readonly-face ((t (:foreground "Pink"))))
- (eshell-ls-special-face ((t (:bold t :foreground "Magenta" :weight bold))))
- (eshell-ls-symlink-face ((t (:bold t :foreground "Cyan" :weight bold))))
- (eshell-ls-unreadable-face ((t (:foreground "DarkGrey"))))
- (fg:erc-color-face0 ((t (:foreground "White"))))
- (fg:erc-color-face1 ((t (:foreground "black"))))
- (fg:erc-color-face10 ((t (:foreground "lightblue1"))))
- (fg:erc-color-face11 ((t (:foreground "cyan"))))
- (fg:erc-color-face12 ((t (:foreground "blue"))))
- (fg:erc-color-face13 ((t (:foreground "deeppink"))))
- (fg:erc-color-face14 ((t (:foreground "gray50"))))
- (fg:erc-color-face15 ((t (:foreground "gray90"))))
- (fg:erc-color-face2 ((t (:foreground "blue4"))))
- (fg:erc-color-face3 ((t (:foreground "green4"))))
- (fg:erc-color-face4 ((t (:foreground "red"))))
- (fg:erc-color-face5 ((t (:foreground "brown"))))
- (fg:erc-color-face6 ((t (:foreground "purple"))))
- (fg:erc-color-face7 ((t (:foreground "orange"))))
- (fg:erc-color-face8 ((t (:foreground "yellow"))))
- (fg:erc-color-face9 ((t (:foreground "green"))))
- (fixed-pitch ((t (:family "courier"))))
- (font-lock-builtin-face ((t (:foreground "LightSkyBlue" :underline t))))
- (font-lock-comment-face ((t (:italic t :foreground "lightgreen" :slant oblique))))
- (font-lock-constant-face ((t (:foreground "Aquamarine"))))
- (font-lock-function-name-face ((t (:bold t :foreground "DodgerBlue" :weight bold :height 1.05))))
- (font-lock-keyword-face ((t (:foreground "LightPink" :height 1.05))))
- (font-lock-string-face ((t (:foreground "LightSalmon"))))
- (font-lock-type-face ((t (:foreground "yellow" :height 1.05))))
- (font-lock-variable-name-face ((t (:foreground "gold"))))
- (font-lock-warning-face ((t (:bold t :foreground "Pink" :weight bold))))
- (fringe ((t (:background "grey10"))))
- (header-line ((t (:box (:line-width -1 :style released-button) :background "grey20" :foreground "grey90" :box nil))))
- (highlight ((t (:background "darkolivegreen"))))
- (isearch ((t (:background "palevioletred2" :foreground "brown4"))))
- (isearch-lazy-highlight-face ((t (:background "paleturquoise4"))))
- (italic ((t (:italic t :slant italic))))
- (jde-bug-breakpoint-cursor ((t (:background "brown" :foreground "cyan"))))
- (jde-db-active-breakpoint-face ((t (:background "red" :foreground "black"))))
- (jde-db-requested-breakpoint-face ((t (:background "yellow" :foreground "black"))))
- (jde-db-spec-breakpoint-face ((t (:background "green" :foreground "black"))))
- (jde-java-font-lock-api-face ((t (:foreground "light goldenrod"))))
- (jde-java-font-lock-bold-face ((t (:bold t :weight bold))))
- (jde-java-font-lock-code-face ((t (nil))))
- (jde-java-font-lock-constant-face ((t (:foreground "Aquamarine"))))
- (jde-java-font-lock-doc-tag-face ((t (:foreground "light coral"))))
- (jde-java-font-lock-italic-face ((t (:italic t :slant italic))))
- (jde-java-font-lock-link-face ((t (:foreground "cadetblue" :underline t :slant normal))))
- (jde-java-font-lock-modifier-face ((t (:foreground "LightSteelBlue"))))
- (jde-java-font-lock-number-face ((t (:foreground "LightSalmon"))))
- (jde-java-font-lock-operator-face ((t (:foreground "medium blue"))))
- (jde-java-font-lock-package-face ((t (:foreground "steelblue1"))))
- (jde-java-font-lock-pre-face ((t (nil))))
- (jde-java-font-lock-underline-face ((t (:underline t))))
- (menu ((t (nil))))
- (minibuffer-prompt ((t (:foreground "cyan"))))
- (mode-line ((t (:background "grey75" :foreground "black" :box (:line-width -1 :style released-button)))))
- (mode-line-inactive ((t (:background "grey30" :foreground "grey80" :box (:line-width -1 :color "grey40" :style nil) :weight light))))
- (mouse ((t (:background "black"))))
- (primary-selection ((t (:background "blue3"))))
- (region ((t (:background "blue3"))))
- (scroll-bar ((t (nil))))
- (secondary-selection ((t (:background "SkyBlue4"))))
- (semantic-dirty-token-face ((t (:background "lightyellow"))))
- (semantic-unmatched-syntax-face ((t (:underline "red"))))
- (senator-intangible-face ((t (:foreground "gray75"))))
- (senator-momentary-highlight-face ((t (:background "gray30"))))
- (senator-read-only-face ((t (:background "#664444"))))
- (show-paren-match-face ((t (:background "steelblue3"))))
- (show-paren-mismatch-face ((t (:background "purple" :foreground "white"))))
- (speedbar-button-face ((t (:foreground "green3"))))
- (speedbar-directory-face ((t (:foreground "light blue"))))
- (speedbar-file-face ((t (:foreground "cyan"))))
- (speedbar-highlight-face ((t (:background "sea green"))))
- (speedbar-selected-face ((t (:foreground "red" :underline t))))
- (speedbar-tag-face ((t (:foreground "yellow"))))
- (template-message-face ((t (:bold t :weight bold))))
- (tool-bar ((t (:background "grey75" :foreground "black" :box (:line-width 1 :style released-button)))))
- (tooltip ((t (:background "lightyellow" :foreground "black"))))
- (trailing-whitespace ((t (:background "red"))))
- (underline ((t (:underline t))))
- (variable-pitch ((t (:family "helv"))))
- (widget-button-face ((t (:bold t :weight bold))))
- (widget-button-pressed-face ((t (:foreground "red"))))
- (widget-documentation-face ((t (:foreground "lime green"))))
- (widget-field-face ((t (:background "dim gray"))))
- (widget-inactive-face ((t (:foreground "light gray"))))
- (widget-single-line-field-face ((t (:background "dim gray"))))
- (zmacs-region ((t (:background "blue3")))))))
-
- (defun color-theme-dark-green ()
- "Color theme by ces93, created 2002-03-30."
- (interactive)
- (color-theme-install
- '(color-theme-dark-green
- ((background-mode . light)
- (background-toolbar-color . "#e79ddf7ddf7d")
- (border-color . "#000000000000")
- (bottom-toolbar-shadow-color . "#8e3886178617")
- (top-toolbar-shadow-color . "#ffffffffffff"))
- nil
- (default ((t (nil))))
- (blue ((t (:foreground "blue"))))
- (bold ((t (:bold t))))
- (bold-italic ((t (:italic t :bold t))))
- (border-glyph ((t (nil))))
- (fringe ((t (nil))))
- (green ((t (:foreground "green"))))
- (gui-button-face ((t (:background "grey75" :foreground "black"))))
- (gui-element ((t (:background "#ffffff" :foreground "#000000"))))
- (highlight ((t (:background "gray" :foreground "darkred"))))
- (isearch ((t (:background "LightSlateGray" :foreground "red"))))
- (italic ((t (:italic t))))
- (left-margin ((t (nil))))
- (list-mode-item-selected ((t (:background "gray68"))))
- (mode-line ((t (:background "LightSlateGray" :foreground "black"))))
- (modeline ((t (:background "LightSlateGray" :foreground "black"))))
- (modeline-buffer-id ((t (:background "LightSlateGray" :foreground "blue4"))))
- (modeline-mousable ((t (:background "LightSlateGray" :foreground "firebrick"))))
- (modeline-mousable-minor-mode ((t (:background "LightSlateGray" :foreground "green4"))))
- (pointer ((t (:background "#ffffff" :foreground "#000000"))))
- (primary-selection ((t (:background "gray65"))))
- (red ((t (:foreground "red"))))
- (region ((t (:background "gray65"))))
- (right-margin ((t (nil))))
- (rpm-spec-dir-face ((t (:foreground "green"))))
- (rpm-spec-doc-face ((t (:foreground "magenta"))))
- (rpm-spec-ghost-face ((t (:foreground "red"))))
- (rpm-spec-macro-face ((t (:foreground "purple"))))
- (rpm-spec-package-face ((t (:foreground "red"))))
- (rpm-spec-tag-face ((t (:foreground "blue"))))
- (secondary-selection ((t (:background "paleturquoise"))))
- (text-cursor ((t (:background "Red3" :foreground "DarkSlateGray"))))
- (tool-bar ((t (nil))))
- (toolbar ((t (:background "#ffffff" :foreground "#000000"))))
- (underline ((t (:underline t))))
- (vertical-divider ((t (:background "#ffffff" :foreground "#000000"))))
- (widget-button-face ((t (:bold t))))
- (widget-button-pressed-face ((t (:foreground "red"))))
- (widget-documentation-face ((t (:foreground "dark green"))))
- (widget-field-face ((t (:background "gray85"))))
- (widget-inactive-face ((t (:foreground "dim gray"))))
- (yellow ((t (:foreground "yellow"))))
- (zmacs-region ((t (:background "darkorange" :foreground "black")))))))
-
- (defun color-theme-whateveryouwant ()
- "Color theme by Fabien Penso, created 2002-05-02."
- (interactive)
- (color-theme-install
- '(color-theme-whateveryouwant
- ((background-color . "white")
- (background-mode . light)
- (border-color . "black")
- (cursor-color . "black")
- (foreground-color . "black")
- (mouse-color . "black"))
- ((cperl-here-face . font-lock-string-face)
- (cperl-invalid-face . underline)
- (cperl-pod-face . font-lock-comment-face)
- (cperl-pod-head-face . font-lock-variable-name-face)
- (display-time-mail-face . mode-line)
- (gnus-article-button-face . bold)
- (gnus-article-mouse-face . highlight)
- (gnus-carpal-button-face . bold)
- (gnus-carpal-header-face . bold-italic)
- (gnus-cite-attribution-face . gnus-cite-attribution-face)
- (gnus-mouse-face . highlight)
- (gnus-selected-tree-face . modeline)
- (gnus-signature-face . gnus-signature-face)
- (gnus-summary-selected-face . gnus-summary-selected-face)
- (gnus-treat-display-xface . head)
- (help-highlight-face . underline)
- (ispell-highlight-face . flyspell-incorrect-face)
- (list-matching-lines-face . bold)
- (sgml-set-face . t)
- (view-highlight-face . highlight)
- (widget-mouse-face . highlight)
- (x-face-mouse-face . highlight))
- (default ((t (:stipple nil :background "white" :foreground "black" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :height 116 :width normal :family "monotype-courier new"))))
- (Info-title-1-face ((t (:bold t :weight bold :height 1.728 :family "helv"))))
- (Info-title-2-face ((t (:bold t :weight bold :height 1.44 :family "helv"))))
- (Info-title-3-face ((t (:bold t :weight bold :height 1.2 :family "helv"))))
- (Info-title-4-face ((t (:bold t :weight bold :family "helv"))))
- (antlr-font-lock-keyword-face ((t (:bold t :foreground "black" :weight bold))))
- (antlr-font-lock-literal-face ((t (:bold t :foreground "brown4" :weight bold))))
- (antlr-font-lock-ruledef-face ((t (:bold t :foreground "blue" :weight bold))))
- (antlr-font-lock-ruleref-face ((t (:foreground "blue4"))))
- (antlr-font-lock-tokendef-face ((t (:bold t :foreground "blue" :weight bold))))
- (antlr-font-lock-tokenref-face ((t (:foreground "orange4"))))
- (bbdb-company ((t (:italic t :slant italic))))
- (bbdb-field-name ((t (:bold t :foreground "gray40" :weight bold))))
- (bbdb-field-value ((t (nil))))
- (bbdb-name ((t (:underline t))))
- (bold ((t (:bold t :foreground "gray40" :weight bold))))
- (bold-italic ((t (:italic t :bold t :slant italic :weight bold))))
- (border ((t (:background "black"))))
- (calendar-today-face ((t (:underline t))))
- (change-log-acknowledgement-face ((t (:foreground "Firebrick"))))
- (change-log-conditionals-face ((t (:foreground "DarkGoldenrod"))))
- (change-log-date-face ((t (:foreground "RosyBrown"))))
- (change-log-email-face ((t (:foreground "DarkGoldenrod"))))
- (change-log-file-face ((t (:foreground "Blue"))))
- (change-log-function-face ((t (:foreground "DarkGoldenrod"))))
- (change-log-list-face ((t (:foreground "Purple"))))
- (change-log-name-face ((t (:foreground "CadetBlue"))))
- (comint-highlight-input ((t (:bold t :weight bold))))
- (comint-highlight-prompt ((t (:foreground "dark blue"))))
- (cperl-array-face ((t (:bold t :background "lightyellow2" :foreground "Blue" :weight bold))))
- (cperl-hash-face ((t (:italic t :bold t :background "lightyellow2" :foreground "Red" :slant italic :weight bold))))
- (cperl-nonoverridable-face ((t (:foreground "chartreuse3"))))
- (cursor ((t (:background "black"))))
- (custom-button-face ((t (:background "lightgrey" :foreground "black" :box (:line-width 2 :style released-button)))))
- (custom-button-pressed-face ((t (:background "lightgrey" :foreground "black" :box (:line-width 2 :style pressed-button)))))
- (custom-changed-face ((t (:background "blue" :foreground "white"))))
- (custom-comment-face ((t (:background "gray85"))))
- (custom-comment-tag-face ((t (:foreground "blue4"))))
- (custom-documentation-face ((t (nil))))
- (custom-face-tag-face ((t (:bold t :weight bold :height 1.2 :family "helv"))))
- (custom-group-tag-face ((t (:bold t :foreground "blue" :weight bold :height 1.2))))
- (custom-group-tag-face-1 ((t (:bold t :foreground "red" :weight bold :height 1.2 :family "helv"))))
- (custom-invalid-face ((t (:background "red" :foreground "yellow"))))
- (custom-modified-face ((t (:background "blue" :foreground "white"))))
- (custom-rogue-face ((t (:background "black" :foreground "pink"))))
- (custom-saved-face ((t (:underline t))))
- (custom-set-face ((t (:background "white" :foreground "blue"))))
- (custom-state-face ((t (:foreground "dark green"))))
- (custom-variable-button-face ((t (:bold t :underline t :weight bold))))
- (custom-variable-tag-face ((t (:bold t :foreground "blue" :weight bold :height 1.2 :family "helv"))))
- (cvs-filename-face ((t (:foreground "blue4"))))
- (cvs-handled-face ((t (:foreground "pink"))))
- (cvs-header-face ((t (:bold t :foreground "blue4" :weight bold))))
- (cvs-marked-face ((t (:bold t :foreground "green3" :weight bold))))
- (cvs-msg-face ((t (:italic t :slant italic))))
- (cvs-need-action-face ((t (:foreground "orange"))))
- (cvs-unknown-face ((t (:foreground "red"))))
- (diary-face ((t (:foreground "red"))))
- (diff-added-face ((t (nil))))
- (diff-changed-face ((t (nil))))
- (diff-context-face ((t (:foreground "grey50"))))
- (diff-file-header-face ((t (:bold t :background "grey70" :weight bold))))
- (diff-function-face ((t (:foreground "grey50"))))
- (diff-header-face ((t (:background "grey85"))))
- (diff-hunk-header-face ((t (:background "grey85"))))
- (diff-index-face ((t (:bold t :background "grey70" :weight bold))))
- (diff-nonexistent-face ((t (:bold t :background "grey70" :weight bold))))
- (diff-removed-face ((t (nil))))
- (dired-face-boring ((t (:foreground "RosyBrown"))))
- (dired-face-directory ((t (:foreground "Blue"))))
- (dired-face-executable ((t (nil))))
- (dired-face-flagged ((t (:bold t :foreground "Red" :weight bold))))
- (dired-face-marked ((t (:bold t :foreground "Red" :weight bold))))
- (dired-face-permissions ((t (nil))))
- (dired-face-setuid ((t (nil))))
- (dired-face-socket ((t (nil))))
- (dired-face-symlink ((t (:foreground "Purple"))))
- (ebrowse-default-face ((t (nil))))
- (ebrowse-file-name-face ((t (:italic t :slant italic))))
- (ebrowse-member-attribute-face ((t (:foreground "red"))))
- (ebrowse-member-class-face ((t (:foreground "purple"))))
- (ebrowse-progress-face ((t (:background "blue"))))
- (ebrowse-root-class-face ((t (:bold t :foreground "blue" :weight bold))))
- (ebrowse-tree-mark-face ((t (:foreground "red"))))
- (ediff-current-diff-face-A ((t (:background "pale green" :foreground "firebrick"))))
- (ediff-current-diff-face-Ancestor ((t (:background "VioletRed" :foreground "Black"))))
- (ediff-current-diff-face-B ((t (:background "Yellow" :foreground "DarkOrchid"))))
- (ediff-current-diff-face-C ((t (:background "Pink" :foreground "Navy"))))
- (ediff-even-diff-face-A ((t (:background "light grey" :foreground "Black"))))
- (ediff-even-diff-face-Ancestor ((t (:background "Grey" :foreground "White"))))
- (ediff-even-diff-face-B ((t (:background "Grey" :foreground "White"))))
- (ediff-even-diff-face-C ((t (:background "light grey" :foreground "Black"))))
- (ediff-fine-diff-face-A ((t (:background "sky blue" :foreground "Navy"))))
- (ediff-fine-diff-face-Ancestor ((t (:background "Green" :foreground "Black"))))
- (ediff-fine-diff-face-B ((t (:background "cyan" :foreground "Black"))))
- (ediff-fine-diff-face-C ((t (:background "Turquoise" :foreground "Black"))))
- (ediff-odd-diff-face-A ((t (:background "Grey" :foreground "White"))))
- (ediff-odd-diff-face-Ancestor ((t (:background "light grey" :foreground "Black"))))
- (ediff-odd-diff-face-B ((t (:background "light grey" :foreground "Black"))))
- (ediff-odd-diff-face-C ((t (:background "Grey" :foreground "White"))))
- (erc-action-face ((t (:bold t :weight bold))))
- (erc-bold-face ((t (:bold t :weight bold))))
- (erc-default-face ((t (nil))))
- (erc-direct-msg-face ((t (:foreground "LightSalmon"))))
- (erc-error-face ((t (:bold t :foreground "IndianRed" :weight bold))))
- (erc-input-face ((t (:foreground "Beige"))))
- (erc-inverse-face ((t (:background "wheat" :foreground "darkslategrey"))))
- (erc-notice-face ((t (:foreground "MediumAquamarine"))))
- (erc-pal-face ((t (:foreground "pale green"))))
- (erc-prompt-face ((t (:foreground "MediumAquamarine"))))
- (erc-underline-face ((t (:underline t))))
- (eshell-ls-archive-face ((t (:bold t :foreground "Orchid" :weight bold))))
- (eshell-ls-backup-face ((t (:foreground "OrangeRed"))))
- (eshell-ls-clutter-face ((t (:bold t :foreground "OrangeRed" :weight bold))))
- (eshell-ls-directory-face ((t (:bold t :foreground "Blue" :weight bold))))
- (eshell-ls-executable-face ((t (:bold t :foreground "ForestGreen" :weight bold))))
- (eshell-ls-missing-face ((t (:bold t :foreground "Red" :weight bold))))
- (eshell-ls-picture-face ((t (:foreground "Violet"))))
- (eshell-ls-product-face ((t (:foreground "OrangeRed"))))
- (eshell-ls-readonly-face ((t (:foreground "Brown"))))
- (eshell-ls-special-face ((t (:bold t :foreground "Magenta" :weight bold))))
- (eshell-ls-symlink-face ((t (:bold t :foreground "Dark Cyan" :weight bold))))
- (eshell-ls-unreadable-face ((t (:foreground "Grey30"))))
- (eshell-prompt-face ((t (:bold t :foreground "#aa0000" :weight bold :width condensed :family "neep-alt"))))
- (eshell-test-failed-face ((t (:bold t :foreground "OrangeRed" :weight bold))))
- (eshell-test-ok-face ((t (:bold t :foreground "Green" :weight bold))))
- (excerpt ((t (:italic t :slant italic))))
- (fixed ((t (:bold t :weight bold))))
- (fixed-pitch ((t (:family "courier"))))
- (flyspell-duplicate-face ((t (:bold t :foreground "Gold3" :underline t :weight bold))))
- (flyspell-incorrect-face ((t (:bold t :foreground "OrangeRed" :underline t :weight bold))))
- (font-latex-bold-face ((t (:bold t :foreground "DarkOliveGreen" :weight bold))))
- (font-latex-italic-face ((t (:italic t :foreground "DarkOliveGreen" :slant italic))))
- (font-latex-math-face ((t (:foreground "SaddleBrown"))))
- (font-latex-sedate-face ((t (:foreground "DimGray"))))
- (font-latex-string-face ((t (:foreground "RosyBrown"))))
- (font-latex-warning-face ((t (:bold t :foreground "Red" :weight bold))))
- (font-lock-builtin-face ((t (:foreground "dodgerblue3"))))
- (font-lock-comment-face ((t (:foreground "#cc0000" :width semi-condensed :family "helvetica"))))
- (font-lock-constant-face ((t (:foreground "CadetBlue"))))
- (font-lock-doc-face ((t (:foreground "RosyBrown"))))
- (font-lock-doc-string-face ((t (:foreground "RosyBrown"))))
- (font-lock-function-name-face ((t (:bold t :foreground "navy" :weight bold :height 100))))
- (font-lock-keyword-face ((t (:bold t :foreground "red4" :weight bold))))
- (font-lock-preprocessor-face ((t (:foreground "CadetBlue"))))
- (font-lock-reference-face ((t (:foreground "Orchid"))))
- (font-lock-string-face ((t (:foreground "navy"))))
- (font-lock-type-face ((t (:bold t :foreground "black" :weight bold))))
- (font-lock-variable-name-face ((t (:foreground "black"))))
- (font-lock-warning-face ((t (:foreground "orange2"))))
- (fringe ((t (:background "white"))))
- (gnus-cite-attribution-face ((t (:italic t :slant italic))))
- (gnus-cite-face-1 ((t (:foreground "MidnightBlue"))))
- (gnus-cite-face-10 ((t (:foreground "medium purple"))))
- (gnus-cite-face-11 ((t (:foreground "turquoise"))))
- (gnus-cite-face-2 ((t (:foreground "firebrick"))))
- (gnus-cite-face-3 ((t (:foreground "dark green"))))
- (gnus-cite-face-4 ((t (:foreground "OrangeRed"))))
- (gnus-cite-face-5 ((t (:foreground "dark khaki"))))
- (gnus-cite-face-6 ((t (:foreground "dark violet"))))
- (gnus-cite-face-7 ((t (:foreground "SteelBlue4"))))
- (gnus-cite-face-8 ((t (:foreground "magenta"))))
- (gnus-cite-face-9 ((t (:foreground "violet"))))
- (gnus-emphasis-bold ((t (:bold t :weight bold))))
- (gnus-emphasis-bold-italic ((t (:italic t :bold t :slant italic :weight bold))))
- (gnus-emphasis-highlight-words ((t (:background "black" :foreground "yellow"))))
- (gnus-emphasis-italic ((t (:italic t :slant italic))))
- (gnus-emphasis-underline ((t (:underline t))))
- (gnus-emphasis-underline-bold ((t (:bold t :underline t :weight bold))))
- (gnus-emphasis-underline-bold-italic ((t (:italic t :bold t :underline t :slant italic :weight bold))))
- (gnus-emphasis-underline-italic ((t (:italic t :underline t :slant italic))))
- (gnus-group-mail-1-empty-face ((t (:foreground "DeepPink3"))))
- (gnus-group-mail-1-face ((t (:bold t :foreground "DeepPink3" :weight bold))))
- (gnus-group-mail-2-empty-face ((t (:foreground "HotPink3"))))
- (gnus-group-mail-2-face ((t (:bold t :foreground "HotPink3" :weight bold))))
- (gnus-group-mail-3-empty-face ((t (:foreground "magenta4"))))
- (gnus-group-mail-3-face ((t (:bold t :foreground "magenta4" :weight bold))))
- (gnus-group-mail-low-empty-face ((t (:foreground "DeepPink4"))))
- (gnus-group-mail-low-face ((t (:bold t :foreground "DeepPink4" :weight bold))))
- (gnus-group-news-1-empty-face ((t (:foreground "red" :weight normal :height 120 :family "courier"))))
- (gnus-group-news-1-face ((t (:foreground "red" :weight normal :height 120 :family "courier"))))
- (gnus-group-news-2-empty-face ((t (:foreground "CadetBlue4"))))
- (gnus-group-news-2-face ((t (:bold t :foreground "CadetBlue4" :weight bold))))
- (gnus-group-news-3-empty-face ((t (nil))))
- (gnus-group-news-3-face ((t (:bold t :weight bold))))
- (gnus-group-news-4-empty-face ((t (nil))))
- (gnus-group-news-4-face ((t (:bold t :weight bold))))
- (gnus-group-news-5-empty-face ((t (nil))))
- (gnus-group-news-5-face ((t (:bold t :weight bold))))
- (gnus-group-news-6-empty-face ((t (nil))))
- (gnus-group-news-6-face ((t (:bold t :weight bold))))
- (gnus-group-news-low-empty-face ((t (:foreground "DarkGreen"))))
- (gnus-group-news-low-face ((t (:bold t :foreground "DarkGreen" :weight bold))))
- (gnus-header-content-face ((t (:foreground "goldenrod" :slant normal :family "helvetica"))))
- (gnus-header-from-face ((t (:bold t :foreground "grey75" :weight bold :height 140 :family "helvetica"))))
- (gnus-header-name-face ((t (:foreground "grey75" :height 120 :family "helvetica"))))
- (gnus-header-newsgroups-face ((t (:italic t :foreground "MidnightBlue" :slant italic))))
- (gnus-header-subject-face ((t (:bold t :foreground "firebrick" :weight bold :height 160 :family "helvetica"))))
- (gnus-picon-face ((t (:background "white" :foreground "black"))))
- (gnus-picon-xbm-face ((t (:background "white" :foreground "black"))))
- (gnus-signature-face ((t (:italic t :slant italic))))
- (gnus-splash-face ((t (:foreground "Brown"))))
- (gnus-summary-cancelled-face ((t (:background "black" :foreground "yellow"))))
- (gnus-summary-high-ancient-face ((t (:bold t :foreground "RoyalBlue" :weight bold))))
- (gnus-summary-high-read-face ((t (:bold t :foreground "DarkGreen" :weight bold))))
- (gnus-summary-high-ticked-face ((t (:bold t :foreground "firebrick" :weight bold))))
- (gnus-summary-high-unread-face ((t (:bold t :weight bold))))
- (gnus-summary-low-ancient-face ((t (:italic t :foreground "RoyalBlue" :slant italic))))
- (gnus-summary-low-read-face ((t (:italic t :foreground "DarkGreen" :slant italic))))
- (gnus-summary-low-ticked-face ((t (:italic t :foreground "firebrick" :slant italic))))
- (gnus-summary-low-unread-face ((t (:italic t :slant italic))))
- (gnus-summary-normal-ancient-face ((t (:foreground "grey65" :height 110 :width condensed :family "neep"))))
- (gnus-summary-normal-read-face ((t (:foreground "grey75" :height 110 :width condensed :family "neep"))))
- (gnus-summary-normal-ticked-face ((t (:bold t :foreground "firebrick" :weight bold :height 110 :width condensed :family "neep"))))
- (gnus-summary-normal-unread-face ((t (:foreground "firebrick" :height 110 :width condensed :family "neep"))))
- (gnus-summary-selected-face ((t (:background "gold" :foreground "black" :box (:line-width 1 :color "yellow" :style released-button) :height 140 :width condensed :family "neep"))))
- (header-line ((t (:background "grey90" :foreground "grey20" :box nil))))
- (hi-black-b ((t (:bold t :weight bold))))
- (hi-black-hb ((t (:bold t :weight bold :height 1.67 :family "helv"))))
- (hi-blue ((t (:background "light blue"))))
- (hi-blue-b ((t (:bold t :foreground "blue" :weight bold))))
- (hi-green ((t (:background "green"))))
- (hi-green-b ((t (:bold t :foreground "green" :weight bold))))
- (hi-pink ((t (:background "pink"))))
- (hi-red-b ((t (:bold t :foreground "red" :weight bold))))
- (hi-yellow ((t (:background "yellow"))))
- (highlight ((t (:background "black" :foreground "white"))))
- (highlight-changes-delete-face ((t (:foreground "red" :underline t))))
- (highlight-changes-face ((t (:foreground "red"))))
- (highline-face ((t (:background "gray80"))))
- (holiday-face ((t (:background "pink"))))
- (idlwave-help-link-face ((t (:foreground "Blue"))))
- (idlwave-shell-bp-face ((t (:background "Pink" :foreground "Black"))))
- (info-header-node ((t (:italic t :bold t :foreground "brown" :slant italic :weight bold))))
- (info-header-xref ((t (:bold t :foreground "magenta4" :weight bold))))
- (info-menu-5 ((t (:foreground "red1"))))
- (info-menu-header ((t (:bold t :weight bold :family "helv"))))
- (info-node ((t (:italic t :bold t :foreground "brown" :slant italic :weight bold))))
- (info-xref ((t (:bold t :foreground "magenta4" :weight bold))))
- (isearch ((t (:background "magenta4" :foreground "lightskyblue1"))))
- (isearch-lazy-highlight-face ((t (:background "paleturquoise"))))
- (italic ((t (:italic t :slant italic))))
- (log-view-file-face ((t (:bold t :background "grey70" :weight bold))))
- (log-view-message-face ((t (:background "grey85"))))
- (makefile-space-face ((t (:background "hotpink"))))
- (menu ((t (nil))))
- (message-cited-text-face ((t (:foreground "red"))))
- (message-header-cc-face ((t (:foreground "grey45" :weight normal :family "helvetica"))))
- (message-header-name-face ((t (:foreground "cornflower blue"))))
- (message-header-newsgroups-face ((t (:italic t :bold t :foreground "blue4" :slant italic :weight bold))))
- (message-header-other-face ((t (:foreground "steel blue"))))
- (message-header-subject-face ((t (:bold t :foreground "navy blue" :weight bold))))
- (message-header-to-face ((t (:bold t :foreground "grey60" :weight bold :height 120 :family "helvetica"))))
- (message-header-xheader-face ((t (:foreground "blue"))))
- (message-mml-face ((t (:foreground "ForestGreen"))))
- (message-separator-face ((t (:foreground "brown"))))
- (mode-line ((t (:background "grey90" :foreground "black" :box (:line-width 1 :style none) :width condensed :family "neep"))))
- (modeline-buffer-id ((t (:bold t :background "grey75" :foreground "black" :box (:line-width -1 :style released-button) :weight bold))))
- (modeline-mousable ((t (:background "grey75" :foreground "black" :box (:line-width -1 :style released-button)))))
- (modeline-mousable-minor-mode ((t (:background "grey75" :foreground "black" :box (:line-width -1 :style released-button)))))
- (mouse ((t (:background "black"))))
- (mpg123-face-cur ((t (:background "#004080" :foreground "yellow"))))
- (mpg123-face-slider ((t (:background "yellow" :foreground "black"))))
- (primary-selection ((t (:background "lightgoldenrod2"))))
- (reb-match-0 ((t (:background "lightblue"))))
- (reb-match-1 ((t (:background "aquamarine"))))
- (reb-match-2 ((t (:background "springgreen"))))
- (reb-match-3 ((t (:background "yellow"))))
- (region ((t (:background "#aa0000" :foreground "white"))))
- (scroll-bar ((t (:background "grey75"))))
- (secondary-selection ((t (:background "yellow"))))
- (sgml-comment-face ((t (:italic t :foreground "SeaGreen" :slant italic))))
- (sgml-doctype-face ((t (:bold t :foreground "FireBrick" :weight bold))))
- (sgml-end-tag-face ((t (:stipple nil :background "white" :foreground "SlateBlue" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :height 116 :width normal :family "monotype-courier new"))))
- (sgml-entity-face ((t (:stipple nil :background "SlateBlue" :foreground "Red" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :height 116 :width normal :family "monotype-courier new"))))
- (sgml-ignored-face ((t (nil))))
- (sgml-ms-end-face ((t (nil))))
- (sgml-ms-start-face ((t (nil))))
- (sgml-pi-face ((t (:bold t :foreground "gray40" :weight bold))))
- (sgml-sgml-face ((t (:bold t :foreground "gray40" :weight bold))))
- (sgml-short-ref-face ((t (nil))))
- (sgml-shortref-face ((t (:bold t :foreground "gray40" :weight bold))))
- (sgml-start-tag-face ((t (:stipple nil :background "white" :foreground "SlateBlue" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :height 116 :width normal :family "monotype-courier new"))))
- (sh-heredoc-face ((t (:foreground "tan"))))
- (show-paren-match-face ((t (:background "gray80" :foreground "black"))))
- (show-paren-mismatch-face ((t (:background "red" :foreground "yellow"))))
- (show-tabs-space-face ((t (:foreground "yellow"))))
- (show-tabs-tab-face ((t (:foreground "red"))))
- (smerge-base-face ((t (:foreground "red"))))
- (smerge-markers-face ((t (:background "grey85"))))
- (smerge-mine-face ((t (:foreground "blue"))))
- (smerge-other-face ((t (:foreground "darkgreen"))))
- (speedbar-button-face ((t (:foreground "green4"))))
- (speedbar-directory-face ((t (:foreground "blue4"))))
- (speedbar-file-face ((t (:foreground "cyan4"))))
- (speedbar-highlight-face ((t (:background "green"))))
- (speedbar-selected-face ((t (:foreground "red" :underline t))))
- (speedbar-tag-face ((t (:foreground "brown"))))
- (strokes-char-face ((t (:background "lightgray"))))
- (term-black ((t (:stipple nil :background "white" :foreground "black" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :width normal :family "adobe-courier"))))
- (term-blackbg ((t (:stipple nil :background "black" :foreground "black" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :width normal :family "adobe-courier"))))
- (term-blue ((t (:stipple nil :background "white" :foreground "blue" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :width normal :family "adobe-courier"))))
- (term-bluebg ((t (:stipple nil :background "blue" :foreground "black" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :width normal :family "adobe-courier"))))
- (term-bold ((t (:bold t :stipple nil :background "white" :foreground "black" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight bold :width normal :family "adobe-courier"))))
- (term-cyan ((t (:stipple nil :background "white" :foreground "cyan" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :width normal :family "adobe-courier"))))
- (term-cyanbg ((t (:stipple nil :background "cyan" :foreground "black" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :width normal :family "adobe-courier"))))
- (term-default ((t (:stipple nil :background "white" :foreground "black" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :width normal :family "adobe-courier"))))
- (term-default-bg ((t (:stipple nil :foreground "black" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :width normal :family "adobe-courier"))))
- (term-default-bg-inv ((t (:stipple nil :foreground "black" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :width normal :family "adobe-courier"))))
- (term-default-fg ((t (:stipple nil :background "white" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :width normal :family "adobe-courier"))))
- (term-default-fg-inv ((t (:stipple nil :background "white" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :width normal :family "adobe-courier"))))
- (term-green ((t (:stipple nil :background "white" :foreground "green" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :width normal :family "adobe-courier"))))
- (term-greenbg ((t (:stipple nil :background "green" :foreground "black" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :width normal :family "adobe-courier"))))
- (term-invisible ((t (:stipple nil :foreground "black" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :width normal :family "adobe-courier"))))
- (term-invisible-inv ((t (:stipple nil :foreground "black" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :width normal :family "adobe-courier"))))
- (term-magenta ((t (:stipple nil :background "white" :foreground "magenta" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :width normal :family "adobe-courier"))))
- (term-magentabg ((t (:stipple nil :background "magenta" :foreground "black" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :width normal :family "adobe-courier"))))
- (term-red ((t (:stipple nil :background "white" :foreground "red" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :width normal :family "adobe-courier"))))
- (term-redbg ((t (:stipple nil :background "red" :foreground "black" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :width normal :family "adobe-courier"))))
- (term-underline ((t (:stipple nil :background "white" :foreground "black" :inverse-video nil :box nil :strike-through nil :overline nil :underline t :slant normal :weight normal :width normal :family "adobe-courier"))))
- (term-white ((t (:stipple nil :background "white" :foreground "white" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :width normal :family "adobe-courier"))))
- (term-whitebg ((t (:stipple nil :background "white" :foreground "black" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :width normal :family "adobe-courier"))))
- (term-yellow ((t (:stipple nil :background "white" :foreground "yellow" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :width normal :family "adobe-courier"))))
- (term-yellowbg ((t (:stipple nil :background "yellow" :foreground "black" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :width normal :family "adobe-courier"))))
- (tex-math-face ((t (:foreground "RosyBrown"))))
- (texinfo-heading-face ((t (:foreground "Blue"))))
- (tool-bar ((t (:background "grey75" :foreground "black" :box (:line-width 1 :style released-button)))))
- (tooltip ((t (:background "lightyellow" :foreground "black"))))
- (trailing-whitespace ((t (:background "red"))))
- (underline ((t (:foreground "navy" :underline t))))
- (variable-pitch ((t (:family "helv"))))
- (vcursor ((t (:background "cyan" :foreground "blue" :underline t))))
- (vhdl-font-lock-attribute-face ((t (:foreground "Orchid"))))
- (vhdl-font-lock-directive-face ((t (:foreground "CadetBlue"))))
- (vhdl-font-lock-enumvalue-face ((t (:foreground "Gold4"))))
- (vhdl-font-lock-function-face ((t (:foreground "Orchid4"))))
- (vhdl-font-lock-prompt-face ((t (:bold t :foreground "Red" :weight bold))))
- (vhdl-font-lock-reserved-words-face ((t (:bold t :foreground "Orange" :weight bold))))
- (vhdl-font-lock-translate-off-face ((t (:background "LightGray"))))
- (vhdl-speedbar-architecture-face ((t (:foreground "Blue"))))
- (vhdl-speedbar-architecture-selected-face ((t (:foreground "Blue" :underline t))))
- (vhdl-speedbar-configuration-face ((t (:foreground "DarkGoldenrod"))))
- (vhdl-speedbar-configuration-selected-face ((t (:foreground "DarkGoldenrod" :underline t))))
- (vhdl-speedbar-entity-face ((t (:foreground "ForestGreen"))))
- (vhdl-speedbar-entity-selected-face ((t (:foreground "ForestGreen" :underline t))))
- (vhdl-speedbar-instantiation-face ((t (:foreground "Brown"))))
- (vhdl-speedbar-instantiation-selected-face ((t (:foreground "Brown" :underline t))))
- (vhdl-speedbar-package-face ((t (:foreground "Grey50"))))
- (vhdl-speedbar-package-selected-face ((t (:foreground "Grey50" :underline t))))
- (viper-minibuffer-emacs-face ((t (:background "darkseagreen2" :foreground "Black"))))
- (viper-minibuffer-insert-face ((t (:background "pink" :foreground "Black"))))
- (viper-minibuffer-vi-face ((t (:background "grey" :foreground "DarkGreen"))))
- (viper-replace-overlay-face ((t (:background "darkseagreen2" :foreground "Black"))))
- (viper-search-face ((t (:background "khaki" :foreground "Black"))))
- (widget-button-face ((t (:bold t :weight bold))))
- (widget-button-pressed-face ((t (:foreground "red"))))
- (widget-documentation-face ((t (:foreground "dark green"))))
- (widget-field-face ((t (:background "gray85"))))
- (widget-inactive-face ((t (:foreground "dim gray"))))
- (widget-single-line-field-face ((t (:background "gray85"))))
- (woman-addition-face ((t (:foreground "orange"))))
- (woman-bold-face ((t (:bold t :foreground "blue" :weight bold))))
- (woman-italic-face ((t (:italic t :foreground "red" :underline t :slant italic))))
- (woman-unknown-face ((t (:foreground "brown"))))
- (zmacs-region ((t (:background "lightgoldenrod2")))))))
-
- (defun color-theme-bharadwaj-slate ()
- "Color theme by Girish Bharadwaj, created 2002-05-06."
- (interactive)
- (color-theme-install
- '(color-theme-bharadwaj-slate
- ((background-color . "DarkSlateGray")
- (background-mode . dark)
- (border-color . "black")
- (cursor-color . "khaki")
- (foreground-color . "palegreen")
- (mouse-color . "black"))
- ((display-time-mail-face . mode-line)
- (gnus-article-button-face . bold)
- (gnus-article-mouse-face . highlight)
- (gnus-mouse-face . highlight)
- (help-highlight-face . underline)
- (ibuffer-deletion-face . font-lock-type-face)
- (ibuffer-filter-group-name-face . bold)
- (ibuffer-marked-face . font-lock-warning-face)
- (ibuffer-title-face . font-lock-type-face)
- (list-matching-lines-buffer-name-face . underline)
- (list-matching-lines-face . bold)
- (semantic-which-function-use-color . t)
- (senator-eldoc-use-color . t)
- (view-highlight-face . highlight)
- (widget-mouse-face . highlight))
- (default ((t (:stipple nil :background "DarkSlateGray" :foreground "palegreen" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :width normal :family "outline-lucida sans typewriter"))))
- (bg:erc-color-face0 ((t (:background "White"))))
- (bg:erc-color-face1 ((t (:background "black"))))
- (bg:erc-color-face10 ((t (:background "lightblue1"))))
- (bg:erc-color-face11 ((t (:background "cyan"))))
- (bg:erc-color-face12 ((t (:background "blue"))))
- (bg:erc-color-face13 ((t (:background "deeppink"))))
- (bg:erc-color-face14 ((t (:background "gray50"))))
- (bg:erc-color-face15 ((t (:background "gray90"))))
- (bg:erc-color-face2 ((t (:background "blue4"))))
- (bg:erc-color-face3 ((t (:background "green4"))))
- (bg:erc-color-face4 ((t (:background "red"))))
- (bg:erc-color-face5 ((t (:background "brown"))))
- (bg:erc-color-face6 ((t (:background "purple"))))
- (bg:erc-color-face7 ((t (:background "orange"))))
- (bg:erc-color-face8 ((t (:background "yellow"))))
- (bg:erc-color-face9 ((t (:background "green"))))
- (bold ((t (:bold t :weight bold))))
- (bold-italic ((t (:italic t :bold t :slant italic :weight bold))))
- (border ((t (:background "black"))))
- (button ((t (:underline t))))
- (comint-highlight-input ((t (:bold t :weight bold))))
- (comint-highlight-prompt ((t (:foreground "cyan"))))
- (cursor ((t (:background "khaki"))))
- (custom-button-face ((t (:background "lightgrey" :foreground "black" :box (:line-width 2 :style released-button)))))
- (custom-button-pressed-face ((t (:background "lightgrey" :foreground "black" :box (:line-width 2 :style pressed-button)))))
- (custom-changed-face ((t (:background "blue" :foreground "white"))))
- (custom-comment-face ((t (:background "dim gray"))))
- (custom-comment-tag-face ((t (:foreground "gray80"))))
- (custom-documentation-face ((t (nil))))
- (custom-face-tag-face ((t (:bold t :family "helv" :weight bold :height 1.2))))
- (custom-group-tag-face ((t (:bold t :foreground "light blue" :weight bold :height 1.2))))
- (custom-group-tag-face-1 ((t (:bold t :family "helv" :foreground "pink" :weight bold :height 1.2))))
- (custom-invalid-face ((t (:background "red" :foreground "yellow"))))
- (custom-modified-face ((t (:background "blue" :foreground "white"))))
- (custom-rogue-face ((t (:background "black" :foreground "pink"))))
- (custom-saved-face ((t (:underline t))))
- (custom-set-face ((t (:background "white" :foreground "blue"))))
- (custom-state-face ((t (:foreground "lime green"))))
- (custom-variable-button-face ((t (:bold t :underline t :weight bold))))
- (custom-variable-tag-face ((t (:bold t :family "helv" :foreground "light blue" :weight bold :height 1.2))))
- (erc-action-face ((t (:bold t :box (:line-width 2 :color "grey75") :weight bold))))
- (erc-bold-face ((t (:bold t :weight bold))))
- (erc-default-face ((t (nil))))
- (erc-direct-msg-face ((t (:foreground "IndianRed"))))
- (erc-error-face ((t (:background "Red" :foreground "White"))))
- (erc-input-face ((t (:foreground "lightblue"))))
- (erc-inverse-face ((t (:background "Black" :foreground "White"))))
- (erc-notice-face ((t (:bold t :foreground "dodgerblue" :weight bold))))
- (erc-prompt-face ((t (:bold t :background "black" :foreground "white" :weight bold))))
- (erc-timestamp-face ((t (:bold t :foreground "green" :weight bold))))
- (erc-underline-face ((t (:underline t))))
- (eshell-ls-archive-face ((t (:bold t :foreground "Orchid" :weight bold))))
- (eshell-ls-backup-face ((t (:foreground "LightSalmon"))))
- (eshell-ls-clutter-face ((t (:bold t :foreground "OrangeRed" :weight bold))))
- (eshell-ls-directory-face ((t (:bold t :foreground "SkyBlue" :weight bold))))
- (eshell-ls-executable-face ((t (:bold t :foreground "Green" :weight bold))))
- (eshell-ls-missing-face ((t (:bold t :foreground "Red" :weight bold))))
- (eshell-ls-product-face ((t (:foreground "LightSalmon"))))
- (eshell-ls-readonly-face ((t (:foreground "Pink"))))
- (eshell-ls-special-face ((t (:bold t :foreground "Magenta" :weight bold))))
- (eshell-ls-symlink-face ((t (:bold t :foreground "Cyan" :weight bold))))
- (eshell-ls-unreadable-face ((t (:foreground "DarkGrey"))))
- (eshell-prompt-face ((t (:bold t :foreground "Pink" :weight bold))))
- (fg:erc-color-face0 ((t (:foreground "White"))))
- (fg:erc-color-face1 ((t (:foreground "black"))))
- (fg:erc-color-face10 ((t (:foreground "lightblue1"))))
- (fg:erc-color-face11 ((t (:foreground "cyan"))))
- (fg:erc-color-face12 ((t (:foreground "blue"))))
- (fg:erc-color-face13 ((t (:foreground "deeppink"))))
- (fg:erc-color-face14 ((t (:foreground "gray50"))))
- (fg:erc-color-face15 ((t (:foreground "gray90"))))
- (fg:erc-color-face2 ((t (:foreground "blue4"))))
- (fg:erc-color-face3 ((t (:foreground "green4"))))
- (fg:erc-color-face4 ((t (:foreground "red"))))
- (fg:erc-color-face5 ((t (:foreground "brown"))))
- (fg:erc-color-face6 ((t (:foreground "purple"))))
- (fg:erc-color-face7 ((t (:foreground "orange"))))
- (fg:erc-color-face8 ((t (:foreground "yellow"))))
- (fg:erc-color-face9 ((t (:foreground "green"))))
- (fixed-pitch ((t (:family "courier"))))
- (font-lock-builtin-face ((t (:bold t :foreground "pink" :weight bold :height 1.1))))
- (font-lock-comment-face ((t (:foreground "violet" :height 1.0))))
- (font-lock-constant-face ((t (:bold t :foreground "tomato" :weight bold :height 1.0))))
- (font-lock-function-name-face ((t (:bold t :foreground "DodgerBlue" :weight bold))))
- (font-lock-keyword-face ((t (:bold t :foreground "turquoise" :weight bold))))
- (font-lock-preprocessor-face ((t (:bold t :foreground "tomato" :weight bold :height 1.0))))
- (font-lock-reference-face ((t (:bold t :foreground "pink" :weight bold :height 1.1))))
- (font-lock-string-face ((t (:foreground "red" :height 1.0))))
- (font-lock-type-face ((t (:foreground "lightblue3"))))
- (font-lock-variable-name-face ((t (:bold t :foreground "gray" :weight bold :height 1.0))))
- (font-lock-warning-face ((t (:bold t :foreground "Pink" :weight bold))))
- (fringe ((t (:background "DarkSlateGray"))))
- (gnus-cite-attribution-face ((t (:italic t :slant italic))))
- (gnus-cite-face-1 ((t (:foreground "light blue"))))
- (gnus-cite-face-10 ((t (:foreground "medium purple"))))
- (gnus-cite-face-11 ((t (:foreground "turquoise"))))
- (gnus-cite-face-2 ((t (:foreground "light cyan"))))
- (gnus-cite-face-3 ((t (:foreground "light yellow"))))
- (gnus-cite-face-4 ((t (:foreground "light pink"))))
- (gnus-cite-face-5 ((t (:foreground "pale green"))))
- (gnus-cite-face-6 ((t (:foreground "beige"))))
- (gnus-cite-face-7 ((t (:foreground "orange"))))
- (gnus-cite-face-8 ((t (:foreground "magenta"))))
- (gnus-cite-face-9 ((t (:foreground "violet"))))
- (gnus-emphasis-bold ((t (:bold t :weight bold))))
- (gnus-emphasis-bold-italic ((t (:italic t :bold t :slant italic :weight bold))))
- (gnus-emphasis-highlight-words ((t (:background "black" :foreground "yellow"))))
- (gnus-emphasis-italic ((t (:italic t :slant italic))))
- (gnus-emphasis-underline ((t (:underline t))))
- (gnus-emphasis-underline-bold ((t (:bold t :underline t :weight bold))))
- (gnus-emphasis-underline-bold-italic ((t (:italic t :bold t :underline t :slant italic :weight bold))))
- (gnus-emphasis-underline-italic ((t (:italic t :underline t :slant italic))))
- (gnus-group-mail-1-empty-face ((t (:foreground "aquamarine1"))))
- (gnus-group-mail-1-face ((t (:bold t :foreground "aquamarine1" :weight bold))))
- (gnus-group-mail-2-empty-face ((t (:foreground "aquamarine2"))))
- (gnus-group-mail-2-face ((t (:bold t :foreground "aquamarine2" :weight bold))))
- (gnus-group-mail-3-empty-face ((t (:foreground "aquamarine3"))))
- (gnus-group-mail-3-face ((t (:bold t :foreground "aquamarine3" :weight bold))))
- (gnus-group-mail-low-empty-face ((t (:foreground "aquamarine4"))))
- (gnus-group-mail-low-face ((t (:bold t :foreground "aquamarine4" :weight bold))))
- (gnus-group-news-1-empty-face ((t (:foreground "PaleTurquoise"))))
- (gnus-group-news-1-face ((t (:bold t :foreground "PaleTurquoise" :weight bold))))
- (gnus-group-news-2-empty-face ((t (:foreground "turquoise"))))
- (gnus-group-news-2-face ((t (:bold t :foreground "turquoise" :weight bold))))
- (gnus-group-news-3-empty-face ((t (nil))))
- (gnus-group-news-3-face ((t (:bold t :weight bold))))
- (gnus-group-news-4-empty-face ((t (nil))))
- (gnus-group-news-4-face ((t (:bold t :weight bold))))
- (gnus-group-news-5-empty-face ((t (nil))))
- (gnus-group-news-5-face ((t (:bold t :weight bold))))
- (gnus-group-news-6-empty-face ((t (nil))))
- (gnus-group-news-6-face ((t (:bold t :weight bold))))
- (gnus-group-news-low-empty-face ((t (:foreground "DarkTurquoise"))))
- (gnus-group-news-low-face ((t (:bold t :foreground "DarkTurquoise" :weight bold))))
- (gnus-header-content-face ((t (:italic t :foreground "forest green" :slant italic))))
- (gnus-header-from-face ((t (:foreground "spring green"))))
- (gnus-header-name-face ((t (:foreground "SeaGreen"))))
- (gnus-header-newsgroups-face ((t (:italic t :foreground "yellow" :slant italic))))
- (gnus-header-subject-face ((t (:foreground "SeaGreen3"))))
- (gnus-signature-face ((t (:italic t :slant italic))))
- (gnus-splash-face ((t (:foreground "Brown"))))
- (gnus-summary-cancelled-face ((t (:background "black" :foreground "yellow"))))
- (gnus-summary-high-ancient-face ((t (:bold t :foreground "SkyBlue" :weight bold))))
- (gnus-summary-high-read-face ((t (:bold t :foreground "PaleGreen" :weight bold))))
- (gnus-summary-high-ticked-face ((t (:bold t :foreground "pink" :weight bold))))
- (gnus-summary-high-unread-face ((t (:bold t :weight bold))))
- (gnus-summary-low-ancient-face ((t (:italic t :foreground "SkyBlue" :slant italic))))
- (gnus-summary-low-read-face ((t (:italic t :foreground "PaleGreen" :slant italic))))
- (gnus-summary-low-ticked-face ((t (:italic t :foreground "pink" :slant italic))))
- (gnus-summary-low-unread-face ((t (:italic t :slant italic))))
- (gnus-summary-normal-ancient-face ((t (:foreground "SkyBlue"))))
- (gnus-summary-normal-read-face ((t (:foreground "PaleGreen"))))
- (gnus-summary-normal-ticked-face ((t (:foreground "pink"))))
- (gnus-summary-normal-unread-face ((t (nil))))
- (gnus-summary-selected-face ((t (:underline t))))
- (header-line ((t (:underline "blueviolet" :overline "blueviolet" :box (:line-width -1 :style released-button) :background "grey20" :foreground "grey90" :box nil))))
- (highlight ((t (:background "darkolivegreen"))))
- (html-helper-bold-face ((t (:bold t :foreground "wheat" :weight bold))))
- (html-helper-italic-face ((t (:italic t :foreground "spring green" :slant italic))))
- (html-helper-underline-face ((t (:foreground "cornsilk" :underline t))))
- (html-tag-face ((t (:bold t :foreground "deep sky blue" :weight bold))))
- (info-menu-6 ((t (nil))))
- (isearch ((t (:background "palevioletred2" :foreground "brown4"))))
- (isearch-lazy-highlight-face ((t (:background "paleturquoise4"))))
- (italic ((t (:italic t :slant italic))))
- (jde-bug-breakpoint-cursor ((t (:background "brown" :foreground "cyan"))))
- (jde-db-active-breakpoint-face ((t (:background "red" :foreground "black"))))
- (jde-db-requested-breakpoint-face ((t (:background "yellow" :foreground "black"))))
- (jde-db-spec-breakpoint-face ((t (:background "green" :foreground "black"))))
- (jde-java-font-lock-api-face ((t (:foreground "light goldenrod"))))
- (jde-java-font-lock-bold-face ((t (:bold t :weight bold))))
- (jde-java-font-lock-code-face ((t (nil))))
- (jde-java-font-lock-constant-face ((t (:foreground "Aquamarine"))))
- (jde-java-font-lock-doc-tag-face ((t (:foreground "light coral"))))
- (jde-java-font-lock-italic-face ((t (:italic t :slant italic))))
- (jde-java-font-lock-link-face ((t (:foreground "blue" :underline t :slant normal))))
- (jde-java-font-lock-modifier-face ((t (:foreground "LightSteelBlue"))))
- (jde-java-font-lock-number-face ((t (:foreground "LightSalmon"))))
- (jde-java-font-lock-operator-face ((t (:foreground "medium blue"))))
- (jde-java-font-lock-package-face ((t (:foreground "steelblue1"))))
- (jde-java-font-lock-pre-face ((t (nil))))
- (jde-java-font-lock-underline-face ((t (:underline t))))
- (menu ((t (nil))))
- (message-cited-text-face ((t (:foreground "red"))))
- (message-header-cc-face ((t (:bold t :foreground "green4" :weight bold))))
- (message-header-name-face ((t (:foreground "DarkGreen"))))
- (message-header-newsgroups-face ((t (:italic t :bold t :foreground "yellow" :slant italic :weight bold))))
- (message-header-other-face ((t (:foreground "#b00000"))))
- (message-header-subject-face ((t (:foreground "green3"))))
- (message-header-to-face ((t (:bold t :foreground "green2" :weight bold))))
- (message-header-xheader-face ((t (:foreground "blue"))))
- (message-mml-face ((t (:foreground "ForestGreen"))))
- (message-separator-face ((t (:foreground "blue3"))))
- (minibuffer-prompt ((t (:foreground "cyan"))))
- (mode-line ((t (:background "Darkslategray" :foreground "white" :box (:line-width -1 :style released-button) :overline "blueviolet" :underline "blueviolet"))))
- (mode-line-inactive ((t (:italic t :underline "blueviolet" :overline "blueviolet" :background "white" :foreground "cadetblue" :box (:line-width -1 :color "grey75") :slant oblique :weight light))))
- (modeline ((t (:background "Darkslategray" :foreground "white" :box (:line-width -1 :style released-button) :overline "blueviolet" :underline "blueviolet"))))
- (modeline-buffer-id ((t (:background "Darkslategray" :foreground "white" :box (:line-width -1 :style released-button) :overline "blueviolet" :underline "blueviolet"))))
- (modeline-mousable ((t (:background "Darkslategray" :foreground "white" :box (:line-width -1 :style released-button) :overline "blueviolet" :underline "blueviolet"))))
- (modeline-mousable-minor-mode ((t (:background "Darkslategray" :foreground "white" :box (:line-width -1 :style released-button) :overline "blueviolet" :underline "blueviolet"))))
- (mouse ((t (:background "black"))))
- (primary-selection ((t (:background "dimgray"))))
- (region ((t (:background "dimgray"))))
- (scroll-bar ((t (nil))))
- (secondary-selection ((t (:background "SkyBlue4"))))
- (semantic-dirty-token-face ((t (:background "lightyellow"))))
- (semantic-unmatched-syntax-face ((t (:underline "red"))))
- (senator-intangible-face ((t (:foreground "gray75"))))
- (senator-momentary-highlight-face ((t (:background "gray30"))))
- (senator-read-only-face ((t (:background "#664444"))))
- (show-paren-match-face ((t (:bold t :foreground "lightblue" :weight bold :height 1.1))))
- (show-paren-mismatch-face ((t (:bold t :foreground "red" :weight bold :height 1.1))))
- (show-tabs-space-face ((t (:foreground "yellow"))))
- (show-tabs-tab-face ((t (:foreground "red"))))
- (speedbar-button-face ((t (:foreground "green3"))))
- (speedbar-directory-face ((t (:foreground "light blue"))))
- (speedbar-file-face ((t (:foreground "cyan"))))
- (speedbar-highlight-face ((t (:background "sea green"))))
- (speedbar-selected-face ((t (:foreground "red" :underline t))))
- (speedbar-tag-face ((t (:foreground "yellow"))))
- (template-message-face ((t (:bold t :weight bold))))
- (term-black ((t (:foreground "black"))))
- (term-blackbg ((t (:background "black"))))
- (term-blue ((t (:foreground "blue"))))
- (term-bluebg ((t (:background "blue"))))
- (term-bold ((t (:bold t :weight bold))))
- (term-cyan ((t (:foreground "cyan"))))
- (term-cyanbg ((t (:background "cyan"))))
- (term-default ((t (:stipple nil :background "DarkSlateGray" :foreground "palegreen" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :width normal :family "outline-lucida sans typewriter"))))
- (term-default-bg ((t (nil))))
- (term-default-bg-inv ((t (nil))))
- (term-default-fg ((t (nil))))
- (term-default-fg-inv ((t (nil))))
- (term-green ((t (:foreground "green"))))
- (term-greenbg ((t (:background "green"))))
- (term-invisible ((t (nil))))
- (term-invisible-inv ((t (nil))))
- (term-magenta ((t (:foreground "magenta"))))
- (term-magentabg ((t (:background "magenta"))))
- (term-red ((t (:foreground "red"))))
- (term-redbg ((t (:background "red"))))
- (term-underline ((t (:underline t))))
- (term-white ((t (:foreground "white"))))
- (term-whitebg ((t (:background "white"))))
- (term-yellow ((t (:foreground "yellow"))))
- (term-yellowbg ((t (:background "yellow"))))
- (tool-bar ((t (:background "DarkSlateGray" :foreground "White" :box (:line-width 1 :color "blue")))))
- (tooltip ((t (:background "lightyellow" :foreground "black"))))
- (trailing-whitespace ((t (:background "red"))))
- (underline ((t (:underline t))))
- (variable-pitch ((t (:family "helv"))))
- (widget-button-face ((t (:bold t :weight bold))))
- (widget-button-pressed-face ((t (:foreground "red"))))
- (widget-documentation-face ((t (:foreground "lime green"))))
- (widget-field-face ((t (:background "dim gray"))))
- (widget-inactive-face ((t (:foreground "light gray"))))
- (widget-single-line-field-face ((t (:background "dim gray"))))
- (zmacs-region ((t (:background "dimgray")))))))
-
- (defun color-theme-lethe ()
- "Color theme by Ivica Loncar, created 2002-08-02.
- Some additional X resources as suggested by the author:
-
- Emacs*menubar.Foreground: Yellow
- Emacs*menubar.Background: #1a2b3c
- Emacs*menubar.topShadowColor: gray
- Emacs*menubar.bottomShadowColor: dimgray
-
- Some fonts I really like (note: this fonts are not highly
- available):
-
- Emacs.default.attributeFont: -letl-*-medium-r-*-*-*-*-*-*-*-*-iso8859-2
- Emacs*menubar*Font: -etl-fixed-medium-r-normal--14-*-*-*-*-*-iso8859-1
-
- Mouse fix:
-
- Emacs*dialog*XmPushButton.translations:#override\n\
- <Btn1Down>: Arm()\n\
- <Btn1Down>,<Btn1Up>: Activate()\
- Disarm()\n\
- <Btn1Down>(2+): MultiArm()\n\
- <Btn1Up>(2+): MultiActivate()\n\
- <Btn1Up>: Activate()\
- Disarm()\n\
- <Key>osfSelect: ArmAndActivate()\n\
- <Key>osfActivate: ArmAndActivate()\n\
- <Key>osfHelp: Help()\n\
- ~Shift ~Meta ~Alt <Key>Return: ArmAndActivate()\n\
- <EnterWindow>: Enter()\n\
- <LeaveWindow>: Leave()\n
-
- Bonus: do not use 3D modeline."
- (interactive)
- (color-theme-install
- '(color-theme-lethe
- ((background-color . "black")
- (background-mode . dark)
- (background-toolbar-color . "#000000000000")
- (border-color . "#000000000000")
- (bottom-toolbar-shadow-color . "red")
- (cursor-color . "red")
- (foreground-color . "peachpuff")
- (mouse-color . "red")
- (top-toolbar-shadow-color . "#f5f5f5f5f5f5"))
- ((buffers-tab-face . buffers-tab)
- (cscope-use-face . t)
- (gnus-mouse-face . highlight))
- (default ((t (nil))))
- (bg:erc-color-face0 ((t (:background "White"))))
- (bg:erc-color-face1 ((t (nil))))
- (bg:erc-color-face10 ((t (:background "lightblue1"))))
- (bg:erc-color-face11 ((t (:background "cyan"))))
- (bg:erc-color-face12 ((t (:background "blue"))))
- (bg:erc-color-face13 ((t (:background "deeppink"))))
- (bg:erc-color-face14 ((t (:background "gray50"))))
- (bg:erc-color-face15 ((t (:background "gray90"))))
- (bg:erc-color-face2 ((t (:background "blue4"))))
- (bg:erc-color-face3 ((t (:background "green4"))))
- (bg:erc-color-face4 ((t (:background "red"))))
- (bg:erc-color-face5 ((t (:background "brown"))))
- (bg:erc-color-face6 ((t (:background "purple"))))
- (bg:erc-color-face7 ((t (:background "orange"))))
- (bg:erc-color-face8 ((t (:background "yellow"))))
- (bg:erc-color-face9 ((t (:background "green"))))
- (blue ((t (:foreground "blue"))))
- (bold ((t (:bold t))))
- (bold-italic ((t (:italic t :bold t))))
- (border ((t (nil))))
- (border-glyph ((t (nil))))
- (buffers-tab ((t (:bold t :foreground "red"))))
- (button ((t (:underline t))))
- (calendar-today-face ((t (:underline t))))
- (comint-highlight-input ((t (:bold t))))
- (comint-highlight-prompt ((t (:foreground "cyan"))))
- (cperl-array-face ((t (:bold t :background "lightyellow2" :foreground "Blue"))))
- (cperl-hash-face ((t (:italic t :bold t :background "lightyellow2" :foreground "Red"))))
- (cperl-nonoverridable-face ((t (:foreground "chartreuse3"))))
- (cscope-file-face ((t (:foreground "blue"))))
- (cscope-function-face ((t (:foreground "magenta"))))
- (cscope-line-face ((t (:foreground "green"))))
- (cscope-line-number-face ((t (:foreground "red"))))
- (cscope-mouse-face ((t (:background "blue" :foreground "white"))))
- (cursor ((t (nil))))
- (custom-button-face ((t (nil))))
- (custom-button-pressed-face ((t (:background "lightgrey" :foreground "black"))))
- (custom-changed-face ((t (:background "blue" :foreground "white"))))
- (custom-comment-face ((t (:background "dim gray"))))
- (custom-comment-tag-face ((t (:foreground "gray80"))))
- (custom-documentation-face ((t (nil))))
- (custom-face-tag-face ((t (:underline t))))
- (custom-group-tag-face ((t (:underline t :foreground "blue"))))
- (custom-group-tag-face-1 ((t (:underline t :foreground "red"))))
- (custom-invalid-face ((t (:background "red" :foreground "yellow"))))
- (custom-modified-face ((t (:background "blue" :foreground "white"))))
- (custom-rogue-face ((t (:foreground "pink"))))
- (custom-saved-face ((t (:underline t))))
- (custom-set-face ((t (:background "white" :foreground "blue"))))
- (custom-state-face ((t (:foreground "dark green"))))
- (custom-variable-button-face ((t (:underline t :bold t))))
- (custom-variable-tag-face ((t (:underline t :foreground "blue"))))
- (cyan ((t (:foreground "cyan"))))
- (diary-face ((t (:foreground "red"))))
- (dired-face-boring ((t (:foreground "Gray65"))))
- (dired-face-directory ((t (:bold t))))
- (dired-face-executable ((t (:foreground "SeaGreen"))))
- (dired-face-flagged ((t (:background "LightSlateGray"))))
- (dired-face-marked ((t (:background "PaleVioletRed"))))
- (dired-face-permissions ((t (:background "grey75" :foreground "black"))))
- (dired-face-setuid ((t (:foreground "Red"))))
- (dired-face-socket ((t (:foreground "magenta"))))
- (dired-face-symlink ((t (:foreground "cyan"))))
- (display-time-mail-balloon-enhance-face ((t (:background "orange"))))
- (display-time-mail-balloon-gnus-group-face ((t (:foreground "blue"))))
- (display-time-time-balloon-face ((t (:foreground "red"))))
- (ediff-current-diff-face-A ((t (:background "pale green" :foreground "firebrick"))))
- (ediff-current-diff-face-Ancestor ((t (:background "VioletRed" :foreground "Black"))))
- (ediff-current-diff-face-B ((t (:background "Yellow" :foreground "DarkOrchid"))))
- (ediff-current-diff-face-C ((t (:background "Pink" :foreground "Navy"))))
- (ediff-even-diff-face-A ((t (:background "light grey" :foreground "Black"))))
- (ediff-even-diff-face-Ancestor ((t (:background "Grey" :foreground "White"))))
- (ediff-even-diff-face-B ((t (:background "Grey" :foreground "White"))))
- (ediff-even-diff-face-C ((t (:background "light grey" :foreground "Black"))))
- (ediff-fine-diff-face-A ((t (:background "sky blue" :foreground "Navy"))))
- (ediff-fine-diff-face-Ancestor ((t (:background "Green" :foreground "Black"))))
- (ediff-fine-diff-face-B ((t (:background "cyan" :foreground "Black"))))
- (ediff-fine-diff-face-C ((t (:background "Turquoise" :foreground "Black"))))
- (ediff-odd-diff-face-A ((t (:background "Grey" :foreground "White"))))
- (ediff-odd-diff-face-Ancestor ((t (:background "light grey" :foreground "Black"))))
- (ediff-odd-diff-face-B ((t (:background "light grey" :foreground "Black"))))
- (ediff-odd-diff-face-C ((t (:background "Grey" :foreground "White"))))
- (erc-action-face ((t (:bold t))))
- (erc-bold-face ((t (:bold t))))
- (erc-default-face ((t (nil))))
- (erc-direct-msg-face ((t (:foreground "IndianRed"))))
- (erc-error-face ((t (:background "Red" :foreground "White"))))
- (erc-input-face ((t (:foreground "brown"))))
- (erc-inverse-face ((t (:background "Black" :foreground "White"))))
- (erc-notice-face ((t (:bold t :foreground "SlateBlue"))))
- (erc-prompt-face ((t (:bold t :background "lightBlue2" :foreground "Black"))))
- (erc-timestamp-face ((t (:bold t :foreground "green"))))
- (erc-underline-face ((t (:underline t))))
- (eshell-ls-archive-face ((t (:bold t :foreground "Orchid"))))
- (eshell-ls-backup-face ((t (:foreground "OrangeRed"))))
- (eshell-ls-clutter-face ((t (:bold t :foreground "OrangeRed"))))
- (eshell-ls-directory-face ((t (:bold t :foreground "Blue"))))
- (eshell-ls-executable-face ((t (:bold t :foreground "ForestGreen"))))
- (eshell-ls-missing-face ((t (:bold t :foreground "Red"))))
- (eshell-ls-product-face ((t (:foreground "OrangeRed"))))
- (eshell-ls-readonly-face ((t (:foreground "Brown"))))
- (eshell-ls-special-face ((t (:bold t :foreground "Magenta"))))
- (eshell-ls-symlink-face ((t (:bold t :foreground "DarkCyan"))))
- (eshell-ls-unreadable-face ((t (:foreground "Grey30"))))
- (eshell-prompt-face ((t (:bold t :foreground "Red"))))
- (eshell-test-failed-face ((t (:bold t :foreground "OrangeRed"))))
- (eshell-test-ok-face ((t (:bold t :foreground "Green"))))
- (excerpt ((t (:italic t))))
- (fg:erc-color-face0 ((t (:foreground "White"))))
- (fg:erc-color-face1 ((t (:foreground "black"))))
- (fg:erc-color-face10 ((t (:foreground "lightblue1"))))
- (fg:erc-color-face11 ((t (:foreground "cyan"))))
- (fg:erc-color-face12 ((t (:foreground "blue"))))
- (fg:erc-color-face13 ((t (:foreground "deeppink"))))
- (fg:erc-color-face14 ((t (:foreground "gray50"))))
- (fg:erc-color-face15 ((t (:foreground "gray90"))))
- (fg:erc-color-face2 ((t (:foreground "blue4"))))
- (fg:erc-color-face3 ((t (:foreground "green4"))))
- (fg:erc-color-face4 ((t (:foreground "red"))))
- (fg:erc-color-face5 ((t (:foreground "brown"))))
- (fg:erc-color-face6 ((t (:foreground "purple"))))
- (fg:erc-color-face7 ((t (:foreground "orange"))))
- (fg:erc-color-face8 ((t (:foreground "yellow"))))
- (fg:erc-color-face9 ((t (:foreground "green"))))
- (fixed ((t (:bold t))))
- (fixed-pitch ((t (:size "16"))))
- (flyspell-duplicate-face ((t (:underline t :bold t :foreground "Gold3"))))
- (flyspell-incorrect-face ((t (:underline t :bold t :foreground "OrangeRed"))))
- (font-lock-builtin-face ((t (:foreground "Orchid"))))
- (font-lock-comment-face ((t (:bold t :foreground "cyan"))))
- (font-lock-constant-face ((t (:foreground "CadetBlue"))))
- (font-lock-doc-face ((t (:bold t :foreground "red"))))
- (font-lock-doc-string-face ((t (:bold t :foreground "red"))))
- (font-lock-function-name-face ((t (:bold t :foreground "white"))))
- (font-lock-keyword-face ((t (:bold t :foreground "yellow"))))
- (font-lock-preprocessor-face ((t (:bold t :foreground "blue"))))
- (font-lock-reference-face ((t (:foreground "red3"))))
- (font-lock-string-face ((t (:bold t :foreground "magenta"))))
- (font-lock-type-face ((t (:bold t :foreground "lightgreen"))))
- (font-lock-variable-name-face ((t (:bold t :foreground "white"))))
- (font-lock-warning-face ((t (:bold t :foreground "Red"))))
- (fringe ((t (:background "grey95"))))
- (gdb-arrow-face ((t (:bold t :background "yellow" :foreground "red"))))
- (gnus-cite-attribution-face ((t (:italic t))))
- (gnus-cite-face-1 ((t (:foreground "MidnightBlue"))))
- (gnus-cite-face-10 ((t (:foreground "medium purple"))))
- (gnus-cite-face-11 ((t (:foreground "turquoise"))))
- (gnus-cite-face-2 ((t (:foreground "firebrick"))))
- (gnus-cite-face-3 ((t (:foreground "dark green"))))
- (gnus-cite-face-4 ((t (:foreground "OrangeRed"))))
- (gnus-cite-face-5 ((t (:foreground "dark khaki"))))
- (gnus-cite-face-6 ((t (:foreground "dark violet"))))
- (gnus-cite-face-7 ((t (:foreground "SteelBlue4"))))
- (gnus-cite-face-8 ((t (:foreground "magenta"))))
- (gnus-cite-face-9 ((t (:foreground "violet"))))
- (gnus-emphasis-bold ((t (:bold t))))
- (gnus-emphasis-bold-italic ((t (:italic t :bold t))))
- (gnus-emphasis-highlight-words ((t (:foreground "yellow"))))
- (gnus-emphasis-italic ((t (:italic t))))
- (gnus-emphasis-underline ((t (:underline t))))
- (gnus-emphasis-underline-bold ((t (:underline t :bold t))))
- (gnus-emphasis-underline-bold-italic ((t (:underline t :italic t :bold t))))
- (gnus-emphasis-underline-italic ((t (:underline t :italic t))))
- (gnus-group-mail-1-empty-face ((t (:foreground "DeepPink3"))))
- (gnus-group-mail-1-face ((t (:bold t :foreground "DeepPink3"))))
- (gnus-group-mail-2-empty-face ((t (:foreground "HotPink3"))))
- (gnus-group-mail-2-face ((t (:bold t :foreground "HotPink3"))))
- (gnus-group-mail-3-empty-face ((t (:foreground "magenta4"))))
- (gnus-group-mail-3-face ((t (:bold t :foreground "magenta4"))))
- (gnus-group-mail-low-empty-face ((t (:foreground "DeepPink4"))))
- (gnus-group-mail-low-face ((t (:bold t :foreground "DeepPink4"))))
- (gnus-group-news-1-empty-face ((t (:foreground "ForestGreen"))))
- (gnus-group-news-1-face ((t (:bold t :foreground "ForestGreen"))))
- (gnus-group-news-2-empty-face ((t (:foreground "CadetBlue4"))))
- (gnus-group-news-2-face ((t (:bold t :foreground "CadetBlue4"))))
- (gnus-group-news-3-empty-face ((t (nil))))
- (gnus-group-news-3-face ((t (:bold t))))
- (gnus-group-news-4-empty-face ((t (nil))))
- (gnus-group-news-4-face ((t (:bold t))))
- (gnus-group-news-5-empty-face ((t (nil))))
- (gnus-group-news-5-face ((t (:bold t))))
- (gnus-group-news-6-empty-face ((t (nil))))
- (gnus-group-news-6-face ((t (:bold t))))
- (gnus-group-news-low-empty-face ((t (:foreground "DarkGreen"))))
- (gnus-group-news-low-face ((t (:bold t :foreground "DarkGreen"))))
- (gnus-header-content-face ((t (:italic t :foreground "indianred4"))))
- (gnus-header-from-face ((t (:foreground "red3"))))
- (gnus-header-name-face ((t (:foreground "maroon"))))
- (gnus-header-newsgroups-face ((t (:italic t :foreground "MidnightBlue"))))
- (gnus-header-subject-face ((t (:foreground "red4"))))
- (gnus-picons-face ((t (:background "white" :foreground "black"))))
- (gnus-picons-xbm-face ((t (:background "white" :foreground "black"))))
- (gnus-signature-face ((t (:italic t))))
- (gnus-splash-face ((t (:foreground "ForestGreen"))))
- (gnus-summary-cancelled-face ((t (:foreground "yellow"))))
- (gnus-summary-high-ancient-face ((t (:bold t :foreground "RoyalBlue"))))
- (gnus-summary-high-read-face ((t (:bold t :foreground "DarkGreen"))))
- (gnus-summary-high-ticked-face ((t (:bold t :foreground "firebrick"))))
- (gnus-summary-high-unread-face ((t (:bold t))))
- (gnus-summary-low-ancient-face ((t (:italic t :foreground "RoyalBlue"))))
- (gnus-summary-low-read-face ((t (:italic t :foreground "DarkGreen"))))
- (gnus-summary-low-ticked-face ((t (:italic t :foreground "firebrick"))))
- (gnus-summary-low-unread-face ((t (:italic t))))
- (gnus-summary-normal-ancient-face ((t (:foreground "RoyalBlue"))))
- (gnus-summary-normal-read-face ((t (:foreground "DarkGreen"))))
- (gnus-summary-normal-ticked-face ((t (:foreground "firebrick"))))
- (gnus-summary-normal-unread-face ((t (nil))))
- (gnus-summary-selected-face ((t (:underline t))))
- (gnus-x-face ((t (:background "white" :foreground "black"))))
- (green ((t (:foreground "green"))))
- (gui-button-face ((t (:background "grey75" :foreground "black"))))
- (gui-element ((t (:size "12" :background "Gray80" :foreground "black"))))
- (header-line ((t (:background "grey20" :foreground "grey90"))))
- (highlight ((t (:bold t :background "yellow" :foreground "red"))))
- (highlight-changes-delete-face ((t (:underline t :foreground "red"))))
- (highlight-changes-face ((t (:foreground "red"))))
- (highline-face ((t (:background "paleturquoise"))))
- (holiday-face ((t (:background "pink"))))
- (hyper-apropos-documentation ((t (:foreground "#aaaaaa"))))
- (hyper-apropos-heading ((t (:bold t :foreground "#999999"))))
- (hyper-apropos-hyperlink ((t (:foreground "Violet"))))
- (hyper-apropos-major-heading ((t (:bold t :foreground "#ff0000"))))
- (hyper-apropos-section-heading ((t (:italic t :bold t :foreground "#33aa55"))))
- (hyper-apropos-warning ((t (:bold t :foreground "red"))))
- (info-menu-5 ((t (:underline t))))
- (info-node ((t (:italic t :bold t))))
- (info-xref ((t (:bold t))))
- (isearch ((t (:background "paleturquoise"))))
- (isearch-lazy-highlight-face ((t (:background "paleturquoise4"))))
- (isearch-secondary ((t (:foreground "red3"))))
- (italic ((t (:italic t))))
- (jde-bug-breakpoint-cursor ((t (:background "brown" :foreground "cyan"))))
- (jde-db-active-breakpoint-face ((t (:background "red" :foreground "black"))))
- (jde-db-requested-breakpoint-face ((t (:background "yellow" :foreground "black"))))
- (jde-db-spec-breakpoint-face ((t (:background "green" :foreground "black"))))
- (jde-java-font-lock-api-face ((t (:foreground "light goldenrod"))))
- (jde-java-font-lock-bold-face ((t (:bold t))))
- (jde-java-font-lock-code-face ((t (nil))))
- (jde-java-font-lock-constant-face ((t (:foreground "Aquamarine"))))
- (jde-java-font-lock-doc-tag-face ((t (:foreground "light coral"))))
- (jde-java-font-lock-italic-face ((t (:italic t))))
- (jde-java-font-lock-link-face ((t (:underline t :foreground "cadetblue"))))
- (jde-java-font-lock-modifier-face ((t (:foreground "LightSteelBlue"))))
- (jde-java-font-lock-number-face ((t (:foreground "LightSalmon"))))
- (jde-java-font-lock-operator-face ((t (:foreground "medium blue"))))
- (jde-java-font-lock-package-face ((t (:foreground "steelblue1"))))
- (jde-java-font-lock-pre-face ((t (nil))))
- (jde-java-font-lock-underline-face ((t (:underline t))))
- (left-margin ((t (nil))))
- (list-mode-item-selected ((t (:background "gray68"))))
- (magenta ((t (:foreground "magenta"))))
- (makefile-space-face ((t (:background "hotpink"))))
- (menu ((t (nil))))
- (message-cited-text-face ((t (:foreground "red"))))
- (message-header-cc-face ((t (:foreground "MidnightBlue"))))
- (message-header-name-face ((t (:foreground "cornflower blue"))))
- (message-header-newsgroups-face ((t (:italic t :bold t :foreground "blue4"))))
- (message-header-other-face ((t (:foreground "steel blue"))))
- (message-header-subject-face ((t (:bold t :foreground "navy blue"))))
- (message-header-to-face ((t (:bold t :foreground "MidnightBlue"))))
- (message-header-xheader-face ((t (:foreground "blue"))))
- (message-mml-face ((t (:bold t :foreground "cyan"))))
- (message-separator-face ((t (:foreground "brown"))))
- (minibuffer-prompt ((t (:foreground "cyan"))))
- (mode-line ((t (:background "grey75" :foreground "black"))))
- (mode-line-inactive ((t (:background "grey30" :foreground "grey80"))))
- (modeline ((t (:bold t :background "red" :foreground "yellow"))))
- (modeline-buffer-id ((t (:bold t :background "red" :foreground "yellow"))))
- (modeline-mousable ((t (:background "red" :foreground "yellow"))))
- (modeline-mousable-minor-mode ((t (:background "red" :foreground "green4"))))
- (mouse ((t (nil))))
- (paren-blink-off ((t (:foreground "black"))))
- (paren-match ((t (:bold t :background "yellow" :foreground "red"))))
- (paren-mismatch ((t (:background "DeepPink"))))
- (pointer ((t (nil))))
- (primary-selection ((t (:background "gray65"))))
- (red ((t (:foreground "red"))))
- (region ((t (:background "gray75"))))
- (right-margin ((t (nil))))
- (scroll-bar ((t (nil))))
- (secondary-selection ((t (:background "paleturquoise"))))
- (semantic-dirty-token-face ((t (:background "lightyellow"))))
- (semantic-unmatched-syntax-face ((t (nil))))
- (senator-intangible-face ((t (:foreground "gray75"))))
- (senator-momentary-highlight-face ((t (:background "gray30"))))
- (senator-read-only-face ((t (:background "#664444"))))
- (show-paren-match-face ((t (:background "turquoise"))))
- (show-paren-mismatch-face ((t (:background "purple" :foreground "white"))))
- (speedbar-button-face ((t (:foreground "green4"))))
- (speedbar-directory-face ((t (:foreground "blue4"))))
- (speedbar-file-face ((t (:foreground "cyan4"))))
- (speedbar-highlight-face ((t (:background "green"))))
- (speedbar-selected-face ((t (:underline t :foreground "red"))))
- (speedbar-tag-face ((t (:foreground "brown"))))
- (template-message-face ((t (:bold t))))
- (term-black ((t (:foreground "black"))))
- (term-blackbg ((t (nil))))
- (term-blue ((t (:foreground "blue"))))
- (term-blue-bold-face ((t (:bold t :foreground "blue"))))
- (term-blue-face ((t (:foreground "blue"))))
- (term-blue-inv-face ((t (:background "blue"))))
- (term-blue-ul-face ((t (:underline t :foreground "blue"))))
- (term-bluebg ((t (:background "blue"))))
- (term-bold ((t (:bold t))))
- (term-cyan ((t (:foreground "cyan"))))
- (term-cyan-bold-face ((t (:bold t :foreground "cyan"))))
- (term-cyan-face ((t (:foreground "cyan"))))
- (term-cyan-inv-face ((t (:background "cyan"))))
- (term-cyan-ul-face ((t (:underline t :foreground "cyan"))))
- (term-cyanbg ((t (:background "cyan"))))
- (term-default-bg ((t (nil))))
- (term-default-bg-inv ((t (nil))))
- (term-default-bold-face ((t (:bold t))))
- (term-default-face ((t (nil))))
- (term-default-fg ((t (nil))))
- (term-default-fg-inv ((t (nil))))
- (term-default-inv-face ((t (:background "peachpuff" :foreground "black"))))
- (term-default-ul-face ((t (:underline t))))
- (term-green ((t (:foreground "green"))))
- (term-green-bold-face ((t (:bold t :foreground "green"))))
- (term-green-face ((t (:foreground "green"))))
- (term-green-inv-face ((t (:background "green"))))
- (term-green-ul-face ((t (:underline t :foreground "green"))))
- (term-greenbg ((t (:background "green"))))
- (term-invisible ((t (nil))))
- (term-invisible-inv ((t (nil))))
- (term-magenta ((t (:foreground "magenta"))))
- (term-magenta-bold-face ((t (:bold t :foreground "magenta"))))
- (term-magenta-face ((t (:foreground "magenta"))))
- (term-magenta-inv-face ((t (:background "magenta"))))
- (term-magenta-ul-face ((t (:underline t :foreground "magenta"))))
- (term-magentabg ((t (:background "magenta"))))
- (term-red ((t (:foreground "red"))))
- (term-red-bold-face ((t (:bold t :foreground "red"))))
- (term-red-face ((t (:foreground "red"))))
- (term-red-inv-face ((t (:background "red"))))
- (term-red-ul-face ((t (:underline t :foreground "red"))))
- (term-redbg ((t (:background "red"))))
- (term-underline ((t (:underline t))))
- (term-white ((t (:foreground "white"))))
- (term-white-bold-face ((t (:bold t :foreground "white"))))
- (term-white-face ((t (:foreground "white"))))
- (term-white-inv-face ((t (nil))))
- (term-white-ul-face ((t (:underline t :foreground "white"))))
- (term-whitebg ((t (:background "white"))))
- (term-yellow ((t (:foreground "yellow"))))
- (term-yellow-bold-face ((t (:bold t :foreground "yellow"))))
- (term-yellow-face ((t (:foreground "yellow"))))
- (term-yellow-inv-face ((t (:background "yellow"))))
- (term-yellow-ul-face ((t (:underline t :foreground "yellow"))))
- (term-yellowbg ((t (:background "yellow"))))
- (text-cursor ((t (:background "red" :foreground "black"))))
- (tool-bar ((t (:background "grey75" :foreground "black"))))
- (toolbar ((t (:background "Gray80" :foreground "black"))))
- (tooltip ((t (:background "lightyellow" :foreground "black"))))
- (trailing-whitespace ((t (:background "red"))))
- (underline ((t (:underline t))))
- (variable-pitch ((t (nil))))
- (vcursor ((t (:underline t :background "cyan" :foreground "blue"))))
- (vertical-divider ((t (:background "Gray80" :foreground "black"))))
- (vhdl-font-lock-attribute-face ((t (:foreground "Orchid"))))
- (vhdl-font-lock-directive-face ((t (:foreground "CadetBlue"))))
- (vhdl-font-lock-enumvalue-face ((t (:foreground "Gold4"))))
- (vhdl-font-lock-function-face ((t (:foreground "Orchid4"))))
- (vhdl-font-lock-prompt-face ((t (:bold t :foreground "Red"))))
- (vhdl-font-lock-reserved-words-face ((t (:bold t :foreground "Orange"))))
- (vhdl-font-lock-translate-off-face ((t (:background "LightGray"))))
- (vhdl-speedbar-architecture-face ((t (:foreground "Blue"))))
- (vhdl-speedbar-architecture-selected-face ((t (:underline t :foreground "Blue"))))
- (vhdl-speedbar-configuration-face ((t (:foreground "DarkGoldenrod"))))
- (vhdl-speedbar-configuration-selected-face ((t (:underline t :foreground "DarkGoldenrod"))))
- (vhdl-speedbar-entity-face ((t (:foreground "ForestGreen"))))
- (vhdl-speedbar-entity-selected-face ((t (:underline t :foreground "ForestGreen"))))
- (vhdl-speedbar-instantiation-face ((t (:foreground "Brown"))))
- (vhdl-speedbar-instantiation-selected-face ((t (:underline t :foreground "Brown"))))
- (vhdl-speedbar-package-face ((t (:foreground "Grey50"))))
- (vhdl-speedbar-package-selected-face ((t (:underline t :foreground "Grey50"))))
- (viper-minibuffer-emacs-face ((t (:background "darkseagreen2" :foreground "Black"))))
- (viper-minibuffer-insert-face ((t (:background "pink" :foreground "Black"))))
- (viper-minibuffer-vi-face ((t (:background "grey" :foreground "DarkGreen"))))
- (viper-replace-overlay-face ((t (:background "darkseagreen2" :foreground "Black"))))
- (viper-search-face ((t (:background "khaki" :foreground "Black"))))
- (white ((t (:foreground "white"))))
- (widget ((t (:size "12" :background "Gray80" :foreground "black"))))
- (widget-button-face ((t (:bold t))))
- (widget-button-pressed-face ((t (:foreground "red"))))
- (widget-documentation-face ((t (:foreground "dark green"))))
- (widget-field-face ((t (nil))))
- (widget-inactive-face ((t (:foreground "dim gray"))))
- (widget-single-line-field-face ((t (:background "gray85"))))
- (x-face ((t (:bold t :background "wheat" :foreground "black"))))
- (xrdb-option-name-face ((t (:bold t :foreground "yellow"))))
- (xrdb-option-value-face ((t (:bold t :foreground "magenta"))))
- (yellow ((t (:foreground "yellow"))))
- (zmacs-region ((t (:background "white" :foreground "black")))))))
-
- (defun color-theme-shaman ()
- "Color theme by shaman, created 2002-11-11."
- (interactive)
- (color-theme-install
- '(color-theme-shaman
- ((background-color . "#456345")
- (background-mode . dark)
- (background-toolbar-color . "#cf3ccf3ccf3c")
- (border-color . "#000000000000")
- (bottom-toolbar-shadow-color . "#79e77df779e7")
- (foreground-color . "White")
- (top-toolbar-shadow-color . "#f7defbeef7de"))
- ((buffers-tab-face . buffers-tab))
- (default ((t (nil))))
- (blue ((t (:foreground "blue"))))
- (bold ((t (:bold t :size "12"))))
- (bold-italic ((t (:italic t :bold t :size "12"))))
- (border-glyph ((t (nil))))
- (buffers-tab ((t (:background "Gray80" :foreground "black"))))
- (font-lock-builtin-face ((t (:foreground "cadetblue2"))))
- (font-lock-comment-face ((t (:foreground "gray80"))))
- (font-lock-constant-face ((t (:foreground "steelblue1"))))
- (font-lock-doc-face ((t (:foreground "light coral"))))
- (font-lock-doc-string-face ((t (:foreground "light coral"))))
- (font-lock-function-name-face ((t (:foreground "aquamarine"))))
- (font-lock-keyword-face ((t (:foreground "cyan"))))
- (font-lock-preprocessor-face ((t (:foreground "steelblue1"))))
- (font-lock-reference-face ((t (:foreground "cadetblue2"))))
- (font-lock-string-face ((t (:foreground "tan"))))
- (font-lock-type-face ((t (:foreground "wheat"))))
- (font-lock-variable-name-face ((t (:foreground "cyan3"))))
- (font-lock-warning-face ((t (:bold t :size "12" :foreground "Pink"))))
- (fringe ((t (nil))))
- (gnus-x-face ((t (:background "white" :foreground "black"))))
- (green ((t (:foreground "green"))))
- (gui-button-face ((t (:background "grey75" :foreground "black"))))
- (gui-element ((t (:size "12" :background "Gray80" :foreground "black"))))
- (highlight ((t (:background "darkseagreen2"))))
- (isearch ((t (:background "paleturquoise"))))
- (isearch-secondary ((t (:foreground "red3"))))
- (italic ((t (:italic t :size "12"))))
- (left-margin ((t (nil))))
- (list-mode-item-selected ((t (:background "gray68"))))
- (message-cited-text-face ((t (:foreground "red"))))
- (message-header-cc-face ((t (:bold t :foreground "green4"))))
- (message-header-name-face ((t (:foreground "DarkGreen"))))
- (message-header-newsgroups-face ((t (:bold t :foreground "yellow"))))
- (message-header-other-face ((t (:foreground "#b00000"))))
- (message-header-subject-face ((t (:foreground "green3"))))
- (message-header-to-face ((t (:bold t :foreground "green2"))))
- (message-header-xheader-face ((t (:foreground "blue"))))
- (message-mml-face ((t (:foreground "ForestGreen"))))
- (message-separator-face ((t (:foreground "blue3"))))
- (mode-line ((t (:background "Gray80" :foreground "black"))))
- (modeline ((t (:background "Gray80" :foreground "black"))))
- (modeline-buffer-id ((t (:background "Gray80" :foreground "blue4"))))
- (modeline-mousable ((t (:background "Gray80" :foreground "firebrick"))))
- (modeline-mousable-minor-mode ((t (:background "Gray80" :foreground "green4"))))
- (pointer ((t (:foreground "White"))))
- (primary-selection ((t (:background "gray65"))))
- (red ((t (:foreground "red"))))
- (region ((t (:background "gray65"))))
- (right-margin ((t (nil))))
- (rpm-spec-dir-face ((t (:foreground "green"))))
- (rpm-spec-doc-face ((t (:foreground "magenta"))))
- (rpm-spec-ghost-face ((t (:foreground "red"))))
- (rpm-spec-macro-face ((t (:foreground "yellow"))))
- (rpm-spec-package-face ((t (:foreground "red"))))
- (rpm-spec-tag-face ((t (:foreground "blue"))))
- (rpm-spec-var-face ((t (:foreground "maroon"))))
- (secondary-selection ((t (:background "paleturquoise"))))
- (text-cursor ((t (:background "Pink" :foreground "Black"))))
- (tool-bar ((t (nil))))
- (toolbar ((t (:background "Gray80" :foreground "black"))))
- (underline ((t (:underline t))))
- (vertical-divider ((t (:background "Gray80" :foreground "black"))))
- (widget ((t (:size "12" :background "Gray80" :foreground "black"))))
- (widget-button-face ((t (:bold t))))
- (widget-button-pressed-face ((t (:foreground "red"))))
- (widget-documentation-face ((t (:foreground "lime green"))))
- (widget-field-face ((t (:background "dim gray"))))
- (widget-inactive-face ((t (:foreground "light gray"))))
- (yellow ((t (:foreground "yellow"))))
- (zmacs-region ((t (:background "gray65")))))))
-
- (defun color-theme-emacs-nw ()
- "Follow emacs21's color-theme, with -nw getting 100% compatibility.
-
- Alex's `color-theme-emacs-21' follows emacs21's theme, but in the
- current scheme of things, that means that when it works on X, it won't
- work in -nw perfectly. The modeline and menuline will have same
- colors as the rest of emacs, which can be particularly disturbing when
- there are multiple windows.
-
- OTOH, `color-theme-emacs-nw' follows emacs21's theme but the goal is
- 100% -nw compatibility, and in X; we shall try for decent color
- scheme, and as much compability default emacs21's X as possble.
- Bugs to deego@gnufans.org.
-
- TODO: Try to make this theme relative to color-theme-emacs-21 rather
- than absolute, viz: call that first and then tweak minor stuff."
- (interactive)
- (color-theme-install
- '(color-theme-emacs-nw
- ((background-color . "white")
- (background-mode . light)
- (border-color . "black")
- (cursor-color . "black")
- (foreground-color . "black")
- (mouse-color . "black"))
- ((Man-overstrike-face . bold)
- (Man-underline-face . underline)
- (cperl-here-face . font-lock-string-face)
- (cperl-invalid-face . underline)
- (cperl-pod-face . font-lock-comment-face)
- (cperl-pod-head-face . font-lock-variable-name-face)
- (gnus-article-button-face . bold)
- (gnus-article-mouse-face . highlight)
- (gnus-cite-attribution-face . gnus-cite-attribution-face)
- (gnus-mouse-face . highlight)
- (gnus-signature-face . gnus-signature-face)
- (gnus-summary-selected-face . gnus-summary-selected-face)
- (help-highlight-face . underline)
- (idlwave-class-arrow-face . bold)
- (idlwave-shell-breakpoint-face . idlwave-shell-bp-face)
- (idlwave-shell-expression-face . secondary-selection)
- (idlwave-shell-stop-line-face . highlight)
- (ispell-highlight-face . highlight)
- (list-matching-lines-face . bold)
- (view-highlight-face . highlight)
- (viper-insert-state-cursor-color . "Green")
- (viper-replace-overlay-cursor-color . "Red")
- (widget-mouse-face . highlight))
- (default ((t (:stipple nil :background "white" :foreground "black" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :width normal :family "adobe-courier"))))
- (Info-title-1-face ((t (:bold t :weight bold :family "helv" :height 1.728))))
- (Info-title-2-face ((t (:bold t :family "helv" :weight bold :height 1.44))))
- (Info-title-3-face ((t (:bold t :weight bold :family "helv" :height 1.2))))
- (Info-title-4-face ((t (:bold t :family "helv" :weight bold))))
- (antlr-font-lock-keyword-face ((t (:bold t :foreground "black" :weight bold))))
- (antlr-font-lock-literal-face ((t (:bold t :foreground "brown4" :weight bold))))
- (antlr-font-lock-ruledef-face ((t (:bold t :foreground "blue" :weight bold))))
- (antlr-font-lock-ruleref-face ((t (:foreground "blue4"))))
- (antlr-font-lock-tokendef-face ((t (:bold t :foreground "blue" :weight bold))))
- (antlr-font-lock-tokenref-face ((t (:foreground "orange4"))))
- (bold ((t (:bold t :weight bold))))
- (bold-italic ((t (:italic t :bold t :slant italic :weight bold))))
- (border ((t (:background "black"))))
- (calendar-today-face ((t (:underline t))))
- (change-log-acknowledgement-face ((t (:foreground "Firebrick"))))
- (change-log-conditionals-face ((t (:foreground "DarkGoldenrod"))))
- (change-log-date-face ((t (:foreground "RosyBrown"))))
- (change-log-email-face ((t (:foreground "DarkGoldenrod"))))
- (change-log-file-face ((t (:foreground "Blue"))))
- (change-log-function-face ((t (:foreground "DarkGoldenrod"))))
- (change-log-list-face ((t (:foreground "Purple"))))
- (change-log-name-face ((t (:foreground "CadetBlue"))))
- (comint-highlight-input ((t (:bold t :weight bold))))
- (comint-highlight-prompt ((t (:foreground "dark blue"))))
- (cperl-array-face ((t (:bold t :background "lightyellow2" :foreground "Blue" :weight bold))))
- (cperl-hash-face ((t (:italic t :bold t :background "lightyellow2" :foreground "Red" :slant italic :weight bold))))
- (cperl-nonoverridable-face ((t (:foreground "chartreuse3"))))
- (cursor ((t (:background "black"))))
- (custom-button-face ((t (:background "lightgrey" :foreground "black" :box (:line-width 2 :style released-button)))))
- (custom-button-pressed-face ((t (:background "lightgrey" :foreground "black" :box (:line-width 2 :style pressed-button)))))
- (custom-changed-face ((t (:background "blue" :foreground "white"))))
- (custom-comment-face ((t (:background "gray85"))))
- (custom-comment-tag-face ((t (:foreground "blue4"))))
- (custom-documentation-face ((t (nil))))
- (custom-face-tag-face ((t (:bold t :family "helv" :weight bold :height 1.2))))
- (custom-group-tag-face ((t (:bold t :foreground "blue" :weight bold :height 1.2))))
- (custom-group-tag-face-1 ((t (:bold t :family "helv" :foreground "red" :weight bold :height 1.2))))
- (custom-invalid-face ((t (:background "red" :foreground "yellow"))))
- (custom-modified-face ((t (:background "blue" :foreground "white"))))
- (custom-rogue-face ((t (:background "black" :foreground "pink"))))
- (custom-saved-face ((t (:underline t))))
- (custom-set-face ((t (:background "white" :foreground "blue"))))
- (custom-state-face ((t (:foreground "dark green"))))
- (custom-variable-button-face ((t (:bold t :underline t :weight bold))))
- (custom-variable-tag-face ((t (:bold t :family "helv" :foreground "blue" :weight bold :height 1.2))))
- (cvs-filename-face ((t (:foreground "blue4"))))
- (cvs-handled-face ((t (:foreground "pink"))))
- (cvs-header-face ((t (:bold t :foreground "blue4" :weight bold))))
- (cvs-marked-face ((t (:bold t :foreground "green3" :weight bold))))
- (cvs-msg-face ((t (:italic t :slant italic))))
- (cvs-need-action-face ((t (:foreground "orange"))))
- (cvs-unknown-face ((t (:foreground "red"))))
- (diary-face ((t (:foreground "red"))))
- (diff-added-face ((t (nil))))
- (diff-changed-face ((t (nil))))
- (diff-context-face ((t (:foreground "grey50"))))
- (diff-file-header-face ((t (:bold t :background "grey70" :weight bold))))
- (diff-function-face ((t (:foreground "grey50"))))
- (diff-header-face ((t (:background "grey85"))))
- (diff-hunk-header-face ((t (:background "grey85"))))
- (diff-index-face ((t (:bold t :weight bold :background "grey70"))))
- (diff-nonexistent-face ((t (:bold t :weight bold :background "grey70"))))
- (diff-removed-face ((t (nil))))
- (dired-face-boring ((t (:foreground "RosyBrown"))))
- (dired-face-directory ((t (:foreground "Blue"))))
- (dired-face-executable ((t (nil))))
- (dired-face-flagged ((t (:foreground "Red" :weight bold))))
- (dired-face-marked ((t (:foreground "Red" :weight bold))))
- (dired-face-permissions ((t (nil))))
- (dired-face-setuid ((t (nil))))
- (dired-face-socket ((t (nil))))
- (dired-face-symlink ((t (:foreground "Purple"))))
- (ebrowse-default-face ((t (nil))))
- (ebrowse-file-name-face ((t (:italic t :slant italic))))
- (ebrowse-member-attribute-face ((t (:foreground "red"))))
- (ebrowse-member-class-face ((t (:foreground "purple"))))
- (ebrowse-progress-face ((t (:background "blue"))))
- (ebrowse-root-class-face ((t (:bold t :foreground "blue" :weight bold))))
- (ebrowse-tree-mark-face ((t (:foreground "red"))))
- (ediff-current-diff-face-A ((t (:background "pale green" :foreground "firebrick"))))
- (ediff-current-diff-face-Ancestor ((t (:background "VioletRed" :foreground "Black"))))
- (ediff-current-diff-face-B ((t (:background "Yellow" :foreground "DarkOrchid"))))
- (ediff-current-diff-face-C ((t (:background "Pink" :foreground "Navy"))))
- (ediff-even-diff-face-A ((t (:background "light grey" :foreground "Black"))))
- (ediff-even-diff-face-Ancestor ((t (:background "Grey" :foreground "White"))))
- (ediff-even-diff-face-B ((t (:background "Grey" :foreground "White"))))
- (ediff-even-diff-face-C ((t (:background "light grey" :foreground "Black"))))
- (ediff-fine-diff-face-A ((t (:background "sky blue" :foreground "Navy"))))
- (ediff-fine-diff-face-Ancestor ((t (:background "Green" :foreground "Black"))))
- (ediff-fine-diff-face-B ((t (:background "cyan" :foreground "Black"))))
- (ediff-fine-diff-face-C ((t (:background "Turquoise" :foreground "Black"))))
- (ediff-odd-diff-face-A ((t (:background "Grey" :foreground "White"))))
- (ediff-odd-diff-face-Ancestor ((t (:background "light grey" :foreground "Black"))))
- (ediff-odd-diff-face-B ((t (:background "light grey" :foreground "Black"))))
- (ediff-odd-diff-face-C ((t (:background "Grey" :foreground "White"))))
- (eshell-ls-archive-face ((t (:bold t :foreground "Orchid" :weight bold))))
- (eshell-ls-backup-face ((t (:foreground "OrangeRed"))))
- (eshell-ls-clutter-face ((t (:bold t :foreground "OrangeRed" :weight bold))))
- (eshell-ls-directory-face ((t (:bold t :foreground "Blue" :weight bold))))
- (eshell-ls-executable-face ((t (:bold t :foreground "ForestGreen" :weight bold))))
- (eshell-ls-missing-face ((t (:bold t :foreground "Red" :weight bold))))
- (eshell-ls-product-face ((t (:foreground "OrangeRed"))))
- (eshell-ls-readonly-face ((t (:foreground "Brown"))))
- (eshell-ls-special-face ((t (:bold t :foreground "Magenta" :weight bold))))
- (eshell-ls-symlink-face ((t (:bold t :foreground "Dark Cyan" :weight bold))))
- (eshell-ls-unreadable-face ((t (:foreground "Grey30"))))
- (eshell-prompt-face ((t (:bold t :foreground "Red" :weight bold))))
- (eshell-test-failed-face ((t (:bold t :foreground "OrangeRed" :weight bold))))
- (eshell-test-ok-face ((t (:bold t :foreground "Green" :weight bold))))
- (excerpt ((t (:italic t :slant italic))))
- (fixed ((t (:bold t :weight bold))))
- (fixed-pitch ((t (:family "courier"))))
- (flyspell-duplicate-face ((t (:bold t :foreground "Gold3" :underline t :weight bold))))
- (flyspell-incorrect-face ((t (:bold t :foreground "OrangeRed" :underline t :weight bold))))
- (font-lock-builtin-face ((t (:foreground "Orchid"))))
- (font-lock-comment-face ((t (:foreground "Firebrick"))))
- (font-lock-constant-face ((t (:foreground "CadetBlue"))))
- (font-lock-doc-face ((t (:foreground "RosyBrown"))))
- (font-lock-doc-string-face ((t (:foreground "RosyBrown"))))
- (font-lock-function-name-face ((t (:foreground "Blue"))))
- (font-lock-keyword-face ((t (:foreground "Purple"))))
- (font-lock-preprocessor-face ((t (:foreground "CadetBlue"))))
- (font-lock-reference-face ((t (:foreground "Orchid"))))
- (font-lock-string-face ((t (:foreground "RosyBrown"))))
- (font-lock-type-face ((t (:foreground "ForestGreen"))))
- (font-lock-variable-name-face ((t (:foreground "DarkGoldenrod"))))
- (font-lock-warning-face ((t (:bold t :foreground "Red" :weight bold))))
- (fringe ((t (:background "grey95"))))
- (gnus-cite-attribution-face ((t (:italic t :slant italic))))
- (gnus-cite-face-1 ((t (:foreground "MidnightBlue"))))
- (gnus-cite-face-10 ((t (:foreground "medium purple"))))
- (gnus-cite-face-11 ((t (:foreground "turquoise"))))
- (gnus-cite-face-2 ((t (:foreground "firebrick"))))
- (gnus-cite-face-3 ((t (:foreground "dark green"))))
- (gnus-cite-face-4 ((t (:foreground "OrangeRed"))))
- (gnus-cite-face-5 ((t (:foreground "dark khaki"))))
- (gnus-cite-face-6 ((t (:foreground "dark violet"))))
- (gnus-cite-face-7 ((t (:foreground "SteelBlue4"))))
- (gnus-cite-face-8 ((t (:foreground "magenta"))))
- (gnus-cite-face-9 ((t (:foreground "violet"))))
- (gnus-emphasis-bold ((t (:bold t :weight bold))))
- (gnus-emphasis-bold-italic ((t (:italic t :bold t :slant italic :weight bold))))
- (gnus-emphasis-highlight-words ((t (:background "black" :foreground "yellow"))))
- (gnus-emphasis-italic ((t (:italic t :slant italic))))
- (gnus-emphasis-underline ((t (:underline t))))
- (gnus-emphasis-underline-bold ((t (:bold t :underline t :weight bold))))
- (gnus-emphasis-underline-bold-italic ((t (:italic t :bold t :underline t :slant italic :weight bold))))
- (gnus-emphasis-underline-italic ((t (:italic t :underline t :slant italic))))
- (gnus-group-mail-1-empty-face ((t (:foreground "DeepPink3"))))
- (gnus-group-mail-1-face ((t (:bold t :foreground "DeepPink3" :weight bold))))
- (gnus-group-mail-2-empty-face ((t (:foreground "HotPink3"))))
- (gnus-group-mail-2-face ((t (:bold t :foreground "HotPink3" :weight bold))))
- (gnus-group-mail-3-empty-face ((t (:foreground "magenta4"))))
- (gnus-group-mail-3-face ((t (:bold t :foreground "magenta4" :weight bold))))
- (gnus-group-mail-low-empty-face ((t (:foreground "DeepPink4"))))
- (gnus-group-mail-low-face ((t (:bold t :foreground "DeepPink4" :weight bold))))
- (gnus-group-news-1-empty-face ((t (:foreground "ForestGreen"))))
- (gnus-group-news-1-face ((t (:bold t :foreground "ForestGreen" :weight bold))))
- (gnus-group-news-2-empty-face ((t (:foreground "CadetBlue4"))))
- (gnus-group-news-2-face ((t (:bold t :foreground "CadetBlue4" :weight bold))))
- (gnus-group-news-3-empty-face ((t (nil))))
- (gnus-group-news-3-face ((t (:bold t :weight bold))))
- (gnus-group-news-4-empty-face ((t (nil))))
- (gnus-group-news-4-face ((t (:bold t :weight bold))))
- (gnus-group-news-5-empty-face ((t (nil))))
- (gnus-group-news-5-face ((t (:bold t :weight bold))))
- (gnus-group-news-6-empty-face ((t (nil))))
- (gnus-group-news-6-face ((t (:bold t :weight bold))))
- (gnus-group-news-low-empty-face ((t (:foreground "DarkGreen"))))
- (gnus-group-news-low-face ((t (:bold t :foreground "DarkGreen" :weight bold))))
- (gnus-header-content-face ((t (:italic t :foreground "indianred4" :slant italic))))
- (gnus-header-from-face ((t (:foreground "red3"))))
- (gnus-header-name-face ((t (:foreground "maroon"))))
- (gnus-header-newsgroups-face ((t (:italic t :foreground "MidnightBlue" :slant italic))))
- (gnus-header-subject-face ((t (:foreground "red4"))))
- (gnus-signature-face ((t (:italic t :slant italic))))
- (gnus-splash-face ((t (:foreground "Brown"))))
- (gnus-summary-cancelled-face ((t (:background "black" :foreground "yellow"))))
- (gnus-summary-high-ancient-face ((t (:bold t :foreground "RoyalBlue" :weight bold))))
- (gnus-summary-high-read-face ((t (:bold t :foreground "DarkGreen" :weight bold))))
- (gnus-summary-high-ticked-face ((t (:bold t :foreground "firebrick" :weight bold))))
- (gnus-summary-high-unread-face ((t (:bold t :weight bold))))
- (gnus-summary-low-ancient-face ((t (:italic t :foreground "RoyalBlue" :slant italic))))
- (gnus-summary-low-read-face ((t (:italic t :foreground "DarkGreen" :slant italic))))
- (gnus-summary-low-ticked-face ((t (:italic t :foreground "firebrick" :slant italic))))
- (gnus-summary-low-unread-face ((t (:italic t :slant italic))))
- (gnus-summary-normal-ancient-face ((t (:foreground "RoyalBlue"))))
- (gnus-summary-normal-read-face ((t (:foreground "DarkGreen"))))
- (gnus-summary-normal-ticked-face ((t (:foreground "firebrick"))))
- (gnus-summary-normal-unread-face ((t (nil))))
- (gnus-summary-selected-face ((t (:underline t))))
- (header-line ((t (:box (:line-width -1 :style released-button) :background "grey90" :foreground "grey20" :box nil))))
- (hi-black-b ((t (:bold t :weight bold))))
- (hi-black-hb ((t (:bold t :family "helv" :weight bold :height 1.67))))
- (hi-blue ((t (:background "light blue"))))
- (hi-blue-b ((t (:bold t :foreground "blue" :weight bold))))
- (hi-green ((t (:background "green"))))
- (hi-green-b ((t (:bold t :foreground "green" :weight bold))))
- (hi-pink ((t (:background "pink"))))
- (hi-red-b ((t (:bold t :foreground "red" :weight bold))))
- (hi-yellow ((t (:background "yellow"))))
- (highlight ((t (:background "darkseagreen2"))))
- (highlight-changes-delete-face ((t (:foreground "red" :underline t))))
- (highlight-changes-face ((t (:foreground "red"))))
- (holiday-face ((t (:background "pink"))))
- (idlwave-help-link-face ((t (:foreground "Blue"))))
- (idlwave-shell-bp-face ((t (:background "Pink" :foreground "Black"))))
- (info-header-node ((t (:italic t :bold t :weight bold :slant italic :foreground "brown"))))
- (info-header-xref ((t (:bold t :weight bold :foreground "magenta4"))))
- (info-menu-5 ((t (:foreground "red1"))))
- (info-menu-header ((t (:bold t :family "helv" :weight bold))))
- (info-node ((t (:italic t :bold t :foreground "brown" :slant italic :weight bold))))
- (info-xref ((t (:bold t :foreground "magenta4" :weight bold))))
- (isearch ((t (:background "magenta4" :foreground "lightskyblue1"))))
- (isearch-lazy-highlight-face ((t (:background "paleturquoise"))))
- (italic ((t (:italic t :slant italic))))
- (log-view-file-face ((t (:bold t :background "grey70" :weight bold))))
- (log-view-message-face ((t (:background "grey85"))))
- (makefile-space-face ((t (:background "hotpink"))))
- (menu ((t (:background "grey50" :foreground "white" :box (:line-width -1 :style released-button)))))
- (message-cited-text-face ((t (:foreground "red"))))
- (message-header-cc-face ((t (:foreground "MidnightBlue"))))
- (message-header-name-face ((t (:foreground "cornflower blue"))))
- (message-header-newsgroups-face ((t (:italic t :bold t :foreground "blue4" :slant italic :weight bold))))
- (message-header-other-face ((t (:foreground "steel blue"))))
- (message-header-subject-face ((t (:bold t :foreground "navy blue" :weight bold))))
- (message-header-to-face ((t (:bold t :foreground "MidnightBlue" :weight bold))))
- (message-header-xheader-face ((t (:foreground "blue"))))
- (message-mml-face ((t (:foreground "ForestGreen"))))
- (message-separator-face ((t (:foreground "brown"))))
- (mode-line ((t (:background "grey50" :foreground "white" :box (:line-width -1 :style released-button)))))
- (modeline ((t (:background "grey50" :foreground "white" :box (:line-width -1 :style released-button)))))
- (modeline-buffer-id ((t (:bold t :background "grey75" :foreground "black" :box (:line-width -1 :style released-button)))))
- (modeline-mousable ((t (:background "grey75" :foreground "black" :box (:line-width -1 :style released-button)))))
- (modeline-mousable-minor-mode ((t (:background "grey75" :foreground "black" :box (:line-width -1 :style released-button)))))
- (mouse ((t (:background "black"))))
- (primary-selection ((t (:background "lightgoldenrod2"))))
- (reb-match-0 ((t (:background "lightblue"))))
- (reb-match-1 ((t (:background "aquamarine"))))
- (reb-match-2 ((t (:background "springgreen"))))
- (reb-match-3 ((t (:background "yellow"))))
- (region ((t (:background "lightgoldenrod2"))))
- (scroll-bar ((t (:background "grey75"))))
- (secondary-selection ((t (:background "yellow"))))
- (sh-heredoc-face ((t (:foreground "tan"))))
- (show-paren-match-face ((t (:background "turquoise"))))
- (show-paren-mismatch-face ((t (:background "purple" :foreground "white"))))
- (show-tabs-space-face ((t (:foreground "yellow"))))
- (show-tabs-tab-face ((t (:foreground "red"))))
- (smerge-base-face ((t (:foreground "red"))))
- (smerge-markers-face ((t (:background "grey85"))))
- (smerge-mine-face ((t (:foreground "blue"))))
- (smerge-other-face ((t (:foreground "darkgreen"))))
- (speedbar-button-face ((t (:foreground "green4"))))
- (speedbar-directory-face ((t (:foreground "blue4"))))
- (speedbar-file-face ((t (:foreground "cyan4"))))
- (speedbar-highlight-face ((t (:background "green"))))
- (speedbar-selected-face ((t (:foreground "red" :underline t))))
- (speedbar-tag-face ((t (:foreground "brown"))))
- (strokes-char-face ((t (:background "lightgray"))))
- (term-black ((t (:stipple nil :background "white" :foreground "black" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :width normal :family "adobe-courier"))))
- (term-blackbg ((t (:stipple nil :background "black" :foreground "black" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :width normal :family "adobe-courier"))))
- (term-blue ((t (:stipple nil :background "white" :foreground "blue" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :width normal :family "adobe-courier"))))
- (term-bluebg ((t (:stipple nil :background "blue" :foreground "black" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :width normal :family "adobe-courier"))))
- (term-bold ((t (:bold t :stipple nil :background "white" :foreground "black" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight bold :width normal :family "adobe-courier"))))
- (term-cyan ((t (:stipple nil :background "white" :foreground "cyan" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :width normal :family "adobe-courier"))))
- (term-cyanbg ((t (:stipple nil :background "cyan" :foreground "black" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :width normal :family "adobe-courier"))))
- (term-default ((t (:stipple nil :background "white" :foreground "black" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :width normal :family "adobe-courier"))))
- (term-default-bg ((t (:stipple nil :foreground "black" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :width normal :family "adobe-courier"))))
- (term-default-bg-inv ((t (:stipple nil :foreground "black" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :width normal :family "adobe-courier"))))
- (term-default-fg ((t (:stipple nil :background "white" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :width normal :family "adobe-courier"))))
- (term-default-fg-inv ((t (:stipple nil :background "white" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :width normal :family "adobe-courier"))))
- (term-green ((t (:stipple nil :background "white" :foreground "green" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :width normal :family "adobe-courier"))))
- (term-greenbg ((t (:stipple nil :background "green" :foreground "black" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :width normal :family "adobe-courier"))))
- (term-invisible ((t (:stipple nil :foreground "black" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :width normal :family "adobe-courier"))))
- (term-invisible-inv ((t (:stipple nil :foreground "black" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :width normal :family "adobe-courier"))))
- (term-magenta ((t (:stipple nil :background "white" :foreground "magenta" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :width normal :family "adobe-courier"))))
- (term-magentabg ((t (:stipple nil :background "magenta" :foreground "black" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :width normal :family "adobe-courier"))))
- (term-red ((t (:stipple nil :background "white" :foreground "red" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :width normal :family "adobe-courier"))))
- (term-redbg ((t (:stipple nil :background "red" :foreground "black" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :width normal :family "adobe-courier"))))
- (term-underline ((t (:stipple nil :background "white" :foreground "black" :inverse-video nil :box nil :strike-through nil :overline nil :underline t :slant normal :weight normal :width normal :family "adobe-courier"))))
- (term-white ((t (:stipple nil :background "white" :foreground "white" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :width normal :family "adobe-courier"))))
- (term-whitebg ((t (:stipple nil :background "white" :foreground "black" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :width normal :family "adobe-courier"))))
- (term-yellow ((t (:stipple nil :background "white" :foreground "yellow" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :width normal :family "adobe-courier"))))
- (term-yellowbg ((t (:stipple nil :background "yellow" :foreground "black" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :width normal :family "adobe-courier"))))
- (tex-math-face ((t (:foreground "RosyBrown"))))
- (texinfo-heading-face ((t (:foreground "Blue"))))
- (tool-bar ((t (:background "grey75" :foreground "black" :box (:line-width 1 :style released-button)))))
- (tooltip ((t (:background "lightyellow" :foreground "black"))))
- (trailing-whitespace ((t (:background "red"))))
- (underline ((t (:underline t))))
- (variable-pitch ((t (:family "helv"))))
- (vcursor ((t (:background "cyan" :foreground "blue" :underline t))))
- (vhdl-font-lock-attribute-face ((t (:foreground "Orchid"))))
- (vhdl-font-lock-directive-face ((t (:foreground "CadetBlue"))))
- (vhdl-font-lock-enumvalue-face ((t (:foreground "Gold4"))))
- (vhdl-font-lock-function-face ((t (:foreground "Orchid4"))))
- (vhdl-font-lock-prompt-face ((t (:bold t :foreground "Red" :weight bold))))
- (vhdl-font-lock-reserved-words-face ((t (:bold t :foreground "Orange" :weight bold))))
- (vhdl-font-lock-translate-off-face ((t (:background "LightGray"))))
- (vhdl-speedbar-architecture-face ((t (:foreground "Blue"))))
- (vhdl-speedbar-architecture-selected-face ((t (:foreground "Blue" :underline t))))
- (vhdl-speedbar-configuration-face ((t (:foreground "DarkGoldenrod"))))
- (vhdl-speedbar-configuration-selected-face ((t (:foreground "DarkGoldenrod" :underline t))))
- (vhdl-speedbar-entity-face ((t (:foreground "ForestGreen"))))
- (vhdl-speedbar-entity-selected-face ((t (:foreground "ForestGreen" :underline t))))
- (vhdl-speedbar-instantiation-face ((t (:foreground "Brown"))))
- (vhdl-speedbar-instantiation-selected-face ((t (:foreground "Brown" :underline t))))
- (vhdl-speedbar-package-face ((t (:foreground "Grey50"))))
- (vhdl-speedbar-package-selected-face ((t (:foreground "Grey50" :underline t))))
- (viper-minibuffer-emacs-face ((t (:background "darkseagreen2" :foreground "Black"))))
- (viper-minibuffer-insert-face ((t (:background "pink" :foreground "Black"))))
- (viper-minibuffer-vi-face ((t (:background "grey" :foreground "DarkGreen"))))
- (viper-replace-overlay-face ((t (:background "darkseagreen2" :foreground "Black"))))
- (viper-search-face ((t (:background "khaki" :foreground "Black"))))
- (widget-button-face ((t (:bold t :weight bold))))
- (widget-button-pressed-face ((t (:foreground "red"))))
- (widget-documentation-face ((t (:foreground "dark green"))))
- (widget-field-face ((t (:background "gray85"))))
- (widget-inactive-face ((t (:foreground "dim gray"))))
- (widget-single-line-field-face ((t (:background "gray85"))))
- (woman-addition-face ((t (:foreground "orange"))))
- (woman-bold-face ((t (:bold t :foreground "blue" :weight bold))))
- (woman-italic-face ((t (:italic t :foreground "red" :underline t :slant italic))))
- (woman-unknown-face ((t (:foreground "brown"))))
- (zmacs-region ((t (:background "lightgoldenrod2")))))))
-
- (defun color-theme-late-night ()
- "Color theme by Alex Schroeder, created 2003-08-07.
- This theme is for use late at night, with only little light in the room.
- The goal was to make something as dark and subtle as the text console in
- its default 80x25 state -- dark grey on black."
- (interactive)
- (let ((color-theme-is-cumulative t))
- (color-theme-dark-erc)
- (color-theme-dark-gnus)
- ;; (color-theme-dark-diff)
- ;; (color-theme-dark-eshell)
- (color-theme-dark-info)
- (color-theme-dark-font-lock)
- (color-theme-install
- '(color-theme-late-night
- ((background-color . "#000")
- (background-mode . dark)
- (background-toolbar-color . "#000")
- (border-color . "#000")
- (bottom-toolbar-shadow-color . "#000")
- (cursor-color . "#888")
- (foreground-color . "#666")
- (top-toolbar-shadow-color . "#111"))
- (default ((t (nil))))
- (bold ((t (:bold t))))
- (button ((t (:bold t))))
- (custom-button-face ((t (:bold t :foreground "#999"))))
- (fringe ((t (:background "#111" :foreground "#444"))))
- (header-line ((t (:background "#333" :foreground "#000"))))
- (highlight ((t (:background "dark slate blue" :foreground "light blue"))))
- (holiday-face ((t (:background "#000" :foreground "#777"))))
- (isearch ((t (:foreground "pink" :background "red"))))
- (isearch-lazy-highlight-face ((t (:foreground "red"))))
- (italic ((t (:bold t))))
- (menu ((t (:background "#111" :foreground "#444"))))
- (minibuffer-prompt ((t (:foreground "555"))))
- (modeline ((t (:background "#111" :foreground "#444"))))
- (mode-line-inactive ((t (:background "#000" :foreground "#444"))))
- (modeline-buffer-id ((t (:background "#000" :foreground "#555"))))
- (modeline-mousable ((t (:background "#000" :foreground "#555"))))
- (modeline-mousable-minor-mode ((t (:background "#000" :foreground "#555"))))
- (region ((t (:background "dark cyan" :foreground "cyan"))))
- (secondary-selection ((t (:background "Aquamarine" :foreground "SlateBlue"))))
- (show-paren-match-face ((t (:foreground "white" :background "light slate blue"))))
- (show-paren-mismatch-face ((t (:foreground "white" :background "red"))))
- (tool-bar ((t (:background "#111" :foreground "#777"))))
- (tooltip ((t (:background "#333" :foreground "#777"))))
- (underline ((t (:bold t))))
- (variable-pitch ((t (nil))))
- (widget-button-face ((t (:bold t :foreground "#888"))))
- (widget-field-face ((t (:bold t :foreground "#999"))))))))
-
- (defun color-theme-clarity ()
- "White on black color theme by Richard Wellum, created 2003-01-16."
- (interactive)
- (color-theme-install
- '(color-theme-clarity
- ((background-color . "black")
- (background-mode . dark)
- (border-color . "white")
- (cursor-color . "yellow")
- (foreground-color . "white")
- (mouse-color . "white"))
- ((CUA-mode-global-mark-cursor-color . "cyan")
- (CUA-mode-normal-cursor-color . "yellow")
- (CUA-mode-overwrite-cursor-color . "red")
- (CUA-mode-read-only-cursor-color . "green")
- (help-highlight-face . underline)
- (ibuffer-dired-buffer-face . font-lock-function-name-face)
- (ibuffer-help-buffer-face . font-lock-comment-face)
- (ibuffer-hidden-buffer-face . font-lock-warning-face)
- (ibuffer-occur-match-face . font-lock-warning-face)
- (ibuffer-read-only-buffer-face . font-lock-type-face)
- (ibuffer-special-buffer-face . font-lock-keyword-face)
- (ibuffer-title-face . font-lock-type-face)
- (list-matching-lines-face . bold)
- (ps-line-number-color . "black")
- (ps-zebra-color . 0.95)
- (tags-tag-face . default)
- (view-highlight-face . highlight)
- (widget-mouse-face . highlight))
- (default ((t (nil))))
- (CUA-global-mark-face ((t (:background "cyan" :foreground "black"))))
- (CUA-rectangle-face ((t (:background "maroon" :foreground "white"))))
- (CUA-rectangle-noselect-face ((t (:background "dimgray" :foreground "white"))))
- (bold ((t (:bold t :weight bold))))
- (bold-italic ((t (:italic t :bold t :slant italic :weight bold))))
- (border ((t (:background "white"))))
- (clearcase-dired-checkedout-face ((t (:foreground "red"))))
- (comint-highlight-input ((t (:bold t :weight bold))))
- (comint-highlight-prompt ((t (:foreground "cyan"))))
- (cursor ((t (:background "yellow"))))
- (fixed-pitch ((t (:family "courier"))))
- (flash-paren-face-off ((t (nil))))
- (flash-paren-face-on ((t (nil))))
- (flash-paren-face-region ((t (nil))))
- (font-lock-builtin-face ((t (:foreground "LightSteelBlue"))))
- (font-lock-comment-face ((t (:foreground "OrangeRed"))))
- (font-lock-constant-face ((t (:foreground "Aquamarine"))))
- (font-lock-doc-face ((t (:foreground "LightSalmon"))))
- (font-lock-function-name-face ((t (:foreground "LightSkyBlue"))))
- (font-lock-keyword-face ((t (:foreground "Cyan"))))
- (font-lock-string-face ((t (:foreground "LightSalmon"))))
- (font-lock-type-face ((t (:foreground "PaleGreen"))))
- (font-lock-variable-name-face ((t (:foreground "LightGoldenrod"))))
- (font-lock-warning-face ((t (:bold t :foreground "Pink" :weight bold))))
- (fringe ((t (:background "grey10"))))
- (header-line ((t (:box (:line-width -1 :style released-button) :foreground "grey20" :background "grey90" :box nil))))
- (highlight ((t (:background "darkolivegreen"))))
- (ibuffer-deletion-face ((t (:foreground "red"))))
- (ibuffer-marked-face ((t (:foreground "green"))))
- (isearch ((t (:background "palevioletred2" :foreground "brown4"))))
- (isearch-lazy-highlight-face ((t (:background "paleturquoise4"))))
- (italic ((t (:italic t :slant italic))))
- (menu ((t (nil))))
- (mode-line ((t (:foreground "yellow" :background "darkslateblue" :box (:line-width -1 :style released-button)))))
- (mouse ((t (:background "white"))))
- (region ((t (:background "blue"))))
- (scroll-bar ((t (nil))))
- (secondary-selection ((t (:background "darkslateblue"))))
- (show-block-face1 ((t (:background "gray10"))))
- (show-block-face2 ((t (:background "gray15"))))
- (show-block-face3 ((t (:background "gray20"))))
- (show-block-face4 ((t (:background "gray25"))))
- (show-block-face5 ((t (:background "gray30"))))
- (show-block-face6 ((t (:background "gray35"))))
- (show-block-face7 ((t (:background "gray40"))))
- (show-block-face8 ((t (:background "gray45"))))
- (show-block-face9 ((t (:background "gray50"))))
- (show-paren-match-face ((t (:background "turquoise"))))
- (show-paren-mismatch-face ((t (:background "purple" :foreground "white"))))
- (tool-bar ((t (:background "grey75" :foreground "black" :box (:line-width 1 :style released-button)))))
- (tooltip ((t (:background "lightyellow" :foreground "black"))))
- (trailing-whitespace ((t (:background "red"))))
- (underline ((t (:underline t))))
- (variable-pitch ((t (:family "helv"))))
- (widget-button-face ((t (:bold t :weight bold))))
- (widget-button-pressed-face ((t (:foreground "red"))))
- (widget-documentation-face ((t (:foreground "lime green"))))
- (widget-field-face ((t (:background "dim gray"))))
- (widget-inactive-face ((t (:foreground "light gray"))))
- (widget-single-line-field-face ((t (:background "dim gray")))))))
-
- (defun color-theme-andreas ()
- "Color theme by Andreas Busch, created 2003-02-06."
- (interactive)
- (color-theme-install
- '(color-theme-andreas
- ((background-mode . light)
- (background-color . "white")
- (background-toolbar-color . "#cccccccccccc")
- (border-color . "#000000000000")
- (bottom-toolbar-shadow-color . "#7a7a7a7a7a7a")
- (foreground-color . "black")
- (top-toolbar-shadow-color . "#f5f5f5f5f5f5"))
- ((gnus-mouse-face . highlight)
- (ispell-highlight-face . highlight))
- (default ((t (nil))))
- (OrangeRed ((t (nil))))
- (blue ((t (:foreground "blue"))))
- (bold ((t (:bold t))))
- (bold-italic ((t (:italic t :bold t))))
- (border-glyph ((t (nil))))
- (calendar-today-face ((t (:underline t))))
- (color-mode-face-@ ((t (:foreground "orange"))))
- (color-mode-face-a ((t (:foreground "blue"))))
- (color-mode-face-b ((t (:foreground "red"))))
- (color-mode-face-c ((t (:foreground "green3"))))
- (color-mode-face-d ((t (:background "red" :foreground "white"))))
- (color-mode-face-e ((t (:background "orange" :foreground "blue"))))
- (color-mode-face-f ((t (:background "blue" :foreground "yellow"))))
- (color-mode-face-g ((t (:background "lightblue" :foreground "brown"))))
- (color-mode-face-h ((t (:background "brown" :foreground "white"))))
- (custom-button-face ((t (:bold t))))
- (custom-changed-face ((t (:background "blue" :foreground "white"))))
- (custom-documentation-face ((t (nil))))
- (custom-face-tag-face ((t (:underline t))))
- (custom-group-tag-face ((t (:underline t :foreground "blue"))))
- (custom-group-tag-face-1 ((t (:underline t :foreground "red"))))
- (custom-invalid-face ((t (:background "red" :foreground "yellow"))))
- (custom-modified-face ((t (:background "blue" :foreground "white"))))
- (custom-rogue-face ((t (:background "black" :foreground "pink"))))
- (custom-saved-face ((t (:underline t))))
- (custom-set-face ((t (:background "white" :foreground "blue"))))
- (custom-state-face ((t (:foreground "dark green"))))
- (custom-variable-button-face ((t (:underline t :bold t :background "gray90"))))
- (custom-variable-tag-face ((t (:underline t :background "gray95" :foreground "blue"))))
- (diary-face ((t (:foreground "red"))))
- (display-time-mail-balloon-enhance-face ((t (:background "orange"))))
- (display-time-mail-balloon-gnus-group-face ((t (:foreground "blue"))))
- (display-time-time-balloon-face ((t (:foreground "red"))))
- (emacs-wiki-bad-link-face ((t (:bold t :foreground "red"))))
- (emacs-wiki-link-face ((t (:bold t :foreground "green"))))
- (font-lock-comment-face ((t (:foreground "orange1"))))
- (font-lock-doc-string-face ((t (:foreground "green4"))))
- (font-lock-function-name-face ((t (:foreground "blue3"))))
- (font-lock-keyword-face ((t (:foreground "red1"))))
- (font-lock-preprocessor-face ((t (:foreground "blue3"))))
- (font-lock-reference-face ((t (:foreground "red3"))))
- (font-lock-string-face ((t (:foreground "green4"))))
- (font-lock-type-face ((t (:foreground "#6920ac"))))
- (font-lock-variable-name-face ((t (:foreground "blue3"))))
- (font-lock-warning-face ((t (:bold t :foreground "Red"))))
- (gnu-cite-face-3 ((t (nil))))
- (gnu-cite-face-4 ((t (nil))))
- (gnus-cite-attribution-face ((t (:underline t))))
- (gnus-cite-face-1 ((t (:foreground "MidnightBlue"))))
- (gnus-cite-face-10 ((t (:foreground "medium purple"))))
- (gnus-cite-face-11 ((t (:foreground "turquoise"))))
- (gnus-cite-face-2 ((t (:foreground "firebrick"))))
- (gnus-cite-face-3 ((t (:foreground "dark green"))))
- (gnus-cite-face-4 ((t (:foreground "OrangeRed"))))
- (gnus-cite-face-5 ((t (:foreground "dark khaki"))))
- (gnus-cite-face-6 ((t (:foreground "dark violet"))))
- (gnus-cite-face-7 ((t (:foreground "SteelBlue4"))))
- (gnus-cite-face-8 ((t (:foreground "magenta"))))
- (gnus-cite-face-9 ((t (:foreground "violet"))))
- (gnus-emphasis-bold ((t (:bold t))))
- (gnus-emphasis-bold-italic ((t (:italic t :bold t))))
- (gnus-emphasis-italic ((t (:italic t))))
- (gnus-emphasis-underline ((t (:underline t))))
- (gnus-emphasis-underline-bold ((t (:underline t :bold t))))
- (gnus-emphasis-underline-bold-italic ((t (:underline t :italic t :bold t))))
- (gnus-emphasis-underline-italic ((t (:underline t :italic t))))
- (gnus-group-mail-1-empty-face ((t (:foreground "DeepPink3"))))
- (gnus-group-mail-1-face ((t (:bold t :foreground "DeepPink3"))))
- (gnus-group-mail-2-empty-face ((t (:foreground "HotPink3"))))
- (gnus-group-mail-2-face ((t (:bold t :foreground "HotPink3"))))
- (gnus-group-mail-3-empty-face ((t (:foreground "magenta4"))))
- (gnus-group-mail-3-face ((t (:bold t :foreground "magenta4"))))
- (gnus-group-mail-low-empty-face ((t (:foreground "DeepPink4"))))
- (gnus-group-mail-low-face ((t (:bold t :foreground "DeepPink4"))))
- (gnus-group-news-1-empty-face ((t (:foreground "ForestGreen"))))
- (gnus-group-news-1-face ((t (:bold t :foreground "ForestGreen"))))
- (gnus-group-news-2-empty-face ((t (:foreground "CadetBlue4"))))
- (gnus-group-news-2-face ((t (:bold t :foreground "CadetBlue4"))))
- (gnus-group-news-3-empty-face ((t (nil))))
- (gnus-group-news-3-face ((t (:bold t))))
- (gnus-group-news-4-empty-face ((t (nil))))
- (gnus-group-news-4-face ((t (:bold t))))
- (gnus-group-news-5-empty-face ((t (nil))))
- (gnus-group-news-5-face ((t (:bold t))))
- (gnus-group-news-6-empty-face ((t (nil))))
- (gnus-group-news-6-face ((t (:bold t))))
- (gnus-group-news-low-empty-face ((t (:foreground "DarkGreen"))))
- (gnus-group-news-low-face ((t (:bold t :foreground "DarkGreen"))))
- (gnus-header-content-face ((t (:italic t :foreground "indianred4"))))
- (gnus-header-from-face ((t (:bold t :foreground "red3"))))
- (gnus-header-name-face ((t (:foreground "maroon"))))
- (gnus-header-newsgroups-face ((t (:italic t :bold t :foreground "MidnightBlue"))))
- (gnus-header-subject-face ((t (:bold t :foreground "red4"))))
- (gnus-splash-face ((t (:foreground "red"))))
- (gnus-summary-cancelled-face ((t (:background "black" :foreground "yellow"))))
- (gnus-summary-high-ancient-face ((t (:bold t :foreground "RoyalBlue"))))
- (gnus-summary-high-read-face ((t (:bold t :foreground "DarkGreen"))))
- (gnus-summary-high-ticked-face ((t (:bold t :foreground "DarkRed"))))
- (gnus-summary-high-unread-face ((t (:bold t))))
- (gnus-summary-low-ancient-face ((t (:italic t :foreground "RoyalBlue"))))
- (gnus-summary-low-read-face ((t (:italic t :foreground "DarkGreen"))))
- (gnus-summary-low-ticked-face ((t (:italic t :foreground "firebrick"))))
- (gnus-summary-low-unread-face ((t (:italic t))))
- (gnus-summary-normal-ancient-face ((t (:foreground "RoyalBlue"))))
- (gnus-summary-normal-read-face ((t (:foreground "DarkGreen"))))
- (gnus-summary-normal-ticked-face ((t (:foreground "Red"))))
- (gnus-summary-normal-unread-face ((t (nil))))
- (gnus-summary-selected-face ((t (:underline t))))
- (gnus-x-face ((t (nil))))
- (green ((t (:foreground "green"))))
- (gui-button-face ((t (:background "grey75"))))
- (gui-element ((t (:background "Gray80"))))
- (highlight ((t (nil))))
- (holiday-face ((t (:background "pink"))))
- (hyper-apropos-documentation ((t (:foreground "darkred"))))
- (hyper-apropos-heading ((t (:bold t))))
- (hyper-apropos-hyperlink ((t (:foreground "blue4"))))
- (hyper-apropos-major-heading ((t (:bold t))))
- (hyper-apropos-section-heading ((t (:italic t :bold t))))
- (hyper-apropos-warning ((t (:bold t :foreground "red"))))
- (info-node ((t (:italic t :bold t))))
- (info-xref ((t (:bold t))))
- (isearch ((t (:background "yellow" :foreground "red"))))
- (italic ((t (:italic t))))
- (kai-gnus-cite-face-1 ((t (:foreground "LightCyan4"))))
- (kai-gnus-cite-face-2 ((t (:foreground "LightSkyBlue2"))))
- (kai-gnus-cite-face-3 ((t (:foreground "DodgerBlue3"))))
- (kai-gnus-group-mail-face ((t (:foreground "darkslategrey"))))
- (kai-gnus-group-nonempty-mail-face ((t (:foreground "DarkRed"))))
- (kai-gnus-group-starred-face ((t (:foreground "grey50"))))
- (left-margin ((t (nil))))
- (list-mode-item-selected ((t (:background "gray68"))))
- (message-cited-text ((t (:italic t))))
- (message-cited-text-face ((t (:foreground "red"))))
- (message-header-cc-face ((t (:foreground "MidnightBlue"))))
- (message-header-contents ((t (:italic t))))
- (message-header-name-face ((t (:foreground "cornflower blue"))))
- (message-header-newsgroups-face ((t (:italic t :bold t :foreground "blue4"))))
- (message-header-other-face ((t (:foreground "steel blue"))))
- (message-header-subject-face ((t (:bold t :foreground "navy blue"))))
- (message-header-to-face ((t (:bold t :foreground "MidnightBlue"))))
- (message-header-xheader-face ((t (:foreground "blue"))))
- (message-headers ((t (:bold t))))
- (message-highlighted-header-contents ((t (:italic t :bold t))))
- (message-mml-face ((t (:foreground "ForestGreen"))))
- (message-separator-face ((t (:foreground "brown"))))
- (modeline ((t (:background "Gray75" :foreground "Black"))))
- (modeline-buffer-id ((t (:background "Gray75" :foreground "blue4"))))
- (modeline-mousable ((t (:background "Gray75" :foreground "firebrick"))))
- (modeline-mousable-minor-mode ((t (:background "Gray75" :foreground "green4"))))
- (paren-blink-off ((t (:foreground "gray80"))))
- (paren-match ((t (:background "red" :foreground "white"))))
- (paren-mismatch ((t (:background "DeepPink"))))
- (pointer ((t (:foreground "blue"))))
- (primary-selection ((t (:background "gray65"))))
- (red ((t (:foreground "red"))))
- (region ((t (:background "gray75"))))
- (right-margin ((t (nil))))
- (secondary-selection ((t (:background "paleturquoise"))))
- (text-cursor ((t (:background "red" :foreground "LightYellow1"))))
- (toolbar ((t (:background "Gray80"))))
- (underline ((t (:underline t))))
- (vertical-divider ((t (:background "Gray80"))))
- (widget-button-face ((t (:bold t))))
- (widget-button-pressed-face ((t (:foreground "red"))))
- (widget-documentation-face ((t (:foreground "dark green"))))
- (widget-field-face ((t (:background "gray85"))))
- (widget-inactive-face ((t (:foreground "dim gray"))))
- (x-face ((t (:background "white"))))
- (yellow ((t (:foreground "yellow"))))
- (zmacs-region ((t (:background "gray65" :foreground "yellow")))))))
-
- (defun color-theme-charcoal-black ()
- "Color theme by Lars Chr. Hausmann, created 2003-03-24."
- (interactive)
- (color-theme-install
- '(color-theme-charcoal-black
- ((background-color . "Grey15")
- (background-mode . dark)
- (border-color . "Grey")
- (cursor-color . "Grey")
- (foreground-color . "Grey")
- (mouse-color . "Grey"))
- ((display-time-mail-face . mode-line)
- (gnus-article-button-face . bold)
- (gnus-article-mouse-face . highlight)
- (gnus-mouse-face . highlight)
- (gnus-server-agent-face . gnus-server-agent-face)
- (gnus-server-closed-face . gnus-server-closed-face)
- (gnus-server-denied-face . gnus-server-denied-face)
- (gnus-server-offline-face . gnus-server-offline-face)
- (gnus-server-opened-face . gnus-server-opened-face)
- (gnus-signature-face . gnus-signature-face)
- (gnus-summary-selected-face . gnus-summary-selected-face)
- (help-highlight-face . underline)
- (list-matching-lines-face . bold)
- (mime-button-face . bold)
- (mime-button-mouse-face . highlight)
- (sgml-set-face . t)
- (tags-tag-face . default)
- (view-highlight-face . highlight)
- (widget-mouse-face . highlight))
- (default ((t (:stipple nil :background "Grey15" :foreground "Grey" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :height 87 :width semi-condensed :family "misc-fixed"))))
- (Info-title-1-face ((t (:bold t :weight bold :family "helv" :height 1.728))))
- (Info-title-2-face ((t (:bold t :family "helv" :weight bold :height 1.44))))
- (Info-title-3-face ((t (:bold t :weight bold :family "helv" :height 1.2))))
- (Info-title-4-face ((t (:bold t :family "helv" :weight bold))))
- (bg:erc-color-face0 ((t (nil))))
- (bg:erc-color-face1 ((t (nil))))
- (bg:erc-color-face10 ((t (nil))))
- (bg:erc-color-face11 ((t (nil))))
- (bg:erc-color-face12 ((t (nil))))
- (bg:erc-color-face13 ((t (nil))))
- (bg:erc-color-face14 ((t (nil))))
- (bg:erc-color-face15 ((t (nil))))
- (bg:erc-color-face2 ((t (nil))))
- (bg:erc-color-face3 ((t (nil))))
- (bg:erc-color-face4 ((t (nil))))
- (bg:erc-color-face5 ((t (nil))))
- (bg:erc-color-face6 ((t (nil))))
- (bg:erc-color-face7 ((t (nil))))
- (bg:erc-color-face8 ((t (nil))))
- (bg:erc-color-face9 ((t (nil))))
- (bold ((t (:bold t :weight bold))))
- (bold-italic ((t (:bold t :foreground "beige" :weight bold))))
- (border ((t (:background "Grey"))))
- (calendar-today-face ((t (:underline t))))
- (comint-highlight-input ((t (:bold t :weight bold))))
- (comint-highlight-prompt ((t (:foreground "cyan"))))
- (cperl-array-face ((t (:bold t :foreground "light salmon" :weight bold))))
- (cperl-hash-face ((t (:italic t :bold t :foreground "beige" :slant italic :weight bold))))
- (cperl-nonoverridable-face ((t (:foreground "aquamarine"))))
- (cursor ((t (:background "Grey"))))
- (custom-button-face ((t (:foreground "gainsboro"))))
- (custom-button-pressed-face ((t (:background "lightgrey" :foreground "black" :box (:line-width 2 :style pressed-button)))))
- (custom-changed-face ((t (:background "blue" :foreground "white"))))
- (custom-comment-face ((t (:background "dim gray"))))
- (custom-comment-tag-face ((t (:foreground "gray80"))))
- (custom-documentation-face ((t (:foreground "light blue"))))
- (custom-face-tag-face ((t (:underline t))))
- (custom-group-tag-face ((t (:bold t :foreground "pale turquoise" :weight bold))))
- (custom-group-tag-face-1 ((t (:foreground "pale turquoise" :underline t))))
- (custom-invalid-face ((t (:background "red" :foreground "yellow"))))
- (custom-modified-face ((t (:background "blue" :foreground "white"))))
- (custom-rogue-face ((t (:background "black" :foreground "pink"))))
- (custom-saved-face ((t (:underline t))))
- (custom-set-face ((t (:background "white" :foreground "blue"))))
- (custom-state-face ((t (:foreground "light salmon"))))
- (custom-variable-button-face ((t (:bold t :underline t :weight bold))))
- (custom-variable-tag-face ((t (:bold t :foreground "turquoise" :weight bold))))
- (diary-face ((t (:foreground "red"))))
- (dired-face-directory ((t (:bold t :foreground "sky blue" :weight bold))))
- (dired-face-executable ((t (:foreground "green yellow"))))
- (dired-face-flagged ((t (:foreground "tomato"))))
- (dired-face-marked ((t (:foreground "light salmon"))))
- (dired-face-permissions ((t (:foreground "aquamarine"))))
- (erc-action-face ((t (nil))))
- (erc-bold-face ((t (:bold t :weight bold))))
- (erc-default-face ((t (nil))))
- (erc-direct-msg-face ((t (:foreground "pale green"))))
- (erc-error-face ((t (:bold t :foreground "IndianRed" :weight bold))))
- (erc-highlight-face ((t (:bold t :foreground "pale green" :weight bold))))
- (erc-input-face ((t (:foreground "light blue"))))
- (erc-inverse-face ((t (:background "steel blue"))))
- (erc-notice-face ((t (:foreground "light salmon"))))
- (erc-pal-face ((t (:foreground "pale green"))))
- (erc-prompt-face ((t (:bold t :foreground "light blue" :weight bold))))
- (eshell-ls-archive-face ((t (:bold t :foreground "medium purple" :weight bold))))
- (eshell-ls-backup-face ((t (:foreground "dim gray"))))
- (eshell-ls-clutter-face ((t (:foreground "dim gray"))))
- (eshell-ls-directory-face ((t (:bold t :foreground "medium slate blue" :weight bold))))
- (eshell-ls-executable-face ((t (:bold t :foreground "aquamarine" :weight bold))))
- (eshell-ls-missing-face ((t (:foreground "black"))))
- (eshell-ls-picture-face ((t (:foreground "violet"))))
- (eshell-ls-product-face ((t (:foreground "light steel blue"))))
- (eshell-ls-readonly-face ((t (:foreground "aquamarine"))))
- (eshell-ls-special-face ((t (:foreground "gold"))))
- (eshell-ls-symlink-face ((t (:foreground "white"))))
- (eshell-ls-unreadable-face ((t (:foreground "dim gray"))))
- (eshell-prompt-face ((t (:bold t :foreground "light sky blue" :weight bold))))
- (excerpt ((t (:italic t :slant italic))))
- (fg:erc-color-face0 ((t (:foreground "white"))))
- (fg:erc-color-face1 ((t (:foreground "beige"))))
- (fg:erc-color-face10 ((t (:foreground "pale goldenrod"))))
- (fg:erc-color-face11 ((t (:foreground "light goldenrod yellow"))))
- (fg:erc-color-face12 ((t (:foreground "light yellow"))))
- (fg:erc-color-face13 ((t (:foreground "yellow"))))
- (fg:erc-color-face14 ((t (:foreground "light goldenrod"))))
- (fg:erc-color-face15 ((t (:foreground "lime green"))))
- (fg:erc-color-face2 ((t (:foreground "lemon chiffon"))))
- (fg:erc-color-face3 ((t (:foreground "light cyan"))))
- (fg:erc-color-face4 ((t (:foreground "powder blue"))))
- (fg:erc-color-face5 ((t (:foreground "sky blue"))))
- (fg:erc-color-face6 ((t (:foreground "dark sea green"))))
- (fg:erc-color-face7 ((t (:foreground "pale green"))))
- (fg:erc-color-face8 ((t (:foreground "medium spring green"))))
- (fg:erc-color-face9 ((t (:foreground "khaki"))))
- (fixed ((t (:bold t :weight bold))))
- (fixed-pitch ((t (:family "courier"))))
- (flyspell-duplicate-face ((t (:bold t :foreground "Gold3" :underline t :weight bold))))
- (flyspell-incorrect-face ((t (:bold t :foreground "OrangeRed" :underline t :weight bold))))
- (font-lock-builtin-face ((t (:foreground "aquamarine"))))
- (font-lock-comment-face ((t (:foreground "light blue"))))
- (font-lock-constant-face ((t (:foreground "pale green"))))
- (font-lock-doc-face ((t (:foreground "light sky blue"))))
- (font-lock-doc-string-face ((t (:foreground "sky blue"))))
- (font-lock-function-name-face ((t (:bold t :foreground "aquamarine" :weight bold))))
- (font-lock-keyword-face ((t (:bold t :foreground "pale turquoise" :weight bold))))
- (font-lock-reference-face ((t (:foreground "pale green"))))
- (font-lock-string-face ((t (:foreground "light sky blue"))))
- (font-lock-type-face ((t (:bold t :foreground "sky blue" :weight bold))))
- (font-lock-variable-name-face ((t (:bold t :foreground "turquoise" :weight bold))))
- (font-lock-warning-face ((t (:bold t :foreground "Red" :weight bold))))
- (fringe ((t (:background "Grey15"))))
- (gnus-cite-face-1 ((t (:foreground "LightSalmon"))))
- (gnus-cite-face-2 ((t (:foreground "Khaki"))))
- (gnus-cite-face-3 ((t (:foreground "Coral"))))
- (gnus-cite-face-4 ((t (:foreground "yellow green"))))
- (gnus-cite-face-5 ((t (:foreground "dark khaki"))))
- (gnus-cite-face-6 ((t (:foreground "bisque"))))
- (gnus-cite-face-7 ((t (:foreground "peru"))))
- (gnus-cite-face-8 ((t (:foreground "light coral"))))
- (gnus-cite-face-9 ((t (:foreground "plum"))))
- (gnus-emphasis-bold ((t (:bold t :weight bold))))
- (gnus-emphasis-bold-italic ((t (:italic t :bold t :slant italic :weight bold))))
- (gnus-emphasis-highlight-words ((t (:background "black" :foreground "yellow"))))
- (gnus-emphasis-italic ((t (:italic t :slant italic))))
- (gnus-emphasis-strikethru ((t (nil))))
- (gnus-emphasis-underline ((t (:underline t))))
- (gnus-emphasis-underline-bold ((t (:bold t :underline t :weight bold))))
- (gnus-emphasis-underline-bold-italic ((t (:italic t :bold t :underline t :slant italic :weight bold))))
- (gnus-emphasis-underline-italic ((t (:italic t :underline t :slant italic))))
- (gnus-group-mail-1-empty-face ((t (:foreground "White"))))
- (gnus-group-mail-1-face ((t (:bold t :foreground "White" :weight bold))))
- (gnus-group-mail-2-empty-face ((t (:foreground "light cyan"))))
- (gnus-group-mail-2-face ((t (:bold t :foreground "light cyan" :weight bold))))
- (gnus-group-mail-3-empty-face ((t (:foreground "LightBlue"))))
- (gnus-group-mail-3-face ((t (:bold t :foreground "LightBlue" :weight bold))))
- (gnus-group-mail-low-empty-face ((t (:foreground "Aquamarine"))))
- (gnus-group-mail-low-face ((t (:bold t :foreground "Aquamarine" :weight bold))))
- (gnus-group-news-1-empty-face ((t (:foreground "White"))))
- (gnus-group-news-1-face ((t (:bold t :foreground "White" :weight bold))))
- (gnus-group-news-2-empty-face ((t (:foreground "light cyan"))))
- (gnus-group-news-2-face ((t (:bold t :foreground "light cyan" :weight bold))))
- (gnus-group-news-3-empty-face ((t (:foreground "LightBlue"))))
- (gnus-group-news-3-face ((t (:bold t :foreground "LightBlue" :weight bold))))
- (gnus-group-news-4-empty-face ((t (:foreground "Aquamarine"))))
- (gnus-group-news-4-face ((t (:bold t :foreground "Aquamarine" :weight bold))))
- (gnus-group-news-5-empty-face ((t (:foreground "MediumAquamarine"))))
- (gnus-group-news-5-face ((t (:bold t :foreground "MediumAquamarine" :weight bold))))
- (gnus-group-news-6-empty-face ((t (:foreground "MediumAquamarine"))))
- (gnus-group-news-6-face ((t (:bold t :foreground "MediumAquamarine" :weight bold))))
- (gnus-group-news-low-empty-face ((t (:foreground "MediumAquamarine"))))
- (gnus-group-news-low-face ((t (:bold t :foreground "MediumAquamarine" :weight bold))))
- (gnus-header-content-face ((t (:foreground "LightSkyBlue3"))))
- (gnus-header-from-face ((t (:bold t :foreground "light cyan" :weight bold))))
- (gnus-header-name-face ((t (:bold t :foreground "LightBlue" :weight bold))))
- (gnus-header-newsgroups-face ((t (:italic t :bold t :foreground "MediumAquamarine" :slant italic :weight bold))))
- (gnus-header-subject-face ((t (:bold t :foreground "light cyan" :weight bold))))
- (gnus-server-agent-face ((t (:bold t :foreground "PaleTurquoise" :weight bold))))
- (gnus-server-closed-face ((t (:italic t :foreground "Light Steel Blue" :slant italic))))
- (gnus-server-denied-face ((t (:bold t :foreground "Pink" :weight bold))))
- (gnus-server-offline-face ((t (:bold t :foreground "Yellow" :weight bold))))
- (gnus-server-opened-face ((t (:bold t :foreground "Green1" :weight bold))))
- (gnus-signature-face ((t (:foreground "Grey"))))
- (gnus-splash-face ((t (:foreground "ForestGreen"))))
- (gnus-summary-cancelled-face ((t (:background "Black" :foreground "Yellow"))))
- (gnus-summary-high-ancient-face ((t (:bold t :foreground "MediumAquamarine" :weight bold))))
- (gnus-summary-high-read-face ((t (:bold t :foreground "Aquamarine" :weight bold))))
- (gnus-summary-high-ticked-face ((t (:bold t :foreground "LightSalmon" :weight bold))))
- (gnus-summary-high-unread-face ((t (:italic t :bold t :foreground "beige" :slant italic :weight bold))))
- (gnus-summary-low-ancient-face ((t (:italic t :foreground "DimGray" :slant italic))))
- (gnus-summary-low-read-face ((t (:foreground "slate gray"))))
- (gnus-summary-low-ticked-face ((t (:foreground "Pink"))))
- (gnus-summary-low-unread-face ((t (:foreground "LightGray"))))
- (gnus-summary-normal-ancient-face ((t (:foreground "MediumAquamarine"))))
- (gnus-summary-normal-read-face ((t (:foreground "Aquamarine"))))
- (gnus-summary-normal-ticked-face ((t (:foreground "LightSalmon"))))
- (gnus-summary-normal-unread-face ((t (nil))))
- (gnus-summary-selected-face ((t (:underline t))))
- (header-line ((t (:box (:line-width -1 :style released-button) :background "grey20" :foreground "grey90" :box nil))))
- (highlight ((t (:background "dark slate blue" :foreground "light blue"))))
- (highline-face ((t (:background "DeepSkyBlue4"))))
- (holiday-face ((t (:background "pink"))))
- (info-header-node ((t (:bold t :weight bold))))
- (info-header-xref ((t (:bold t :weight bold :foreground "sky blue"))))
- (info-menu-5 ((t (:underline t))))
- (info-menu-header ((t (:bold t :family "helv" :weight bold))))
- (info-node ((t (:bold t :weight bold))))
- (info-xref ((t (:bold t :foreground "sky blue" :weight bold))))
- (isearch ((t (:background "slate blue"))))
- (isearch-lazy-highlight-face ((t (:background "paleturquoise4"))))
- (italic ((t (:foreground "sky blue"))))
- (jde-bug-breakpoint-cursor ((t (:background "brown" :foreground "cyan"))))
- (jde-bug-breakpoint-marker ((t (:background "yellow" :foreground "red"))))
- (jde-java-font-lock-api-face ((t (:foreground "light goldenrod"))))
- (jde-java-font-lock-bold-face ((t (:bold t :weight bold))))
- (jde-java-font-lock-code-face ((t (nil))))
- (jde-java-font-lock-constant-face ((t (:foreground "Aquamarine"))))
- (jde-java-font-lock-doc-tag-face ((t (:foreground "light coral"))))
- (jde-java-font-lock-italic-face ((t (:italic t :slant italic))))
- (jde-java-font-lock-link-face ((t (:foreground "blue" :underline t :slant normal))))
- (jde-java-font-lock-modifier-face ((t (:foreground "LightSteelBlue"))))
- (jde-java-font-lock-number-face ((t (:foreground "LightSalmon"))))
- (jde-java-font-lock-package-face ((t (:foreground "steelblue1"))))
- (jde-java-font-lock-pre-face ((t (nil))))
- (jde-java-font-lock-underline-face ((t (:underline t))))
- (makefile-space-face ((t (:background "hotpink"))))
- (menu ((t (:background "MidnightBlue" :foreground "Grey"))))
- (message-cited-text-face ((t (:foreground "LightSalmon"))))
- (message-header-cc-face ((t (:foreground "light cyan"))))
- (message-header-name-face ((t (:foreground "LightBlue"))))
- (message-header-newsgroups-face ((t (:italic t :bold t :foreground "MediumAquamarine" :slant italic :weight bold))))
- (message-header-other-face ((t (:foreground "MediumAquamarine"))))
- (message-header-subject-face ((t (:bold t :foreground "light cyan" :weight bold))))
- (message-header-to-face ((t (:bold t :foreground "light cyan" :weight bold))))
- (message-header-xheader-face ((t (:foreground "MediumAquamarine"))))
- (message-mml-face ((t (:foreground "ForestGreen"))))
- (message-separator-face ((t (:foreground "chocolate"))))
- (mode-line ((t (:background "grey75" :foreground "black" :box (:line-width -1 :style released-button)))))
- (mouse ((t (:background "Grey"))))
- (region ((t (:background "DarkSlateBlue"))))
- (scroll-bar ((t (:background "grey75"))))
- (secondary-selection ((t (:background "steel blue"))))
- (semantic-dirty-token-face ((t (:background "gray10"))))
- (semantic-unmatched-syntax-face ((t (:underline "red"))))
- (show-paren-match-face ((t (:background "light slate blue" :foreground "white"))))
- (show-paren-mismatch-face ((t (:background "red" :foreground "white"))))
- (speedbar-button-face ((t (:foreground "seashell2"))))
- (speedbar-directory-face ((t (:foreground "seashell3"))))
- (speedbar-file-face ((t (:foreground "seashell4"))))
- (speedbar-highlight-face ((t (:background "dark slate blue" :foreground "wheat"))))
- (speedbar-selected-face ((t (:foreground "seashell1" :underline t))))
- (speedbar-separator-face ((t (:background "blue" :foreground "white" :overline "gray"))))
- (speedbar-tag-face ((t (:foreground "antique white"))))
- (tool-bar ((t (:background "grey75" :foreground "black" :box (:line-width 1 :style released-button)))))
- (tooltip ((t (:background "lightyellow" :foreground "black"))))
- (trailing-whitespace ((t (:background "red"))))
- (underline ((t (:underline t))))
- (variable-pitch ((t (:family "helv"))))
- (widget-button-face ((t (:bold t :weight bold))))
- (widget-button-pressed-face ((t (:foreground "red"))))
- (widget-documentation-face ((t (:foreground "light blue"))))
- (widget-field-face ((t (:background "RoyalBlue4" :foreground "wheat"))))
- (widget-inactive-face ((t (:foreground "dim gray"))))
- (widget-single-line-field-face ((t (:background "slate blue" :foreground "wheat"))))
- (woman-bold-face ((t (:bold t :foreground "sky blue" :weight bold))))
- (woman-italic-face ((t (:foreground "deep sky blue"))))
- (woman-unknown-face ((t (:foreground "LightSalmon"))))
- (zmacs-region ((t (:background "DarkSlateBlue")))))))
-
- (defun color-theme-vim-colors ()
- "Color theme by Michael Soulier, created 2003-03-26."
- (interactive)
- (color-theme-install
- '(color-theme-vim-colors
- ((background-color . "#ffffff")
- (background-mode . light)
- (border-color . "black")
- (cursor-color . "#000000")
- (foreground-color . "#000000")
- (mouse-color . "#000000"))
- ((Man-overstrike-face . bold)
- (Man-underline-face . underline)
- (apropos-keybinding-face . underline)
- (apropos-label-face . italic)
- (apropos-match-face . secondary-selection)
- (apropos-property-face . bold-italic)
- (apropos-symbol-face . bold)
- (cperl-here-face . font-lock-string-face)
- (cperl-invalid-face quote underline)
- (cperl-pod-face . font-lock-comment-face)
- (cperl-pod-head-face . font-lock-variable-name-face)
- (help-highlight-face . underline)
- (ispell-highlight-face . highlight)
- (list-matching-lines-face . bold)
- (rpm-spec-dir-face . rpm-spec-dir-face)
- (rpm-spec-doc-face . rpm-spec-doc-face)
- (rpm-spec-ghost-face . rpm-spec-ghost-face)
- (rpm-spec-macro-face . rpm-spec-macro-face)
- (rpm-spec-package-face . rpm-spec-package-face)
- (rpm-spec-tag-face . rpm-spec-tag-face)
- (tags-tag-face . default)
- (view-highlight-face . highlight)
- (widget-mouse-face . highlight))
- (default ((t (:background "#ffffff" :foreground "#000000"))))
- (Info-title-1-face ((t (nil))))
- (Info-title-2-face ((t (nil))))
- (Info-title-3-face ((t (nil))))
- (Info-title-4-face ((t (:bold (bold extra-bold ultra-bold)))))
- (bold ((t (:bold (bold extra-bold ultra-bold)))))
- (bold-italic ((t (:italic (italic oblique) :bold (bold extra-bold ultra-bold)))))
- (border ((t (:background "black"))))
- (comint-highlight-input ((t (:bold (bold extra-bold ultra-bold)))))
- (comint-highlight-prompt ((t (:foreground "dark blue"))))
- (cperl-array-face ((t (:foreground "brown"))))
- (cperl-hash-face ((t (:foreground "red"))))
- (cperl-nonoverridable-face ((t (:foreground "#008b8b"))))
- (cursor ((t (:background "#000000"))))
- (fixed-pitch ((t (nil))))
- (font-lock-builtin-face ((t (:foreground "purple"))))
- (font-lock-comment-face ((t (:foreground "blue"))))
- (font-lock-constant-face ((t (:foreground "green4"))))
- (font-lock-doc-face ((t (:background "#f2f2f2"))))
- (font-lock-function-name-face ((t (:foreground "#008b8b"))))
- (font-lock-keyword-face ((t (:bold (bold extra-bold ultra-bold) :foreground "#a52a2a"))))
- (font-lock-string-face ((t (:background "#f2f2f2" :foreground "#ff00ff"))))
- (font-lock-type-face ((t (:foreground "ForestGreen"))))
- (font-lock-variable-name-face ((t (:foreground "#008b8b"))))
- (font-lock-warning-face ((t (:bold (bold extra-bold ultra-bold) :foreground "Red"))))
- (fringe ((t (:background "#e5e5e5"))))
- (header-line ((t (:background "grey90" :foreground "grey20"))))
- (highlight ((t (:background "darkseagreen2"))))
- (info-header-node ((t (nil))))
- (info-header-xref ((t (nil))))
- (info-menu-5 ((t (:foreground "red1"))))
- (info-menu-header ((t (:bold (bold extra-bold ultra-bold)))))
- (info-node ((t (:italic (italic oblique) :bold (bold extra-bold ultra-bold) :foreground "brown"))))
- (info-xref ((t (:bold (bold extra-bold ultra-bold) :foreground "magenta4"))))
- (isearch ((t (:background "magenta4" :foreground "lightskyblue1"))))
- (isearch-lazy-highlight-face ((t (:background "paleturquoise"))))
- (italic ((t (:italic (italic oblique)))))
- (menu ((t (nil))))
- (mode-line ((t (:background "grey75" :foreground "black"))))
- (mouse ((t (:background "#000000"))))
- (region ((t (:background "lightgoldenrod2"))))
- (rpm-spec-dir-face ((t (:foreground "green"))))
- (rpm-spec-doc-face ((t (:foreground "magenta"))))
- (rpm-spec-ghost-face ((t (:foreground "red"))))
- (rpm-spec-macro-face ((t (:foreground "purple"))))
- (rpm-spec-package-face ((t (:foreground "red"))))
- (rpm-spec-tag-face ((t (:foreground "blue"))))
- (scroll-bar ((t (:background "grey75" :foreground "#000000"))))
- (secondary-selection ((t (:background "yellow"))))
- (sh-heredoc-face ((t (:foreground "tan"))))
- (show-paren-match-face ((t (:background "turquoise"))))
- (show-paren-mismatch-face ((t (:background "purple" :foreground "white"))))
- (tool-bar ((t (:background "grey75" :foreground "black"))))
- (tooltip ((t (:background "lightyellow" :foreground "black"))))
- (trailing-whitespace ((t (:background "red"))))
- (underline ((t (:underline t))))
- (variable-pitch ((t (nil))))
- (widget-button-face ((t (:bold (bold extra-bold ultra-bold)))))
- (widget-button-pressed-face ((t (:foreground "red"))))
- (widget-documentation-face ((t (:foreground "dark green"))))
- (widget-field-face ((t (:background "gray85"))))
- (widget-inactive-face ((t (:foreground "dim gray"))))
- (widget-single-line-field-face ((t (:background "gray85")))))))
-
- (defun color-theme-calm-forest ()
- "Color theme by Artur Hefczyc, created 2003-04-18."
- (interactive)
- (color-theme-install
- '(color-theme-calm-forest
- ((background-color . "gray12")
- (background-mode . dark)
- (border-color . "black")
- (cursor-color . "orange")
- (foreground-color . "green")
- (mouse-color . "yellow"))
- ((help-highlight-face . underline)
- (list-matching-lines-face . bold)
- (senator-eldoc-use-color . t)
- (view-highlight-face . highlight)
- (widget-mouse-face . highlight))
- (default ((t (:stipple nil :background "gray12" :foreground "green" :inverse-video nil :box nil
- :strike-through nil :overline nil :underline nil :slant normal :weight normal :height 98 :width
- normal :family "outline-courier new"))))
- (Info-title-1-face ((t (:bold t :weight bold :family "helv" :height 1.728))))
- (Info-title-2-face ((t (:bold t :family "helv" :weight bold :height 1.44))))
- (Info-title-3-face ((t (:bold t :weight bold :family "helv" :height 1.2))))
- (Info-title-4-face ((t (:bold t :family "helv" :weight bold))))
- (bold ((t (:bold t :weight bold))))
- (bold-italic ((t (:italic t :bold t :slant italic :weight bold))))
- (border ((t (:background "black"))))
- (comint-highlight-input ((t (:bold t :weight bold))))
- (comint-highlight-prompt ((t (:foreground "cyan"))))
- (cparen-around-andor-face ((t (:bold t :foreground "maroon" :weight bold))))
- (cparen-around-begin-face ((t (:foreground "maroon"))))
- (cparen-around-conditional-face ((t (:bold t :foreground "RoyalBlue" :weight bold))))
- (cparen-around-define-face ((t (:bold t :foreground "Blue" :weight bold))))
- (cparen-around-lambda-face ((t (:foreground "LightSeaGreen"))))
- (cparen-around-letdo-face ((t (:bold t :foreground "LightSeaGreen" :weight bold))))
- (cparen-around-quote-face ((t (:foreground "SaddleBrown"))))
- (cparen-around-set!-face ((t (:foreground "OrangeRed"))))
- (cparen-around-syntax-rules-face ((t (:foreground "Magenta"))))
- (cparen-around-vector-face ((t (:foreground "chocolate"))))
- (cparen-binding-face ((t (:foreground "ForestGreen"))))
- (cparen-binding-list-face ((t (:bold t :foreground "ForestGreen" :weight bold))))
- (cparen-conditional-clause-face ((t (:foreground "RoyalBlue"))))
- (cparen-normal-paren-face ((t (:foreground "grey50"))))
- (cursor ((t (:background "orange"))))
- (custom-button-face ((t (:background "lightgrey" :foreground "black" :box (:line-width 2 :style
- released-button)))))
- (custom-button-pressed-face ((t (:background "lightgrey" :foreground "black" :box (:line-width
- 2 :style pressed-button)))))
- (custom-changed-face ((t (:background "blue" :foreground "white"))))
- (custom-comment-face ((t (:background "dim gray"))))
- (custom-comment-tag-face ((t (:foreground "gray80"))))
- (custom-documentation-face ((t (nil))))
- (custom-face-tag-face ((t (:bold t :family "helv" :weight bold :height 1.2))))
- (custom-group-tag-face ((t (:bold t :foreground "light blue" :weight bold :height 1.2))))
- (custom-group-tag-face-1 ((t (:bold t :family "helv" :foreground "pink" :weight bold :height
- 1.2))))
- (custom-invalid-face ((t (:background "red" :foreground "yellow"))))
- (custom-modified-face ((t (:background "blue" :foreground "white"))))
- (custom-rogue-face ((t (:background "black" :foreground "pink"))))
- (custom-saved-face ((t (:underline t))))
- (custom-set-face ((t (:background "white" :foreground "blue"))))
- (custom-state-face ((t (:foreground "lime green"))))
- (custom-variable-button-face ((t (:bold t :underline t :weight bold))))
- (custom-variable-tag-face ((t (:bold t :family "helv" :foreground "light blue" :weight bold
- :height 1.2))))
- (eieio-custom-slot-tag-face ((t (:foreground "light blue"))))
- (extra-whitespace-face ((t (:background "pale green"))))
- (fixed-pitch ((t (:family "courier"))))
- (font-latex-bold-face ((t (:bold t :foreground "OliveDrab" :weight bold))))
- (font-latex-italic-face ((t (:italic t :foreground "OliveDrab" :slant italic))))
- (font-latex-math-face ((t (:foreground "burlywood"))))
- (font-latex-sedate-face ((t (:foreground "LightGray"))))
- (font-latex-string-face ((t (:foreground "RosyBrown"))))
- (font-latex-warning-face ((t (:bold t :foreground "Red" :weight bold))))
- (font-lock-builtin-face ((t (:foreground "LightSteelBlue"))))
- (font-lock-comment-face ((t (:foreground "chocolate1"))))
- (font-lock-constant-face ((t (:foreground "Aquamarine"))))
- (font-lock-doc-face ((t (:foreground "LightSalmon"))))
- (font-lock-function-name-face ((t (:foreground "LightSkyBlue"))))
- (font-lock-keyword-face ((t (:foreground "Cyan"))))
- (font-lock-string-face ((t (:foreground "LightSalmon"))))
- (font-lock-type-face ((t (:foreground "PaleGreen"))))
- (font-lock-variable-name-face ((t (:foreground "LightGoldenrod"))))
- (font-lock-warning-face ((t (:bold t :foreground "Pink" :weight bold))))
- (fringe ((t (:background "grey10"))))
- (header-line ((t (:box (:line-width -1 :style released-button) :background "grey20" :foreground
- "grey90" :box nil))))
- (highlight ((t (:background "darkolivegreen"))))
- (info-header-node ((t (:italic t :bold t :weight bold :slant italic :foreground "white"))))
- (info-header-xref ((t (:bold t :weight bold :foreground "cyan"))))
- (info-menu-5 ((t (:foreground "red1"))))
- (info-menu-header ((t (:bold t :family "helv" :weight bold))))
- (info-node ((t (:italic t :bold t :foreground "white" :slant italic :weight bold))))
- (info-xref ((t (:bold t :foreground "cyan" :weight bold))))
- (isearch ((t (:background "palevioletred2" :foreground "brown4"))))
- (isearch-lazy-highlight-face ((t (:background "paleturquoise4"))))
- (italic ((t (:italic t :slant italic))))
- (jde-bug-breakpoint-cursor ((t (:background "brown" :foreground "cyan"))))
- (jde-db-active-breakpoint-face ((t (:background "red" :foreground "black"))))
- (jde-db-requested-breakpoint-face ((t (:background "yellow" :foreground "black"))))
- (jde-db-spec-breakpoint-face ((t (:background "green" :foreground "black"))))
- (jde-java-font-lock-api-face ((t (:foreground "light goldenrod"))))
- (jde-java-font-lock-bold-face ((t (:bold t :weight bold))))
- (jde-java-font-lock-code-face ((t (nil))))
- (jde-java-font-lock-constant-face ((t (:foreground "Aquamarine"))))
- (jde-java-font-lock-doc-tag-face ((t (:foreground "light coral"))))
- (jde-java-font-lock-italic-face ((t (:italic t :slant italic))))
- (jde-java-font-lock-link-face ((t (:foreground "blue" :underline t :slant normal))))
- (jde-java-font-lock-modifier-face ((t (:foreground "LightSteelBlue"))))
- (jde-java-font-lock-number-face ((t (:foreground "LightSalmon"))))
- (jde-java-font-lock-operator-face ((t (:foreground "medium blue"))))
- (jde-java-font-lock-package-face ((t (:foreground "steelblue1"))))
- (jde-java-font-lock-pre-face ((t (nil))))
- (jde-java-font-lock-underline-face ((t (:underline t))))
- (menu ((t (nil))))
- (mode-line ((t (:background "grey75" :foreground "black" :box (:line-width -1 :style
- released-button)))))
- (mouse ((t (:background "yellow"))))
- (region ((t (:background "blue3"))))
- (scroll-bar ((t (nil))))
- (secondary-selection ((t (:background "SkyBlue4"))))
- (semantic-dirty-token-face ((t (:background "gray10"))))
- (semantic-unmatched-syntax-face ((t (:underline "red"))))
- (senator-intangible-face ((t (:foreground "gray75"))))
- (senator-momentary-highlight-face ((t (:background "gray30"))))
- (senator-read-only-face ((t (:background "#664444"))))
- (show-paren-match-face ((t (:background "turquoise"))))
- (show-paren-mismatch-face ((t (:background "purple" :foreground "white"))))
- (speedbar-button-face ((t (:foreground "green3"))))
- (speedbar-directory-face ((t (:foreground "light blue"))))
- (speedbar-file-face ((t (:foreground "cyan"))))
- (speedbar-highlight-face ((t (:background "sea green"))))
- (speedbar-selected-face ((t (:foreground "red" :underline t))))
- (speedbar-separator-face ((t (:background "blue" :foreground "white" :overline "gray"))))
- (speedbar-tag-face ((t (:foreground "yellow"))))
- (tool-bar ((t (:background "grey75" :foreground "black" :box (:line-width 1 :style
- released-button)))))
- (trailing-whitespace ((t (:background "red"))))
- (underline ((t (:underline t))))
- (variable-pitch ((t (:family "helv"))))
- (widget-button-face ((t (:bold t :weight bold))))
- (widget-button-pressed-face ((t (:foreground "red"))))
- (widget-documentation-face ((t (:foreground "lime green"))))
- (widget-field-face ((t (:background "dim gray"))))
- (widget-inactive-face ((t (:foreground "light gray"))))
- (widget-single-line-field-face ((t (:background "dim gray")))))))
-
- (defun color-theme-lawrence ()
- "Color theme by lawrence mitchell <wence@gmx.li>.
- Mainly shades of green.
- Contains faces for erc, gnus, most of jde."
- (interactive)
- (color-theme-install
- '(color-theme-lawrence
- ((background-color . "black")
- (background-mode . dark)
- (border-color . "black")
- (cursor-color . "green")
- (foreground-color . "#00CC00")
- (mouse-color . "black"))
- ((erc-button-face . bold)
- (erc-button-mouse-face . highlight)
- (gnus-article-button-face . bold)
- (gnus-article-mouse-face . highlight)
- (gnus-cite-attribution-face . gnus-cite-attribution-face)
- (gnus-mouse-face . highlight)
- (gnus-server-agent-face . gnus-server-agent-face)
- (gnus-server-closed-face . gnus-server-closed-face)
- (gnus-server-denied-face . gnus-server-denied-face)
- (gnus-server-offline-face . gnus-server-offline-face)
- (gnus-server-opened-face . gnus-server-opened-face)
- (gnus-signature-face . gnus-signature-face)
- (gnus-summary-selected-face . gnus-summary-selected-face)
- (gnus-treat-display-face . head)
- (gnus-treat-display-xface . head)
- (list-matching-lines-buffer-name-face . underline)
- (list-matching-lines-face . bold)
- (paren-match-face . paren-face-match)
- (paren-mismatch-face . paren-face-mismatch)
- (paren-no-match-face . paren-face-no-match)
- (sgml-set-face . t)
- (tags-tag-face . default)
- (view-highlight-face . highlight)
- (widget-mouse-face . highlight))
- (default ((t (nil))))
- (Buffer-menu-buffer-face ((t (:bold t :weight bold))))
- (bg:erc-color-face0 ((t (:background "White"))))
- (bg:erc-color-face1 ((t (:background "black"))))
- (bg:erc-color-face10 ((t (:background "lightblue1"))))
- (bg:erc-color-face11 ((t (:background "cyan"))))
- (bg:erc-color-face12 ((t (:background "blue"))))
- (bg:erc-color-face13 ((t (:background "deeppink"))))
- (bg:erc-color-face14 ((t (:background "gray50"))))
- (bg:erc-color-face15 ((t (:background "gray90"))))
- (bg:erc-color-face2 ((t (:background "blue4"))))
- (bg:erc-color-face3 ((t (:background "green4"))))
- (bg:erc-color-face4 ((t (:background "red"))))
- (bg:erc-color-face5 ((t (:background "brown"))))
- (bg:erc-color-face6 ((t (:background "purple"))))
- (bg:erc-color-face7 ((t (:background "orange"))))
- (bg:erc-color-face8 ((t (:background "yellow"))))
- (bg:erc-color-face9 ((t (:background "green"))))
- (bold ((t (:bold t :foreground "#00CC00" :background "black"))))
- (bold-italic ((t (:italic t :bold t :slant oblique :weight semi-bold))))
- (border ((t (:background "black"))))
- (button ((t (:underline t))))
- (comint-highlight-input ((t (nil))))
- (comint-highlight-prompt ((t (:bold t :foreground "#00CC00" :background "black" :weight bold))))
- (cursor ((t (:background "green"))))
- (custom-button-face ((t (:bold t :foreground "#00CC00" :background "black"))))
- (custom-button-pressed-face ((t (nil))))
- (custom-changed-face ((t (:italic t :foreground "#00CC00" :background "black" :slant oblique))))
- (custom-comment-face ((t (nil))))
- (custom-comment-tag-face ((t (nil))))
- (custom-documentation-face ((t (nil))))
- (custom-face-tag-face ((t (nil))))
- (custom-group-tag-face ((t (nil))))
- (custom-group-tag-face-1 ((t (nil))))
- (custom-invalid-face ((t (:foreground "#00CC00" :background "black" :strike-through t))))
- (custom-modified-face ((t (nil))))
- (custom-rogue-face ((t (nil))))
- (custom-saved-face ((t (nil))))
- (custom-set-face ((t (nil))))
- (custom-state-face ((t (nil))))
- (custom-variable-button-face ((t (nil))))
- (custom-variable-tag-face ((t (nil))))
- (erc-action-face ((t (:bold t :weight semi-bold))))
- (erc-bold-face ((t (:bold t :weight bold))))
- (erc-current-nick-face ((t (:bold t :foreground "LightSeaGreen" :weight semi-bold))))
- (erc-dangerous-host-face ((t (:foreground "red"))))
- (erc-default-face ((t (nil))))
- (erc-direct-msg-face ((t (:foreground "IndianRed"))))
- (erc-error-face ((t (:bold t :weight semi-bold :background "darkblue" :foreground "#00CC00"))))
- (erc-fool-face ((t (:foreground "dim gray"))))
- (erc-input-face ((t (:foreground "springgreen"))))
- (erc-inverse-face ((t (:bold t :background "Darkgreen" :foreground "Black" :weight semi-bold))))
- (erc-keyword-face ((t (:bold t :foreground "pale green" :weight bold))))
- (erc-nick-default-face ((t (:bold t :weight semi-bold))))
- (erc-nick-msg-face ((t (:bold t :foreground "springgreen" :weight semi-bold))))
- (erc-notice-face ((t (:foreground "seagreen" :weight normal))))
- (erc-pal-face ((t (:bold t :foreground "Magenta" :weight bold))))
- (erc-prompt-face ((t (:bold t :background "lightBlue2" :foreground "Black" :weight semi-bold))))
- (erc-timestamp-face ((t (:foreground "seagreen" :weight normal))))
- (erc-underline-face ((t (:underline t))))
- (fg:erc-color-face0 ((t (:foreground "White"))))
- (fg:erc-color-face1 ((t (:foreground "black"))))
- (fg:erc-color-face10 ((t (:foreground "lightblue1"))))
- (fg:erc-color-face11 ((t (:foreground "cyan"))))
- (fg:erc-color-face12 ((t (:foreground "blue"))))
- (fg:erc-color-face13 ((t (:foreground "deeppink"))))
- (fg:erc-color-face14 ((t (:foreground "gray50"))))
- (fg:erc-color-face15 ((t (:foreground "gray90"))))
- (fg:erc-color-face2 ((t (:foreground "blue4"))))
- (fg:erc-color-face3 ((t (:foreground "green4"))))
- (fg:erc-color-face4 ((t (:foreground "red"))))
- (fg:erc-color-face5 ((t (:foreground "brown"))))
- (fg:erc-color-face6 ((t (:foreground "purple"))))
- (fg:erc-color-face7 ((t (:foreground "orange"))))
- (fg:erc-color-face8 ((t (:foreground "yellow"))))
- (fg:erc-color-face9 ((t (:foreground "green"))))
- (fixed-pitch ((t (nil))))
- (font-latex-string-face ((t (:bold t :weight semi-bold :foreground "seagreen" :background "black"))))
- (font-latex-warning-face ((t (:bold t :weight semi-bold :background "darkblue" :foreground "#00CC00"))))
- (font-lock-builtin-face ((t (:foreground "seagreen1"))))
- (font-lock-comment-face ((t (:background "black" :foreground "medium spring green"))))
- (font-lock-constant-face ((t (nil))))
- (font-lock-doc-face ((t (:bold t :background "black" :foreground "seagreen" :weight semi-bold))))
- (font-lock-function-name-face ((t (:bold t :foreground "#00CC00" :background "black"))))
- (font-lock-keyword-face ((t (:bold t :background "black" :foreground "green" :underline t :weight semi-bold))))
- (font-lock-preprocessor-face ((t (:foreground "#00ccdd"))))
- (font-lock-string-face ((t (:bold t :background "black" :foreground "seagreen" :weight semi-bold))))
- (font-lock-type-face ((t (nil))))
- (font-lock-variable-name-face ((t (nil))))
- (font-lock-warning-face ((t (:bold t :foreground "#00CC00" :background "darkblue" :weight semi-bold))))
- (fringe ((t (:foreground "#00CC00" :background "#151515"))))
- (gnus-cite-attribution-face ((t (:italic t :foreground "#00CC00" :background "black" :slant italic))))
- (gnus-cite-face-1 ((t (:background "black" :foreground "springgreen"))))
- (gnus-cite-face-10 ((t (nil))))
- (gnus-cite-face-11 ((t (nil))))
- (gnus-cite-face-2 ((t (:background "black" :foreground "lightseagreen"))))
- (gnus-cite-face-3 ((t (:background "black" :foreground "darkseagreen"))))
- (gnus-cite-face-4 ((t (:background "black" :foreground "forestgreen"))))
- (gnus-cite-face-5 ((t (:background "black" :foreground "springgreen"))))
- (gnus-cite-face-6 ((t (:background "black" :foreground "springgreen"))))
- (gnus-cite-face-7 ((t (:background "black" :foreground "springgreen"))))
- (gnus-cite-face-8 ((t (:background "black" :foreground "springgreen"))))
- (gnus-cite-face-9 ((t (:background "black" :foreground "springgreen"))))
- (gnus-emphasis-bold ((t (:bold t :weight semi-bold))))
- (gnus-emphasis-bold-italic ((t (:italic t :bold t :slant italic :weight semi-bold))))
- (gnus-emphasis-highlight-words ((t (:bold t :foreground "#00CC00" :background "black" :underline t :weight bold))))
- (gnus-emphasis-italic ((t (:italic t :slant italic))))
- (gnus-emphasis-strikethru ((t (nil))))
- (gnus-emphasis-underline ((t (:underline t))))
- (gnus-emphasis-underline-bold ((t (:bold t :underline t :weight semi-bold))))
- (gnus-emphasis-underline-bold-italic ((t (:italic t :bold t :underline t :slant italic :weight semi-bold))))
- (gnus-emphasis-underline-italic ((t (:italic t :underline t :slant italic))))
- (gnus-group-mail-1-empty-face ((t (nil))))
- (gnus-group-mail-1-face ((t (:bold t :foreground "#00CC00" :background "black" :weight bold))))
- (gnus-group-mail-2-empty-face ((t (nil))))
- (gnus-group-mail-2-face ((t (:bold t :foreground "#00CC00" :background "black" :weight bold))))
- (gnus-group-mail-3-empty-face ((t (nil))))
- (gnus-group-mail-3-face ((t (:bold t :foreground "#00CC00" :background "black" :weight bold))))
- (gnus-group-mail-low-empty-face ((t (nil))))
- (gnus-group-mail-low-face ((t (:bold t :foreground "#00CC00" :background "black" :weight bold))))
- (gnus-group-news-1-empty-face ((t (nil))))
- (gnus-group-news-1-face ((t (:bold t :foreground "#00CC00" :background "black" :weight bold))))
- (gnus-group-news-2-empty-face ((t (nil))))
- (gnus-group-news-2-face ((t (:bold t :foreground "#00CC00" :background "black" :weight bold))))
- (gnus-group-news-3-empty-face ((t (nil))))
- (gnus-group-news-3-face ((t (:bold t :foreground "#00CC00" :background "black" :weight bold))))
- (gnus-group-news-4-empty-face ((t (nil))))
- (gnus-group-news-4-face ((t (:bold t :foreground "#00CC00" :background "black" :weight bold))))
- (gnus-group-news-5-empty-face ((t (nil))))
- (gnus-group-news-5-face ((t (:bold t :foreground "#00CC00" :background "black" :weight bold))))
- (gnus-group-news-6-empty-face ((t (nil))))
- (gnus-group-news-6-face ((t (:bold t :foreground "#00CC00" :background "black" :weight bold))))
- (gnus-group-news-low-empty-face ((t (nil))))
- (gnus-group-news-low-face ((t (:bold t :foreground "#00CC00" :background "black" :weight bold))))
- (gnus-header-content-face ((t (:background "black" :foreground "springgreen"))))
- (gnus-header-from-face ((t (nil))))
- (gnus-header-name-face ((t (nil))))
- (gnus-header-newsgroups-face ((t (nil))))
- (gnus-header-subject-face ((t (nil))))
- (gnus-server-agent-face ((t (:bold t :foreground "PaleTurquoise" :weight bold))))
- (gnus-server-closed-face ((t (:italic t :foreground "Light Steel Blue" :slant italic))))
- (gnus-server-denied-face ((t (:bold t :foreground "Pink" :weight semi-bold))))
- (gnus-server-offline-face ((t (:bold t :foreground "Yellow" :weight bold))))
- (gnus-server-opened-face ((t (:bold t :foreground "Green1" :weight semi-bold))))
- (gnus-signature-face ((t (:background "black" :foreground "springgreen" :slant normal))))
- (gnus-splash-face ((t (:bold t :foreground "#00CC00" :background "black" :weight bold))))
- (gnus-summary-cancelled-face ((t (:foreground "#00CC00" :background "black" :strike-through t))))
- (gnus-summary-high-ancient-face ((t (nil))))
- (gnus-summary-high-read-face ((t (nil))))
- (gnus-summary-high-ticked-face ((t (:background "black" :foreground "seagreen"))))
- (gnus-summary-high-undownloaded-face ((t (:bold t :foreground "LightGray" :weight bold))))
- (gnus-summary-high-unread-face ((t (:bold t :foreground "#00CC00" :background "black" :weight bold))))
- (gnus-summary-low-ancient-face ((t (nil))))
- (gnus-summary-low-read-face ((t (nil))))
- (gnus-summary-low-ticked-face ((t (nil))))
- (gnus-summary-low-undownloaded-face ((t (:italic t :foreground "LightGray" :slant italic :weight normal))))
- (gnus-summary-low-unread-face ((t (:bold t :foreground "#00CC00" :background "black" :weight bold))))
- (gnus-summary-normal-ancient-face ((t (nil))))
- (gnus-summary-normal-read-face ((t (nil))))
- (gnus-summary-normal-ticked-face ((t (:bold t :foreground "#00CC00" :background "black"))))
- (gnus-summary-normal-undownloaded-face ((t (:foreground "LightGray" :weight normal))))
- (gnus-summary-normal-unread-face ((t (nil))))
- (gnus-summary-selected-face ((t (:background "#101010"))))
- (gnus-x-face ((t (:background "white" :foreground "black"))))
- (header-line ((t (nil))))
- (highlight ((t (:foreground "#00CC00" :background "darkgreen"))))
- (ido-first-match-face ((t (:bold t :weight bold))))
- (ido-indicator-face ((t (:background "red" :foreground "yellow" :width condensed))))
- (ido-only-match-face ((t (:foreground "ForestGreen"))))
- (ido-subdir-face ((t (:foreground "red"))))
- (isearch ((t (:background "seagreen" :foreground "black"))))
- (isearch-lazy-highlight-face ((t (:background "darkseagreen" :foreground "black"))))
- (italic ((t (:italic t :foreground "#00CC00" :background "black" :slant oblique))))
- (menu ((t (:bold t :background "black" :foreground "green" :box (:line-width -1 :color "#606060") :weight semi-bold))))
- (message-cited-text-face ((t (:italic t :foreground "#00CC00" :background "black" :slant oblique))))
- (message-header-cc-face ((t (nil))))
- (message-header-name-face ((t (nil))))
- (message-header-newsgroups-face ((t (:bold t :foreground "#00CC00" :background "black"))))
- (message-header-other-face ((t (:bold t :foreground "#00CC00" :background "black"))))
- (message-header-subject-face ((t (:bold t :foreground "#00CC00" :background "black"))))
- (message-header-to-face ((t (:bold t :foreground "#00CC00" :background "black"))))
- (message-header-xheader-face ((t (nil))))
- (message-mml-face ((t (:italic t :foreground "#00CC00" :background "black" :slant oblique))))
- (message-separator-face ((t (nil))))
- (minibuffer-prompt ((t (:background "black" :foreground "seagreen"))))
- (mode-line ((t (:bold t :background "#404040" :foreground "green" :box (:line-width -1 :color "#606060") :weight semi-bold))))
- (mode-line-inactive ((t (:bold t :weight semi-bold :box (:line-width -1 :color "#606060") :foreground "green" :background "#101010"))))
- (mouse ((t (:background "black"))))
- (paren-face ((t (:background "black" :foreground "darkgreen"))))
- (paren-face-match ((t (:background "black" :foreground "springgreen"))))
- (paren-face-mismatch ((t (:foreground "#00CC00" :background "black" :strike-through t))))
- (paren-face-no-match ((t (:background "black" :foreground "red"))))
- (region ((t (:background "seagreen" :foreground "black"))))
- (scroll-bar ((t (nil))))
- (secondary-selection ((t (:background "darkseagreen" :foreground "black"))))
- (semantic-dirty-token-face ((t (:background "gray10"))))
- (semantic-unmatched-syntax-face ((t (:underline "red"))))
- (sgml-end-tag-face ((t (:foreground "seagreen"))))
- (sgml-start-tag-face ((t (:foreground "seagreen"))))
- (tabbar-button-face ((t (:background "black" :foreground "#00cc00" :box (:line-width 2 :color "black" :style released-button)))))
- (tabbar-default-face ((t (:background "black" :foreground "#00cc00"))))
- (tabbar-selected-face ((t (:background "black" :foreground "springgreen" :box (:line-width 2 :color "black" :style released-button)))))
- (tabbar-separator-face ((t (:foreground "#00cc00" :background "black"))))
- (tabbar-unselected-face ((t (:background "black" :foreground "seagreen" :box (:line-width 2 :color "black" :style pressed-button)))))
- (tool-bar ((t (:box (:line-width 1 :style released-button)))))
- (tooltip ((t (nil))))
- (trailing-whitespace ((t (:background "lightseagreen" :foreground "black"))))
- (underline ((t (:foreground "#00CC00" :background "black" :underline t))))
- (variable-pitch ((t (:underline nil :foreground "#00CC00" :background "black"))))
- (widget-button-face ((t (:bold t :foreground "#00CC00" :background "black"))))
- (widget-button-pressed-face ((t (nil))))
- (widget-documentation-face ((t (nil))))
- (widget-field-face ((t (:italic t :foreground "#00CC00" :background "black" :slant oblique))))
- (widget-inactive-face ((t (nil))))
- (widget-single-line-field-face ((t (nil)))))))
-
- (defun color-theme-matrix ()
- "Color theme by walterh@rocketmail.com, created 2003-10-16."
- (interactive)
- (color-theme-install
- '(color-theme-matrix
- ((background-color . "black")
- (background-mode . dark)
- (background-toolbar-color . "bisque")
- (border-color . "orange")
- (bottom-toolbar-shadow-color . "#909099999999")
- (cursor-color . "#7eff00")
- (foreground-color . "#7eff00")
- (mouse-color . "#7eff00")
- (top-toolbar-shadow-color . "#ffffffffffff"))
- ((help-highlight-face . underline)
- (list-matching-lines-face . bold)
- (rmail-highlight-face . font-lock-function-name-face)
- (view-highlight-face . highlight)
- (widget-mouse-face . highlight))
- (default ((t (:stipple nil :background "black" :foreground
- "#7eff00" :inverse-video nil :box nil :strike-through nil :overline nil
- :underline nil :slant normal :weight normal :height 90 :width normal
- :family "outline-courier new"))))
- (Buffer-menu-buffer-face ((t (nil))))
- (CUA-global-mark-face ((t (nil))))
- (CUA-rectangle-face ((t (nil))))
- (CUA-rectangle-noselect-face ((t (nil))))
- (Info-title-1-face ((t (nil))))
- (Info-title-2-face ((t (nil))))
- (Info-title-3-face ((t (nil))))
- (Info-title-4-face ((t (nil))))
- (antlr-font-lock-keyword-face ((t (nil))))
- (antlr-font-lock-literal-face ((t (nil))))
- (antlr-font-lock-ruledef-face ((t (nil))))
- (antlr-font-lock-ruleref-face ((t (nil))))
- (antlr-font-lock-tokendef-face ((t (nil))))
- (antlr-font-lock-tokenref-face ((t (nil))))
- (bbdb-company ((t (nil))))
- (bbdb-field-name ((t (nil))))
- (bbdb-field-value ((t (nil))))
- (bbdb-name ((t (nil))))
- (bg:erc-color-face0 ((t (nil))))
- (bg:erc-color-face1 ((t (nil))))
- (bg:erc-color-face10 ((t (nil))))
- (bg:erc-color-face11 ((t (nil))))
- (bg:erc-color-face12 ((t (nil))))
- (bg:erc-color-face13 ((t (nil))))
- (bg:erc-color-face14 ((t (nil))))
- (bg:erc-color-face15 ((t (nil))))
- (bg:erc-color-face2 ((t (nil))))
- (bg:erc-color-face3 ((t (nil))))
- (bg:erc-color-face4 ((t (nil))))
- (bg:erc-color-face5 ((t (nil))))
- (bg:erc-color-face6 ((t (nil))))
- (bg:erc-color-face7 ((t (nil))))
- (bg:erc-color-face8 ((t (nil))))
- (bg:erc-color-face9 ((t (nil))))
- (blank-space-face ((t (nil))))
- (blank-tab-face ((t (nil))))
- (blue ((t (nil))))
- (bold ((t (:bold t :weight bold))))
- (bold-italic ((t (:bold t :weight bold))))
- (border ((t (:background "orange"))))
- (border-glyph ((t (nil))))
- (buffers-tab ((t (nil))))
- (button ((t (nil))))
- (calendar-today-face ((t (nil))))
- (change-log-acknowledgement-face ((t (nil))))
- (change-log-conditionals-face ((t (nil))))
- (change-log-date-face ((t (nil))))
- (change-log-email-face ((t (nil))))
- (change-log-file-face ((t (nil))))
- (change-log-function-face ((t (nil))))
- (change-log-list-face ((t (nil))))
- (change-log-name-face ((t (nil))))
- (clearcase-dired-checkedout-face ((t (nil))))
- (comint-highlight-input ((t (nil))))
- (comint-highlight-prompt ((t (nil))))
- (cparen-around-andor-face ((t (nil))))
- (cparen-around-begin-face ((t (nil))))
- (cparen-around-conditional-face ((t (nil))))
- (cparen-around-define-face ((t (nil))))
- (cparen-around-lambda-face ((t (nil))))
- (cparen-around-letdo-face ((t (nil))))
- (cparen-around-quote-face ((t (nil))))
- (cparen-around-set!-face ((t (nil))))
- (cparen-around-syntax-rules-face ((t (nil))))
- (cparen-around-vector-face ((t (nil))))
- (cparen-binding-face ((t (nil))))
- (cparen-binding-list-face ((t (nil))))
- (cparen-conditional-clause-face ((t (nil))))
- (cparen-normal-paren-face ((t (nil))))
- (cperl-array-face ((t (nil))))
- (cperl-hash-face ((t (nil))))
- (cperl-invalid-face ((t (nil))))
- (cperl-nonoverridable-face ((t (nil))))
- (cursor ((t (:background "#7eff00" :foreground "black"))))
- (custom-button-face ((t (nil))))
- (custom-button-pressed-face ((t (nil))))
- (custom-changed-face ((t (nil))))
- (custom-comment-face ((t (nil))))
- (custom-comment-tag-face ((t (nil))))
- (custom-documentation-face ((t (nil))))
- (custom-face-tag-face ((t (nil))))
- (custom-group-tag-face ((t (nil))))
- (custom-group-tag-face-1 ((t (nil))))
- (custom-invalid-face ((t (nil))))
- (custom-modified-face ((t (nil))))
- (custom-rogue-face ((t (nil))))
- (custom-saved-face ((t (nil))))
- (custom-set-face ((t (nil))))
- (custom-state-face ((t (nil))))
- (custom-variable-button-face ((t (nil))))
- (custom-variable-tag-face ((t (nil))))
- (cvs-filename-face ((t (nil))))
- (cvs-handled-face ((t (nil))))
- (cvs-header-face ((t (nil))))
- (cvs-marked-face ((t (nil))))
- (cvs-msg-face ((t (nil))))
- (cvs-need-action-face ((t (nil))))
- (cvs-unknown-face ((t (nil))))
- (cyan ((t (nil))))
- (diary-face ((t (nil))))
- (diff-added-face ((t (nil))))
- (diff-changed-face ((t (nil))))
- (diff-context-face ((t (nil))))
- (diff-file-header-face ((t (nil))))
- (diff-function-face ((t (nil))))
- (diff-header-face ((t (nil))))
- (diff-hunk-header-face ((t (nil))))
- (diff-index-face ((t (nil))))
- (diff-nonexistent-face ((t (nil))))
- (diff-removed-face ((t (nil))))
- (dired-face-boring ((t (nil))))
- (dired-face-directory ((t (nil))))
- (dired-face-executable ((t (nil))))
- (dired-face-flagged ((t (nil))))
- (dired-face-header ((t (nil))))
- (dired-face-marked ((t (nil))))
- (dired-face-permissions ((t (nil))))
- (dired-face-setuid ((t (nil))))
- (dired-face-socket ((t (nil))))
- (dired-face-symlink ((t (nil))))
- (display-time-mail-balloon-enhance-face ((t (nil))))
- (display-time-mail-balloon-gnus-group-face ((t (nil))))
- (display-time-time-balloon-face ((t (nil))))
- (ebrowse-default-face ((t (nil))))
- (ebrowse-file-name-face ((t (nil))))
- (ebrowse-member-attribute-face ((t (nil))))
- (ebrowse-member-class-face ((t (nil))))
- (ebrowse-progress-face ((t (nil))))
- (ebrowse-root-class-face ((t (nil))))
- (ebrowse-tree-mark-face ((t (nil))))
- (ecb-sources-face ((t (nil))))
- (edb-inter-field-face ((t (nil))))
- (edb-normal-summary-face ((t (nil))))
- (ediff-current-diff-face-A ((t (nil))))
- (ediff-current-diff-face-Ancestor ((t (nil))))
- (ediff-current-diff-face-B ((t (nil))))
- (ediff-current-diff-face-C ((t (nil))))
- (ediff-even-diff-face-A ((t (nil))))
- (ediff-even-diff-face-Ancestor ((t (nil))))
- (ediff-even-diff-face-B ((t (nil))))
- (ediff-even-diff-face-C ((t (nil))))
- (ediff-fine-diff-face-A ((t (nil))))
- (ediff-fine-diff-face-Ancestor ((t (nil))))
- (ediff-fine-diff-face-B ((t (nil))))
- (ediff-fine-diff-face-C ((t (nil))))
- (ediff-odd-diff-face-A ((t (nil))))
- (ediff-odd-diff-face-Ancestor ((t (nil))))
- (ediff-odd-diff-face-B ((t (nil))))
- (ediff-odd-diff-face-C ((t (nil))))
- (eieio-custom-slot-tag-face ((t (nil))))
- (emacs-wiki-bad-link-face ((t (nil))))
- (emacs-wiki-link-face ((t (nil))))
- (erc-action-face ((t (nil))))
- (erc-bold-face ((t (nil))))
- (erc-current-nick-face ((t (nil))))
- (erc-dangerous-host-face ((t (nil))))
- (erc-default-face ((t (nil))))
- (erc-direct-msg-face ((t (nil))))
- (erc-error-face ((t (nil))))
- (erc-fool-face ((t (nil))))
- (erc-highlight-face ((t (nil))))
- (erc-input-face ((t (nil))))
- (erc-inverse-face ((t (nil))))
- (erc-keyword-face ((t (nil))))
- (erc-nick-default-face ((t (nil))))
- (erc-nick-msg-face ((t (nil))))
- (erc-notice-face ((t (nil))))
- (erc-pal-face ((t (nil))))
- (erc-prompt-face ((t (nil))))
- (erc-timestamp-face ((t (nil))))
- (erc-underline-face ((t (nil))))
- (eshell-ls-archive-face ((t (nil))))
- (eshell-ls-backup-face ((t (nil))))
- (eshell-ls-clutter-face ((t (nil))))
- (eshell-ls-directory-face ((t (nil))))
- (eshell-ls-executable-face ((t (nil))))
- (eshell-ls-missing-face ((t (nil))))
- (eshell-ls-picture-face ((t (nil))))
- (eshell-ls-product-face ((t (nil))))
- (eshell-ls-readonly-face ((t (nil))))
- (eshell-ls-special-face ((t (nil))))
- (eshell-ls-symlink-face ((t (nil))))
- (eshell-ls-text-face ((t (nil))))
- (eshell-ls-todo-face ((t (nil))))
- (eshell-ls-unreadable-face ((t (nil))))
- (eshell-prompt-face ((t (nil))))
- (eshell-test-failed-face ((t (nil))))
- (eshell-test-ok-face ((t (nil))))
- (excerpt ((t (nil))))
- (extra-whitespace-face ((t (nil))))
- (ff-paths-non-existant-file-face ((t (nil))))
- (fg:black ((t (nil))))
- (fg:erc-color-face0 ((t (nil))))
- (fg:erc-color-face1 ((t (nil))))
- (fg:erc-color-face10 ((t (nil))))
- (fg:erc-color-face11 ((t (nil))))
- (fg:erc-color-face12 ((t (nil))))
- (fg:erc-color-face13 ((t (nil))))
- (fg:erc-color-face14 ((t (nil))))
- (fg:erc-color-face15 ((t (nil))))
- (fg:erc-color-face2 ((t (nil))))
- (fg:erc-color-face3 ((t (nil))))
- (fg:erc-color-face4 ((t (nil))))
- (fg:erc-color-face5 ((t (nil))))
- (fg:erc-color-face6 ((t (nil))))
- (fg:erc-color-face7 ((t (nil))))
- (fg:erc-color-face8 ((t (nil))))
- (fg:erc-color-face9 ((t (nil))))
- (fixed ((t (nil))))
- (fixed-pitch ((t (nil))))
- (fl-comment-face ((t (nil))))
- (fl-function-name-face ((t (nil))))
- (fl-keyword-face ((t (nil))))
- (fl-string-face ((t (nil))))
- (fl-type-face ((t (nil))))
- (flash-paren-face-off ((t (nil))))
- (flash-paren-face-on ((t (nil))))
- (flash-paren-face-region ((t (nil))))
- (flyspell-duplicate-face ((t (nil))))
- (flyspell-incorrect-face ((t (nil))))
- (font-latex-bold-face ((t (nil))))
- (font-latex-italic-face ((t (nil))))
- (font-latex-math-face ((t (nil))))
- (font-latex-sedate-face ((t (nil))))
- (font-latex-string-face ((t (nil))))
- (font-latex-warning-face ((t (nil))))
- (font-lock-builtin-face ((t (:foreground "pink2"))))
- (font-lock-comment-face ((t (:italic t :background "black" :slant
- italic))))
- (font-lock-constant-face ((t (:foreground "magenta"))))
- (font-lock-doc-face ((t (nil))))
- (font-lock-doc-string-face ((t (nil))))
- (font-lock-exit-face ((t (nil))))
- (font-lock-function-name-face ((t (:bold t :underline t :weight
- bold))))
- (font-lock-keyword-face ((t (:foreground "yellow1"))))
- (font-lock-other-emphasized-face ((t (nil))))
- (font-lock-other-type-face ((t (nil))))
- (font-lock-preprocessor-face ((t (nil))))
- (font-lock-reference-face ((t (nil))))
- (font-lock-special-comment-face ((t (nil))))
- (font-lock-special-keyword-face ((t (nil))))
- (font-lock-string-face ((t (:foreground "yellow2"))))
- (font-lock-type-face ((t (:foreground "LightYellow1"))))
- (font-lock-variable-name-face ((t (:foreground "light green"))))
- (font-lock-warning-face ((t (nil))))
- (fringe ((t (nil))))
- (gnus-cite-attribution-face ((t (nil))))
- (gnus-cite-face-1 ((t (nil))))
- (gnus-cite-face-10 ((t (nil))))
- (gnus-cite-face-11 ((t (nil))))
- (gnus-cite-face-2 ((t (nil))))
- (gnus-cite-face-3 ((t (nil))))
- (gnus-cite-face-4 ((t (nil))))
- (gnus-cite-face-5 ((t (nil))))
- (gnus-cite-face-6 ((t (nil))))
- (gnus-cite-face-7 ((t (nil))))
- (gnus-cite-face-8 ((t (nil))))
- (gnus-cite-face-9 ((t (nil))))
- (gnus-emphasis-bold ((t (nil))))
- (gnus-emphasis-bold-italic ((t (nil))))
- (gnus-emphasis-highlight-words ((t (nil))))
- (gnus-emphasis-italic ((t (nil))))
- (gnus-emphasis-strikethru ((t (nil))))
- (gnus-emphasis-underline ((t (nil))))
- (gnus-emphasis-underline-bold ((t (nil))))
- (gnus-emphasis-underline-bold-italic ((t (nil))))
- (gnus-emphasis-underline-italic ((t (nil))))
- (gnus-filterhist-face-1 ((t (nil))))
- (gnus-group-mail-1-empty-face ((t (nil))))
- (gnus-group-mail-1-face ((t (nil))))
- (gnus-group-mail-2-empty-face ((t (nil))))
- (gnus-group-mail-2-face ((t (nil))))
- (gnus-group-mail-3-empty-face ((t (nil))))
- (gnus-group-mail-3-face ((t (nil))))
- (gnus-group-mail-low-empty-face ((t (nil))))
- (gnus-group-mail-low-face ((t (nil))))
- (gnus-group-news-1-empty-face ((t (nil))))
- (gnus-group-news-1-face ((t (nil))))
- (gnus-group-news-2-empty-face ((t (nil))))
- (gnus-group-news-2-face ((t (nil))))
- (gnus-group-news-3-empty-face ((t (nil))))
- (gnus-group-news-3-face ((t (nil))))
- (gnus-group-news-4-empty-face ((t (nil))))
- (gnus-group-news-4-face ((t (nil))))
- (gnus-group-news-5-empty-face ((t (nil))))
- (gnus-group-news-5-face ((t (nil))))
- (gnus-group-news-6-empty-face ((t (nil))))
- (gnus-group-news-6-face ((t (nil))))
- (gnus-group-news-low-empty-face ((t (nil))))
- (gnus-group-news-low-face ((t (nil))))
- (gnus-header-content-face ((t (nil))))
- (gnus-header-from-face ((t (nil))))
- (gnus-header-name-face ((t (nil))))
- (gnus-header-newsgroups-face ((t (nil))))
- (gnus-header-subject-face ((t (nil))))
- (gnus-picon-face ((t (nil))))
- (gnus-picon-xbm-face ((t (nil))))
- (gnus-picons-face ((t (nil))))
- (gnus-picons-xbm-face ((t (nil))))
- (gnus-server-agent-face ((t (nil))))
- (gnus-server-closed-face ((t (nil))))
- (gnus-server-denied-face ((t (nil))))
- (gnus-server-offline-face ((t (nil))))
- (gnus-server-opened-face ((t (nil))))
- (gnus-signature-face ((t (nil))))
- (gnus-splash ((t (nil))))
- (gnus-splash-face ((t (nil))))
- (gnus-summary-cancelled-face ((t (nil))))
- (gnus-summary-high-ancient-face ((t (nil))))
- (gnus-summary-high-read-face ((t (nil))))
- (gnus-summary-high-ticked-face ((t (nil))))
- (gnus-summary-high-undownloaded-face ((t (nil))))
- (gnus-summary-high-unread-face ((t (nil))))
- (gnus-summary-low-ancient-face ((t (nil))))
- (gnus-summary-low-read-face ((t (nil))))
- (gnus-summary-low-ticked-face ((t (nil))))
- (gnus-summary-low-undownloaded-face ((t (nil))))
- (gnus-summary-low-unread-face ((t (nil))))
- (gnus-summary-normal-ancient-face ((t (nil))))
- (gnus-summary-normal-read-face ((t (nil))))
- (gnus-summary-normal-ticked-face ((t (nil))))
- (gnus-summary-normal-undownloaded-face ((t (nil))))
- (gnus-summary-normal-unread-face ((t (nil))))
- (gnus-summary-selected-face ((t (nil))))
- (gnus-x-face ((t (nil))))
- (green ((t (nil))))
- (gui-button-face ((t (nil))))
- (gui-element ((t (nil))))
- (header-line ((t (nil))))
- (hi-black-b ((t (nil))))
- (hi-black-hb ((t (nil))))
- (hi-blue ((t (nil))))
- (hi-blue-b ((t (nil))))
- (hi-green ((t (nil))))
- (hi-green-b ((t (nil))))
- (hi-pink ((t (nil))))
- (hi-red-b ((t (nil))))
- (hi-yellow ((t (nil))))
- (highlight ((t (:background "#7eff00" :foreground "black"))))
- (highlight-changes-delete-face ((t (nil))))
- (highlight-changes-face ((t (nil))))
- (highline-face ((t (nil))))
- (holiday-face ((t (nil))))
- (html-helper-bold-face ((t (nil))))
- (html-helper-bold-italic-face ((t (nil))))
- (html-helper-builtin-face ((t (nil))))
- (html-helper-italic-face ((t (nil))))
- (html-helper-underline-face ((t (nil))))
- (html-tag-face ((t (nil))))
- (hyper-apropos-documentation ((t (nil))))
- (hyper-apropos-heading ((t (nil))))
- (hyper-apropos-hyperlink ((t (nil))))
- (hyper-apropos-major-heading ((t (nil))))
- (hyper-apropos-section-heading ((t (nil))))
- (hyper-apropos-warning ((t (nil))))
- (ibuffer-deletion-face ((t (nil))))
- (ibuffer-marked-face ((t (nil))))
- (idlwave-help-link-face ((t (nil))))
- (idlwave-shell-bp-face ((t (nil))))
- (ido-first-match-face ((t (nil))))
- (ido-indicator-face ((t (nil))))
- (ido-only-match-face ((t (nil))))
- (ido-subdir-face ((t (nil))))
- (info-header-node ((t (nil))))
- (info-header-xref ((t (nil))))
- (info-menu-5 ((t (nil))))
- (info-menu-6 ((t (nil))))
- (info-menu-header ((t (nil))))
- (info-node ((t (nil))))
- (info-xref ((t (nil))))
- (isearch ((t (nil))))
- (isearch-lazy-highlight-face ((t (nil))))
- (isearch-secondary ((t (nil))))
- (italic ((t (:underline t))))
- (jde-bug-breakpoint-cursor ((t (nil))))
- (jde-bug-breakpoint-marker ((t (nil))))
- (jde-db-active-breakpoint-face ((t (nil))))
- (jde-db-requested-breakpoint-face ((t (nil))))
- (jde-db-spec-breakpoint-face ((t (nil))))
- (jde-java-font-lock-api-face ((t (nil))))
- (jde-java-font-lock-bold-face ((t (nil))))
- (jde-java-font-lock-code-face ((t (nil))))
- (jde-java-font-lock-constant-face ((t (nil))))
- (jde-java-font-lock-doc-tag-face ((t (nil))))
- (jde-java-font-lock-italic-face ((t (nil))))
- (jde-java-font-lock-link-face ((t (nil))))
- (jde-java-font-lock-modifier-face ((t (nil))))
- (jde-java-font-lock-number-face ((t (nil))))
- (jde-java-font-lock-operator-face ((t (nil))))
- (jde-java-font-lock-package-face ((t (nil))))
- (jde-java-font-lock-pre-face ((t (nil))))
- (jde-java-font-lock-underline-face ((t (nil))))
- (lazy-highlight-face ((t (nil))))
- (left-margin ((t (nil))))
- (linemenu-face ((t (nil))))
- (list-mode-item-selected ((t (nil))))
- (log-view-file-face ((t (nil))))
- (log-view-message-face ((t (nil))))
- (magenta ((t (nil))))
- (makefile-space-face ((t (nil))))
- (man-bold ((t (nil))))
- (man-heading ((t (nil))))
- (man-italic ((t (nil))))
- (man-xref ((t (nil))))
- (menu ((t (nil))))
- (message-cited-text ((t (nil))))
- (message-cited-text-face ((t (nil))))
- (message-header-cc-face ((t (nil))))
- (message-header-contents ((t (nil))))
- (message-header-name-face ((t (nil))))
- (message-header-newsgroups-face ((t (nil))))
- (message-header-other-face ((t (nil))))
- (message-header-subject-face ((t (nil))))
- (message-header-to-face ((t (nil))))
- (message-header-xheader-face ((t (nil))))
- (message-headers ((t (nil))))
- (message-highlighted-header-contents ((t (nil))))
- (message-mml-face ((t (nil))))
- (message-separator-face ((t (nil))))
- (message-url ((t (nil))))
- (minibuffer-prompt ((t (nil))))
- (mmm-face ((t (nil))))
- (mode-line ((t (:bold t :background "gray" :foreground "black"
- :weight bold))))
- (mode-line-inactive ((t (nil))))
- (modeline-buffer-id ((t (:background "orange" :foreground
- "black"))))
- (modeline-mousable ((t (:background "orange" :foreground
- "black"))))
- (modeline-mousable-minor-mode ((t (:background "orange"
- :foreground "black"))))
- (mouse ((t (nil))))
- (mpg123-face-cur ((t (nil))))
- (mpg123-face-slider ((t (nil))))
- (my-tab-face ((t (nil))))
- (nil ((t (nil))))
- (overlay-empty-face ((t (nil))))
- (p4-diff-del-face ((t (nil))))
- (paren-blink-off ((t (nil))))
- (paren-face ((t (nil))))
- (paren-face-match ((t (nil))))
- (paren-face-mismatch ((t (nil))))
- (paren-face-no-match ((t (nil))))
- (paren-match ((t (nil))))
- (paren-mismatch ((t (nil))))
- (paren-mismatch-face ((t (nil))))
- (paren-no-match-face ((t (nil))))
- (pointer ((t (nil))))
- (primary-selection ((t (nil))))
- (reb-match-0 ((t (nil))))
- (reb-match-1 ((t (nil))))
- (reb-match-2 ((t (nil))))
- (reb-match-3 ((t (nil))))
- (red ((t (nil))))
- (region ((t (:background "#7eff00" :foreground "black"))))
- (right-margin ((t (nil))))
- (rpm-spec-dir-face ((t (nil))))
- (rpm-spec-doc-face ((t (nil))))
- (rpm-spec-ghost-face ((t (nil))))
- (rpm-spec-macro-face ((t (nil))))
- (rpm-spec-package-face ((t (nil))))
- (rpm-spec-tag-face ((t (nil))))
- (rpm-spec-var-face ((t (nil))))
- (scroll-bar ((t (nil))))
- (secondary-selection ((t (:background "orange" :foreground
- "black"))))
- (semantic-dirty-token-face ((t (nil))))
- (semantic-intangible-face ((t (nil))))
- (semantic-read-only-face ((t (nil))))
- (semantic-unmatched-syntax-face ((t (nil))))
- (senator-intangible-face ((t (nil))))
- (senator-momentary-highlight-face ((t (nil))))
- (senator-read-only-face ((t (nil))))
- (sgml-comment-face ((t (nil))))
- (sgml-doctype-face ((t (nil))))
- (sgml-end-tag-face ((t (nil))))
- (sgml-entity-face ((t (nil))))
- (sgml-ignored-face ((t (nil))))
- (sgml-ms-end-face ((t (nil))))
- (sgml-ms-start-face ((t (nil))))
- (sgml-pi-face ((t (nil))))
- (sgml-sgml-face ((t (nil))))
- (sgml-short-ref-face ((t (nil))))
- (sgml-shortref-face ((t (nil))))
- (sgml-start-tag-face ((t (nil))))
- (sh-heredoc-face ((t (nil))))
- (shell-option-face ((t (nil))))
- (shell-output-2-face ((t (nil))))
- (shell-output-3-face ((t (nil))))
- (shell-output-face ((t (nil))))
- (shell-prompt-face ((t (nil))))
- (show-block-face1 ((t (nil))))
- (show-block-face2 ((t (nil))))
- (show-block-face3 ((t (nil))))
- (show-block-face4 ((t (nil))))
- (show-block-face5 ((t (nil))))
- (show-block-face6 ((t (nil))))
- (show-block-face7 ((t (nil))))
- (show-block-face8 ((t (nil))))
- (show-block-face9 ((t (nil))))
- (show-paren-match-face ((t (:background "orange" :foreground
- "black"))))
- (show-paren-mismatch-face ((t (:underline t))))
- (show-tabs-space-face ((t (nil))))
- (show-tabs-tab-face ((t (nil))))
- (smerge-base-face ((t (nil))))
- (smerge-markers-face ((t (nil))))
- (smerge-mine-face ((t (nil))))
- (smerge-other-face ((t (nil))))
- (speedbar-button-face ((t (nil))))
- (speedbar-directory-face ((t (nil))))
- (speedbar-file-face ((t (nil))))
- (speedbar-highlight-face ((t (nil))))
- (speedbar-selected-face ((t (nil))))
- (speedbar-separator-face ((t (nil))))
- (speedbar-tag-face ((t (nil))))
- (strokes-char-face ((t (nil))))
- (swbuff-current-buffer-face ((t (nil))))
- (tabbar-button-face ((t (nil))))
- (tabbar-default-face ((t (nil))))
- (tabbar-selected-face ((t (nil))))
- (tabbar-separator-face ((t (nil))))
- (tabbar-unselected-face ((t (nil))))
- (template-message-face ((t (nil))))
- (term-black ((t (nil))))
- (term-blackbg ((t (nil))))
- (term-blue ((t (nil))))
- (term-blue-bold-face ((t (nil))))
- (term-blue-face ((t (nil))))
- (term-blue-inv-face ((t (nil))))
- (term-blue-ul-face ((t (nil))))
- (term-bluebg ((t (nil))))
- (term-bold ((t (nil))))
- (term-cyan ((t (nil))))
- (term-cyan-bold-face ((t (nil))))
- (term-cyan-face ((t (nil))))
- (term-cyan-inv-face ((t (nil))))
- (term-cyan-ul-face ((t (nil))))
- (term-cyanbg ((t (nil))))
- (term-default ((t (nil))))
- (term-default-bg ((t (nil))))
- (term-default-bg-inv ((t (nil))))
- (term-default-bold-face ((t (nil))))
- (term-default-face ((t (nil))))
- (term-default-fg ((t (nil))))
- (term-default-fg-inv ((t (nil))))
- (term-default-inv-face ((t (nil))))
- (term-default-ul-face ((t (nil))))
- (term-green ((t (nil))))
- (term-green-bold-face ((t (nil))))
- (term-green-face ((t (nil))))
- (term-green-inv-face ((t (nil))))
- (term-green-ul-face ((t (nil))))
- (term-greenbg ((t (nil))))
- (term-invisible ((t (nil))))
- (term-invisible-inv ((t (nil))))
- (term-magenta ((t (nil))))
- (term-magenta-bold-face ((t (nil))))
- (term-magenta-face ((t (nil))))
- (term-magenta-inv-face ((t (nil))))
- (term-magenta-ul-face ((t (nil))))
- (term-magentabg ((t (nil))))
- (term-red ((t (nil))))
- (term-red-bold-face ((t (nil))))
- (term-red-face ((t (nil))))
- (term-red-inv-face ((t (nil))))
- (term-red-ul-face ((t (nil))))
- (term-redbg ((t (nil))))
- (term-underline ((t (nil))))
- (term-white ((t (nil))))
- (term-white-bold-face ((t (nil))))
- (term-white-face ((t (nil))))
- (term-white-inv-face ((t (nil))))
- (term-white-ul-face ((t (nil))))
- (term-whitebg ((t (nil))))
- (term-yellow ((t (nil))))
- (term-yellow-bold-face ((t (nil))))
- (term-yellow-face ((t (nil))))
- (term-yellow-inv-face ((t (nil))))
- (term-yellow-ul-face ((t (nil))))
- (term-yellowbg ((t (nil))))
- (tex-math-face ((t (nil))))
- (texinfo-heading-face ((t (nil))))
- (text-cursor ((t (nil))))
- (tool-bar ((t (nil))))
- (tooltip ((t (nil))))
- (trailing-whitespace ((t (nil))))
- (underline ((t (:underline t))))
- (variable-pitch ((t (nil))))
- (vc-annotate-face-0046FF ((t (nil))))
- (vcursor ((t (nil))))
- (vertical-divider ((t (nil))))
- (vhdl-font-lock-attribute-face ((t (nil))))
- (vhdl-font-lock-directive-face ((t (nil))))
- (vhdl-font-lock-enumvalue-face ((t (nil))))
- (vhdl-font-lock-function-face ((t (nil))))
- (vhdl-font-lock-generic-/constant-face ((t (nil))))
- (vhdl-font-lock-prompt-face ((t (nil))))
- (vhdl-font-lock-reserved-words-face ((t (nil))))
- (vhdl-font-lock-translate-off-face ((t (nil))))
- (vhdl-font-lock-type-face ((t (nil))))
- (vhdl-font-lock-variable-face ((t (nil))))
- (vhdl-speedbar-architecture-face ((t (nil))))
- (vhdl-speedbar-architecture-selected-face ((t (nil))))
- (vhdl-speedbar-configuration-face ((t (nil))))
- (vhdl-speedbar-configuration-selected-face ((t (nil))))
- (vhdl-speedbar-entity-face ((t (nil))))
- (vhdl-speedbar-entity-selected-face ((t (nil))))
- (vhdl-speedbar-instantiation-face ((t (nil))))
- (vhdl-speedbar-instantiation-selected-face ((t (nil))))
- (vhdl-speedbar-package-face ((t (nil))))
- (vhdl-speedbar-package-selected-face ((t (nil))))
- (vhdl-speedbar-subprogram-face ((t (nil))))
- (viper-minibuffer-emacs-face ((t (nil))))
- (viper-minibuffer-insert-face ((t (nil))))
- (viper-minibuffer-vi-face ((t (nil))))
- (viper-replace-overlay-face ((t (nil))))
- (viper-search-face ((t (nil))))
- (vm-xface ((t (nil))))
- (vmpc-pre-sig-face ((t (nil))))
- (vmpc-sig-face ((t (nil))))
- (w3m-anchor-face ((t (nil))))
- (w3m-arrived-anchor-face ((t (nil))))
- (w3m-header-line-location-content-face ((t (nil))))
- (w3m-header-line-location-title-face ((t (nil))))
- (white ((t (nil))))
- (widget ((t (nil))))
- (widget-button-face ((t (nil))))
- (widget-button-pressed-face ((t (nil))))
- (widget-documentation-face ((t (nil))))
- (widget-field-face ((t (nil))))
- (widget-inactive-face ((t (nil))))
- (widget-single-line-field-face ((t (nil))))
- (woman-addition-face ((t (nil))))
- (woman-bold-face ((t (nil))))
- (woman-italic-face ((t (nil))))
- (woman-unknown-face ((t (nil))))
- (x-face ((t (nil))))
- (xrdb-option-name-face ((t (nil))))
- (xref-keyword-face ((t (nil))))
- (xref-list-default-face ((t (nil))))
- (xref-list-pilot-face ((t (nil))))
- (xref-list-symbol-face ((t (nil))))
- (yellow ((t (nil))))
- (zmacs-region ((t (nil)))))))
-
- (defun color-theme-feng-shui ()
- "Color theme by walterh@rocketmail.com (www.xanadb.com), created
- 2003-10-16. Evolved from color-theme-katester"
- (interactive)
- (color-theme-install
- '(color-theme-feng-shui
- ((background-color . "ivory")
- (background-mode . light)
- (border-color . "black")
- (cursor-color . "slateblue")
- (foreground-color . "black")
- (mouse-color . "slateblue"))
- ((help-highlight-face . underline)
- (list-matching-lines-face . bold)
- (view-highlight-face . highlight)
- (widget-mouse-face . highlight))
- (default ((t (:stipple nil :background "ivory" :foreground "black"
- :inverse-video nil :box nil :strike-through nil :overline nil
- :underline nil :slant normal :weight normal :height 90 :width normal
- :family "outline-courier new"))))
- (bold ((t (:bold t :weight bold))))
- (bold-italic ((t (:italic t :bold t :slant italic :weight bold))))
- (border ((t (:background "black"))))
- (cursor ((t (:background "slateblue" :foreground "black"))))
- (fixed-pitch ((t (:family "courier"))))
- (font-lock-builtin-face ((t (:foreground "black"))))
- (font-lock-comment-face ((t (:italic t :background "seashell"
- :slant italic))))
- (font-lock-constant-face ((t (:foreground "darkblue"))))
- (font-lock-doc-face ((t (:background "lemonChiffon"))))
- (font-lock-function-name-face ((t (:bold t :underline t :weight
- bold))))
- (font-lock-keyword-face ((t (:foreground "blue"))))
- (font-lock-string-face ((t (:background "lemonChiffon"))))
- (font-lock-type-face ((t (:foreground "black"))))
- (font-lock-variable-name-face ((t (:foreground "black"))))
- (font-lock-warning-face ((t (:bold t :foreground "Red" :weight
- bold))))
- (fringe ((t (:background "grey95"))))
- (header-line ((t (:bold t :weight bold :underline t :background
- "grey90" :foreground "grey20" :box nil))))
- (highlight ((t (:background "mistyRose" :foreground "black"))))
- (isearch ((t (:background "magenta4" :foreground
- "lightskyblue1"))))
- (isearch-lazy-highlight-face ((t (:background "paleturquoise"))))
- (italic ((t (:italic t :slant italic))))
- (menu ((t (nil))))
- (mode-line ((t (:bold t :background "mistyRose" :foreground "navy"
- :underline t :weight bold))))
- (mouse ((t (:background "slateblue"))))
- (region ((t (:background "lavender" :foreground "black"))))
- (scroll-bar ((t (nil))))
- (secondary-selection ((t (:background "yellow"))))
- (tool-bar ((t (:background "grey75" :foreground "black" :box
- (:line-width 1 :style released-button)))))
- (trailing-whitespace ((t (:background "red"))))
- (underline ((t (:underline t))))
- (variable-pitch ((t (:family "helv"))))
- (widget-button-face ((t (:bold t :weight bold))))
- (widget-button-pressed-face ((t (:foreground "red"))))
- (widget-documentation-face ((t (:foreground "dark green"))))
- (widget-field-face ((t (:background "gray85"))))
- (widget-inactive-face ((t (:foreground "dim gray"))))
- (widget-single-line-field-face ((t (:background "gray85")))))))
-
-
- (defun color-theme-renegade ()
- "Renegade BBS styled color theme. Works well in X and terminals.
- Created by Dave Benjamin <ramen@ramenfest.com> Dec 23 2005."
- (interactive)
- (color-theme-install
- '(color-theme-renegade
- ((background-color . "black")
- (background-mode . dark)
- (border-color . "black")
- (cursor-color . "black")
- (foreground-color . "cyan3")
- (mouse-color . "white"))
- (default ((t (nil))))
- (bold ((t (:bold t :foreground "cyan" :weight bold))))
- (bold-italic ((t (:italic t :bold t :foreground "cyan" :slant italic :weight bold))))
- (fixed-pitch ((t (:family "courier"))))
- (font-lock-builtin-face ((t (:bold t :foreground "cornflower blue" :weight bold))))
- (font-lock-comment-face ((t (:bold t :foreground "yellow" :weight bold))))
- (font-lock-constant-face ((t (:foreground "magenta3"))))
- (font-lock-doc-face ((t (:bold t :weight bold :foreground "red"))))
- (font-lock-function-name-face ((t (:foreground "gray"))))
- (font-lock-keyword-face ((t (:bold t :foreground "cyan" :weight bold))))
- (font-lock-string-face ((t (:bold t :foreground "red" :weight bold))))
- (font-lock-type-face ((t (:bold t :foreground "cyan" :weight bold))))
- (font-lock-variable-name-face ((t (:foreground "cyan3"))))
- (font-lock-warning-face ((t (:bold t :foreground "red" :weight bold))))
- (fringe ((t (:background "gray32"))))
- (highlight ((t (:background "blue"))))
- (isearch ((t (:background "blue" :foreground "cyan3"))))
- (isearch-lazy-highlight-face ((t (:background "turquoise3" :foreground "black"))))
- (menu ((t (nil))))
- (mode-line ((t (:bold t :background "blue3" :foreground "white" :box (:line-width -1 :style released-button) :weight bold))))
- (mouse ((t (:background "white"))))
- (region ((t (:bold t :background "white" :foreground "blue" :weight bold))))
- (scroll-bar ((t (nil))))
- (trailing-whitespace ((t (:background "red"))))
- (underline ((t (:underline t))))
- (variable-pitch ((t (:family "helv")))))))
-
- ;;; color-theme-library.el ends here
|
