12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273747576777879808182838485868788899091929394959697989910010110210310410510610710810911011111211311411511611711811912012112212312412512612712812913013113213313413513613713813914014114214314414514614714814915015115215315415515615715815916016116216316416516616716816917017117217317417517617717817918018118218318418518618718818919019119219319419519619719819920020120220320420520620720820921021121221321421521621721821922022122222322422522622722822923023123223323423523623723823924024124224324424524624724824925025125225325425525625725825926026126226326426526626726826927027127227327427527627727827928028128228328428528628728828929029129229329429529629729829930030130230330430530630730830931031131231331431531631731831932032132232332432532632732832933033133233333433533633733833934034134234334434534634734834935035135235335435535635735835936036136236336436536636736836937037137237337437537637737837938038138238338438538638738838939039139239339439539639739839940040140240340440540640740840941041141241341441541641741841942042142242342442542642742842943043143243343443543643743843944044144244344444544644744844945045145245345445545645745845946046146246346446546646746846947047147247347447547647747847948048148248348448548648748848949049149249349449549649749849950050150250350450550650750850951051151251351451551651751851952052152252352452552652752852953053153253353453553653753853954054154254354454554654754854955055155255355455555655755855956056156256356456556656756856957057157257357457557657757857958058158258358458558658758858959059159259359459559659759859960060160260360460560660760860961061161261361461561661761861962062162262362462562662762862963063163263363463563663763863964064164264364464564664764864965065165265365465565665765865966066166266366466566666766866967067167267367467567667767867968068168268368468568668768868969069169269369469569669769869970070170270370470570670770870971071171271371471571671771871972072172272372472572672772872973073173273373473573673773873974074174274374474574674774874975075175275375475575675775875976076176276376476576676776876977077177277377477577677777877978078178278378478578678778878979079179279379479579679779879980080180280380480580680780880981081181281381481581681781881982082182282382482582682782882983083183283383483583683783883984084184284384484584684784884985085185285385485585685785885986086186286386486586686786886987087187287387487587687787887988088188288388488588688788888989089189289389489589689789889990090190290390490590690790890991091191291391491591691791891992092192292392492592692792892993093193293393493593693793893994094194294394494594694794894995095195295395495595695795895996096196296396496596696796896997097197297397497597697797897998098198298398498598698798898999099199299399499599699799899910001001100210031004100510061007100810091010101110121013101410151016101710181019102010211022102310241025102610271028102910301031103210331034103510361037103810391040104110421043104410451046104710481049105010511052105310541055105610571058105910601061106210631064106510661067106810691070107110721073107410751076107710781079108010811082108310841085108610871088108910901091109210931094109510961097109810991100110111021103110411051106110711081109111011111112111311141115111611171118111911201121112211231124112511261127112811291130113111321133113411351136113711381139114011411142114311441145114611471148114911501151115211531154115511561157115811591160116111621163116411651166116711681169117011711172117311741175117611771178117911801181118211831184118511861187118811891190119111921193119411951196119711981199120012011202120312041205120612071208120912101211121212131214121512161217121812191220122112221223122412251226122712281229123012311232123312341235123612371238123912401241124212431244124512461247124812491250125112521253125412551256125712581259126012611262126312641265126612671268126912701271127212731274127512761277127812791280128112821283128412851286128712881289129012911292129312941295129612971298129913001301130213031304130513061307130813091310131113121313131413151316131713181319132013211322132313241325132613271328132913301331133213331334133513361337133813391340134113421343134413451346134713481349135013511352135313541355135613571358135913601361136213631364136513661367136813691370137113721373137413751376137713781379138013811382138313841385138613871388138913901391139213931394139513961397139813991400140114021403140414051406140714081409141014111412141314141415141614171418141914201421142214231424142514261427142814291430143114321433143414351436143714381439144014411442144314441445144614471448144914501451145214531454145514561457145814591460146114621463146414651466146714681469147014711472147314741475147614771478147914801481148214831484148514861487148814891490149114921493149414951496149714981499150015011502150315041505150615071508150915101511151215131514151515161517151815191520152115221523152415251526152715281529153015311532153315341535153615371538153915401541154215431544154515461547154815491550155115521553155415551556155715581559156015611562156315641565156615671568156915701571157215731574157515761577157815791580158115821583158415851586158715881589159015911592159315941595159615971598159916001601160216031604160516061607160816091610161116121613161416151616161716181619162016211622162316241625162616271628162916301631163216331634163516361637163816391640164116421643164416451646164716481649165016511652165316541655165616571658165916601661166216631664166516661667166816691670167116721673167416751676167716781679168016811682168316841685168616871688168916901691169216931694169516961697169816991700170117021703170417051706170717081709171017111712171317141715171617171718171917201721172217231724172517261727172817291730173117321733173417351736173717381739174017411742174317441745174617471748174917501751175217531754175517561757175817591760176117621763176417651766176717681769177017711772177317741775177617771778177917801781178217831784178517861787178817891790179117921793179417951796179717981799180018011802180318041805180618071808180918101811181218131814181518161817181818191820182118221823182418251826182718281829183018311832183318341835183618371838183918401841184218431844184518461847184818491850185118521853185418551856185718581859186018611862186318641865186618671868186918701871187218731874187518761877187818791880188118821883188418851886188718881889189018911892189318941895189618971898189919001901190219031904190519061907190819091910191119121913191419151916191719181919192019211922192319241925192619271928192919301931193219331934193519361937193819391940194119421943194419451946194719481949195019511952195319541955195619571958195919601961196219631964196519661967196819691970197119721973197419751976197719781979198019811982198319841985198619871988198919901991199219931994199519961997199819992000200120022003200420052006200720082009201020112012201320142015201620172018201920202021202220232024202520262027202820292030203120322033203420352036203720382039204020412042204320442045204620472048204920502051205220532054205520562057205820592060206120622063206420652066206720682069207020712072207320742075207620772078207920802081208220832084208520862087208820892090209120922093209420952096209720982099210021012102210321042105210621072108210921102111211221132114211521162117211821192120212121222123212421252126212721282129213021312132213321342135213621372138213921402141214221432144214521462147214821492150215121522153215421552156215721582159216021612162216321642165216621672168216921702171217221732174217521762177217821792180218121822183218421852186218721882189219021912192219321942195219621972198219922002201220222032204220522062207220822092210221122122213221422152216221722182219222022212222222322242225222622272228222922302231223222332234223522362237223822392240224122422243224422452246224722482249225022512252225322542255225622572258225922602261226222632264226522662267226822692270227122722273227422752276227722782279228022812282228322842285228622872288228922902291229222932294229522962297229822992300230123022303230423052306230723082309231023112312231323142315231623172318231923202321232223232324232523262327232823292330233123322333233423352336233723382339234023412342234323442345234623472348234923502351235223532354235523562357235823592360236123622363236423652366236723682369237023712372237323742375237623772378237923802381238223832384238523862387238823892390239123922393239423952396239723982399240024012402240324042405240624072408240924102411241224132414241524162417241824192420242124222423242424252426242724282429243024312432243324342435243624372438243924402441244224432444244524462447244824492450245124522453245424552456245724582459246024612462246324642465246624672468246924702471247224732474247524762477247824792480248124822483248424852486248724882489249024912492249324942495249624972498249925002501250225032504250525062507250825092510251125122513251425152516251725182519252025212522252325242525252625272528252925302531253225332534253525362537253825392540254125422543254425452546254725482549255025512552255325542555255625572558255925602561256225632564256525662567256825692570257125722573257425752576257725782579258025812582258325842585258625872588258925902591259225932594259525962597259825992600260126022603260426052606260726082609261026112612261326142615261626172618261926202621262226232624262526262627262826292630263126322633263426352636263726382639264026412642264326442645264626472648264926502651265226532654265526562657265826592660266126622663266426652666266726682669267026712672267326742675267626772678267926802681268226832684268526862687268826892690269126922693269426952696269726982699270027012702270327042705270627072708270927102711271227132714271527162717271827192720272127222723272427252726272727282729273027312732273327342735273627372738273927402741274227432744274527462747274827492750275127522753275427552756275727582759276027612762276327642765276627672768276927702771277227732774277527762777277827792780278127822783278427852786278727882789279027912792279327942795279627972798279928002801280228032804280528062807280828092810281128122813281428152816281728182819282028212822282328242825282628272828282928302831283228332834283528362837283828392840284128422843284428452846284728482849285028512852285328542855285628572858285928602861286228632864286528662867286828692870287128722873287428752876287728782879288028812882288328842885288628872888288928902891289228932894289528962897289828992900290129022903290429052906290729082909291029112912291329142915291629172918291929202921292229232924292529262927292829292930293129322933293429352936293729382939294029412942294329442945294629472948294929502951295229532954295529562957295829592960296129622963296429652966296729682969297029712972297329742975297629772978297929802981298229832984298529862987298829892990299129922993299429952996299729982999300030013002300330043005300630073008300930103011301230133014301530163017301830193020302130223023302430253026302730283029303030313032303330343035303630373038303930403041304230433044304530463047304830493050305130523053305430553056305730583059306030613062306330643065306630673068306930703071307230733074307530763077307830793080308130823083308430853086308730883089309030913092309330943095309630973098309931003101310231033104310531063107310831093110311131123113311431153116311731183119312031213122312331243125312631273128312931303131313231333134313531363137313831393140314131423143314431453146314731483149315031513152315331543155315631573158315931603161316231633164316531663167316831693170317131723173317431753176317731783179318031813182318331843185318631873188318931903191319231933194319531963197319831993200320132023203320432053206320732083209321032113212321332143215321632173218321932203221322232233224322532263227322832293230323132323233323432353236323732383239324032413242324332443245324632473248324932503251325232533254325532563257325832593260326132623263326432653266326732683269327032713272327332743275327632773278327932803281328232833284328532863287328832893290329132923293329432953296329732983299330033013302330333043305330633073308330933103311331233133314331533163317331833193320332133223323332433253326332733283329333033313332333333343335333633373338333933403341334233433344334533463347334833493350335133523353335433553356335733583359336033613362336333643365336633673368336933703371337233733374337533763377337833793380338133823383338433853386338733883389339033913392339333943395339633973398339934003401340234033404340534063407340834093410341134123413341434153416341734183419342034213422342334243425342634273428342934303431343234333434343534363437343834393440344134423443344434453446344734483449345034513452345334543455345634573458345934603461346234633464346534663467346834693470347134723473347434753476347734783479348034813482348334843485348634873488348934903491349234933494349534963497349834993500350135023503350435053506350735083509351035113512351335143515351635173518351935203521352235233524352535263527352835293530353135323533353435353536353735383539354035413542354335443545354635473548354935503551355235533554355535563557355835593560356135623563356435653566356735683569357035713572357335743575357635773578357935803581358235833584358535863587358835893590359135923593359435953596359735983599360036013602360336043605360636073608360936103611361236133614361536163617361836193620362136223623362436253626362736283629363036313632363336343635363636373638363936403641364236433644364536463647364836493650365136523653365436553656365736583659366036613662366336643665366636673668366936703671367236733674367536763677367836793680368136823683368436853686368736883689369036913692369336943695369636973698369937003701370237033704370537063707370837093710371137123713371437153716371737183719372037213722372337243725372637273728372937303731373237333734373537363737373837393740374137423743374437453746374737483749375037513752375337543755375637573758375937603761376237633764376537663767376837693770377137723773377437753776377737783779378037813782378337843785378637873788378937903791379237933794379537963797379837993800380138023803380438053806380738083809381038113812381338143815381638173818381938203821382238233824382538263827382838293830383138323833383438353836383738383839384038413842384338443845384638473848384938503851385238533854385538563857385838593860386138623863386438653866386738683869387038713872387338743875387638773878387938803881388238833884388538863887388838893890389138923893389438953896389738983899390039013902390339043905390639073908390939103911391239133914391539163917391839193920392139223923392439253926392739283929393039313932393339343935393639373938393939403941394239433944394539463947394839493950395139523953395439553956395739583959396039613962396339643965396639673968396939703971397239733974397539763977397839793980398139823983398439853986398739883989399039913992399339943995399639973998399940004001400240034004400540064007400840094010401140124013401440154016401740184019402040214022402340244025402640274028402940304031403240334034403540364037403840394040404140424043404440454046404740484049405040514052405340544055405640574058405940604061406240634064406540664067406840694070407140724073407440754076407740784079408040814082408340844085408640874088408940904091409240934094409540964097409840994100410141024103410441054106410741084109411041114112411341144115411641174118411941204121412241234124412541264127412841294130413141324133413441354136413741384139414041414142414341444145414641474148414941504151415241534154415541564157415841594160416141624163416441654166416741684169417041714172417341744175417641774178417941804181418241834184418541864187418841894190419141924193419441954196419741984199420042014202420342044205420642074208420942104211421242134214421542164217421842194220422142224223422442254226422742284229423042314232423342344235423642374238423942404241424242434244424542464247424842494250425142524253425442554256425742584259426042614262426342644265426642674268426942704271427242734274427542764277427842794280428142824283428442854286428742884289429042914292429342944295429642974298429943004301430243034304430543064307430843094310431143124313431443154316431743184319432043214322432343244325432643274328432943304331433243334334433543364337433843394340434143424343434443454346434743484349435043514352435343544355435643574358435943604361436243634364436543664367436843694370437143724373437443754376437743784379438043814382438343844385438643874388438943904391439243934394439543964397439843994400440144024403440444054406440744084409441044114412441344144415441644174418441944204421442244234424442544264427442844294430443144324433443444354436443744384439444044414442444344444445444644474448444944504451445244534454445544564457445844594460446144624463446444654466446744684469447044714472447344744475447644774478447944804481448244834484448544864487448844894490449144924493449444954496449744984499450045014502450345044505450645074508450945104511451245134514451545164517451845194520452145224523452445254526452745284529453045314532453345344535453645374538453945404541454245434544454545464547454845494550455145524553455445554556455745584559456045614562456345644565456645674568456945704571457245734574457545764577457845794580458145824583458445854586458745884589459045914592459345944595459645974598459946004601460246034604460546064607460846094610461146124613461446154616461746184619462046214622462346244625462646274628462946304631463246334634463546364637463846394640464146424643464446454646464746484649465046514652465346544655465646574658465946604661466246634664466546664667466846694670467146724673467446754676467746784679468046814682468346844685468646874688468946904691469246934694469546964697469846994700470147024703470447054706470747084709471047114712471347144715471647174718471947204721472247234724472547264727472847294730473147324733473447354736473747384739474047414742474347444745474647474748474947504751475247534754475547564757475847594760476147624763476447654766476747684769477047714772477347744775477647774778477947804781478247834784478547864787478847894790479147924793479447954796479747984799480048014802480348044805480648074808480948104811481248134814481548164817481848194820482148224823482448254826482748284829483048314832483348344835483648374838483948404841484248434844484548464847484848494850485148524853485448554856485748584859486048614862486348644865486648674868486948704871487248734874487548764877487848794880488148824883488448854886488748884889489048914892489348944895489648974898489949004901490249034904490549064907490849094910491149124913491449154916491749184919492049214922492349244925492649274928492949304931493249334934493549364937493849394940494149424943494449454946494749484949495049514952495349544955495649574958495949604961496249634964496549664967496849694970497149724973497449754976497749784979498049814982498349844985498649874988498949904991499249934994499549964997499849995000500150025003500450055006500750085009501050115012501350145015501650175018501950205021502250235024502550265027502850295030503150325033503450355036503750385039504050415042504350445045504650475048504950505051505250535054505550565057505850595060506150625063506450655066506750685069507050715072507350745075507650775078507950805081508250835084508550865087508850895090509150925093509450955096509750985099510051015102510351045105510651075108510951105111511251135114511551165117511851195120512151225123512451255126512751285129513051315132513351345135513651375138513951405141514251435144514551465147514851495150515151525153515451555156515751585159516051615162516351645165516651675168516951705171517251735174517551765177517851795180518151825183518451855186518751885189519051915192519351945195519651975198519952005201520252035204520552065207520852095210521152125213521452155216521752185219522052215222522352245225522652275228522952305231523252335234523552365237523852395240524152425243524452455246524752485249525052515252525352545255525652575258525952605261526252635264526552665267526852695270527152725273527452755276527752785279528052815282528352845285528652875288528952905291529252935294529552965297529852995300530153025303530453055306530753085309531053115312531353145315531653175318531953205321532253235324532553265327532853295330533153325333533453355336533753385339534053415342534353445345534653475348534953505351535253535354535553565357535853595360536153625363536453655366536753685369537053715372537353745375537653775378537953805381538253835384538553865387538853895390539153925393539453955396539753985399540054015402540354045405540654075408540954105411541254135414541554165417541854195420542154225423542454255426542754285429543054315432543354345435543654375438543954405441544254435444544554465447544854495450545154525453545454555456545754585459546054615462546354645465546654675468546954705471547254735474547554765477547854795480548154825483548454855486548754885489549054915492549354945495549654975498549955005501550255035504550555065507550855095510551155125513551455155516551755185519552055215522552355245525552655275528552955305531553255335534553555365537553855395540554155425543554455455546554755485549555055515552555355545555555655575558555955605561556255635564556555665567556855695570557155725573557455755576557755785579558055815582558355845585558655875588558955905591559255935594559555965597559855995600560156025603560456055606560756085609561056115612561356145615561656175618561956205621562256235624562556265627562856295630563156325633563456355636563756385639564056415642564356445645564656475648564956505651565256535654565556565657565856595660566156625663566456655666566756685669567056715672567356745675567656775678567956805681568256835684568556865687568856895690569156925693569456955696569756985699570057015702570357045705570657075708570957105711571257135714571557165717571857195720572157225723572457255726572757285729573057315732573357345735573657375738573957405741574257435744574557465747574857495750575157525753575457555756575757585759576057615762576357645765576657675768576957705771577257735774577557765777577857795780578157825783578457855786578757885789579057915792579357945795579657975798579958005801580258035804580558065807580858095810581158125813581458155816581758185819582058215822582358245825582658275828582958305831583258335834583558365837583858395840584158425843584458455846584758485849585058515852585358545855585658575858585958605861586258635864586558665867586858695870587158725873587458755876587758785879588058815882588358845885588658875888588958905891589258935894589558965897589858995900590159025903590459055906590759085909591059115912591359145915591659175918591959205921592259235924592559265927592859295930593159325933593459355936593759385939594059415942594359445945594659475948594959505951595259535954595559565957595859595960596159625963596459655966596759685969597059715972597359745975597659775978597959805981598259835984598559865987598859895990599159925993599459955996599759985999600060016002600360046005600660076008600960106011601260136014601560166017601860196020602160226023602460256026602760286029603060316032603360346035603660376038603960406041604260436044604560466047604860496050605160526053605460556056605760586059606060616062606360646065606660676068606960706071607260736074607560766077607860796080608160826083608460856086608760886089609060916092609360946095609660976098609961006101610261036104610561066107610861096110611161126113611461156116611761186119612061216122612361246125612661276128612961306131613261336134613561366137613861396140614161426143614461456146614761486149615061516152615361546155615661576158615961606161616261636164616561666167616861696170617161726173617461756176617761786179618061816182618361846185618661876188618961906191619261936194619561966197619861996200620162026203620462056206620762086209621062116212621362146215621662176218621962206221622262236224622562266227622862296230623162326233623462356236623762386239624062416242624362446245624662476248624962506251625262536254625562566257625862596260626162626263626462656266626762686269627062716272627362746275627662776278627962806281628262836284628562866287628862896290629162926293629462956296629762986299630063016302630363046305630663076308630963106311631263136314631563166317631863196320632163226323632463256326632763286329633063316332633363346335633663376338633963406341634263436344634563466347634863496350635163526353635463556356635763586359636063616362636363646365636663676368636963706371637263736374637563766377637863796380638163826383638463856386638763886389639063916392639363946395639663976398639964006401640264036404640564066407640864096410641164126413641464156416641764186419642064216422642364246425642664276428642964306431643264336434643564366437643864396440644164426443644464456446644764486449645064516452645364546455645664576458645964606461646264636464646564666467646864696470647164726473647464756476647764786479648064816482648364846485648664876488648964906491649264936494649564966497649864996500650165026503650465056506650765086509651065116512651365146515651665176518651965206521652265236524652565266527652865296530653165326533653465356536653765386539654065416542654365446545654665476548654965506551655265536554655565566557655865596560656165626563656465656566656765686569657065716572657365746575657665776578657965806581658265836584658565866587658865896590659165926593659465956596659765986599660066016602660366046605660666076608660966106611661266136614661566166617661866196620662166226623662466256626662766286629663066316632663366346635663666376638663966406641664266436644664566466647664866496650665166526653665466556656665766586659666066616662666366646665666666676668666966706671667266736674667566766677667866796680668166826683668466856686668766886689669066916692669366946695669666976698669967006701670267036704670567066707670867096710671167126713671467156716671767186719672067216722672367246725672667276728672967306731673267336734673567366737673867396740674167426743674467456746674767486749675067516752675367546755675667576758675967606761676267636764676567666767676867696770677167726773677467756776677767786779678067816782678367846785678667876788678967906791679267936794679567966797679867996800680168026803680468056806680768086809681068116812681368146815681668176818681968206821682268236824682568266827682868296830683168326833683468356836683768386839684068416842684368446845684668476848684968506851685268536854685568566857685868596860686168626863686468656866686768686869687068716872687368746875687668776878687968806881688268836884688568866887688868896890689168926893689468956896689768986899690069016902690369046905690669076908690969106911691269136914691569166917691869196920692169226923692469256926692769286929693069316932693369346935693669376938693969406941694269436944694569466947694869496950695169526953695469556956695769586959696069616962696369646965696669676968696969706971697269736974697569766977697869796980698169826983698469856986698769886989699069916992699369946995699669976998699970007001700270037004700570067007700870097010701170127013701470157016701770187019702070217022702370247025702670277028702970307031703270337034703570367037703870397040704170427043704470457046704770487049705070517052705370547055705670577058705970607061706270637064706570667067706870697070707170727073707470757076707770787079708070817082708370847085708670877088708970907091709270937094709570967097709870997100710171027103710471057106710771087109711071117112711371147115711671177118711971207121712271237124712571267127712871297130713171327133713471357136713771387139714071417142714371447145714671477148714971507151715271537154715571567157715871597160716171627163716471657166716771687169717071717172717371747175717671777178717971807181718271837184718571867187718871897190719171927193719471957196719771987199720072017202720372047205720672077208720972107211721272137214721572167217721872197220722172227223722472257226722772287229723072317232723372347235723672377238723972407241724272437244724572467247724872497250725172527253725472557256725772587259726072617262726372647265726672677268726972707271727272737274727572767277727872797280728172827283728472857286728772887289729072917292729372947295729672977298729973007301730273037304730573067307730873097310731173127313731473157316731773187319732073217322732373247325732673277328732973307331733273337334733573367337733873397340734173427343734473457346734773487349735073517352735373547355735673577358735973607361736273637364736573667367736873697370737173727373737473757376737773787379738073817382738373847385738673877388738973907391739273937394739573967397739873997400740174027403740474057406740774087409741074117412741374147415741674177418741974207421742274237424742574267427742874297430743174327433743474357436743774387439744074417442744374447445744674477448744974507451745274537454745574567457745874597460746174627463746474657466746774687469747074717472747374747475747674777478747974807481748274837484748574867487748874897490749174927493749474957496749774987499750075017502750375047505750675077508750975107511751275137514751575167517751875197520752175227523752475257526752775287529753075317532753375347535753675377538753975407541754275437544754575467547754875497550755175527553755475557556755775587559756075617562756375647565756675677568756975707571757275737574757575767577757875797580758175827583758475857586758775887589759075917592759375947595759675977598759976007601760276037604760576067607760876097610761176127613761476157616761776187619762076217622762376247625762676277628762976307631763276337634763576367637763876397640764176427643764476457646764776487649765076517652765376547655765676577658765976607661766276637664766576667667766876697670767176727673767476757676767776787679768076817682768376847685768676877688768976907691769276937694769576967697769876997700770177027703770477057706770777087709771077117712771377147715771677177718771977207721772277237724772577267727772877297730773177327733773477357736773777387739774077417742774377447745774677477748774977507751775277537754775577567757775877597760776177627763776477657766776777687769777077717772777377747775777677777778777977807781778277837784778577867787778877897790779177927793779477957796779777987799780078017802780378047805780678077808780978107811781278137814781578167817781878197820782178227823782478257826782778287829783078317832783378347835783678377838783978407841784278437844784578467847784878497850785178527853785478557856785778587859786078617862786378647865786678677868786978707871787278737874787578767877787878797880788178827883788478857886788778887889789078917892789378947895789678977898789979007901790279037904790579067907790879097910791179127913791479157916791779187919792079217922792379247925792679277928792979307931793279337934793579367937793879397940794179427943794479457946794779487949795079517952795379547955795679577958795979607961796279637964796579667967796879697970797179727973797479757976797779787979798079817982798379847985798679877988798979907991799279937994799579967997799879998000800180028003800480058006800780088009801080118012801380148015801680178018801980208021802280238024802580268027802880298030803180328033803480358036803780388039804080418042804380448045804680478048804980508051805280538054805580568057805880598060806180628063806480658066806780688069807080718072807380748075807680778078807980808081808280838084808580868087808880898090809180928093809480958096809780988099810081018102810381048105810681078108810981108111811281138114811581168117811881198120812181228123812481258126812781288129813081318132813381348135813681378138813981408141814281438144814581468147814881498150815181528153815481558156815781588159816081618162816381648165816681678168816981708171817281738174817581768177817881798180818181828183818481858186818781888189819081918192819381948195819681978198819982008201820282038204820582068207820882098210821182128213821482158216821782188219822082218222822382248225822682278228822982308231823282338234823582368237823882398240824182428243824482458246824782488249825082518252825382548255825682578258825982608261826282638264826582668267826882698270827182728273827482758276827782788279828082818282828382848285828682878288828982908291829282938294829582968297829882998300830183028303830483058306830783088309831083118312831383148315831683178318831983208321832283238324832583268327832883298330833183328333833483358336833783388339834083418342834383448345834683478348834983508351835283538354835583568357835883598360836183628363836483658366836783688369837083718372837383748375837683778378837983808381838283838384838583868387838883898390839183928393839483958396839783988399840084018402840384048405840684078408840984108411841284138414841584168417841884198420842184228423842484258426842784288429843084318432843384348435843684378438843984408441844284438444844584468447844884498450845184528453845484558456845784588459846084618462846384648465846684678468846984708471847284738474847584768477847884798480848184828483848484858486848784888489849084918492849384948495849684978498849985008501850285038504850585068507850885098510851185128513851485158516851785188519852085218522852385248525852685278528852985308531853285338534853585368537853885398540854185428543854485458546854785488549855085518552855385548555855685578558855985608561856285638564856585668567856885698570857185728573857485758576857785788579858085818582858385848585858685878588858985908591859285938594859585968597859885998600860186028603860486058606860786088609861086118612861386148615861686178618861986208621862286238624862586268627862886298630863186328633863486358636863786388639864086418642864386448645864686478648864986508651865286538654865586568657865886598660866186628663866486658666866786688669867086718672867386748675867686778678867986808681868286838684868586868687868886898690869186928693869486958696869786988699870087018702870387048705870687078708870987108711871287138714871587168717871887198720872187228723872487258726872787288729873087318732873387348735873687378738873987408741874287438744874587468747874887498750875187528753875487558756875787588759876087618762876387648765876687678768876987708771877287738774877587768777877887798780878187828783878487858786878787888789879087918792879387948795879687978798879988008801880288038804880588068807880888098810881188128813881488158816881788188819882088218822882388248825882688278828882988308831883288338834883588368837883888398840884188428843884488458846884788488849885088518852885388548855885688578858885988608861886288638864886588668867886888698870887188728873887488758876887788788879888088818882888388848885888688878888888988908891889288938894889588968897889888998900890189028903890489058906890789088909891089118912891389148915891689178918891989208921892289238924892589268927892889298930893189328933893489358936893789388939894089418942894389448945894689478948894989508951895289538954895589568957895889598960896189628963896489658966896789688969897089718972897389748975897689778978897989808981898289838984898589868987898889898990899189928993899489958996899789988999900090019002900390049005900690079008900990109011901290139014901590169017901890199020902190229023902490259026902790289029903090319032903390349035903690379038903990409041904290439044904590469047904890499050905190529053905490559056905790589059906090619062906390649065906690679068906990709071907290739074907590769077907890799080908190829083908490859086908790889089909090919092909390949095909690979098909991009101910291039104910591069107910891099110911191129113911491159116911791189119912091219122912391249125912691279128912991309131913291339134913591369137913891399140914191429143914491459146914791489149915091519152915391549155915691579158915991609161916291639164916591669167916891699170917191729173917491759176917791789179918091819182918391849185918691879188918991909191919291939194919591969197919891999200920192029203920492059206920792089209921092119212921392149215921692179218921992209221922292239224922592269227922892299230923192329233923492359236923792389239924092419242924392449245924692479248924992509251925292539254925592569257925892599260926192629263926492659266926792689269927092719272927392749275927692779278927992809281928292839284928592869287928892899290929192929293929492959296929792989299930093019302930393049305930693079308930993109311931293139314931593169317931893199320932193229323932493259326932793289329933093319332933393349335933693379338933993409341934293439344934593469347934893499350935193529353935493559356935793589359936093619362936393649365936693679368936993709371937293739374937593769377937893799380938193829383938493859386938793889389939093919392939393949395939693979398939994009401940294039404940594069407940894099410941194129413941494159416941794189419942094219422942394249425942694279428942994309431943294339434943594369437943894399440944194429443944494459446944794489449945094519452945394549455945694579458945994609461946294639464946594669467946894699470947194729473947494759476947794789479948094819482948394849485948694879488948994909491949294939494949594969497949894999500950195029503950495059506950795089509951095119512951395149515951695179518951995209521952295239524952595269527952895299530953195329533953495359536953795389539954095419542954395449545954695479548954995509551955295539554955595569557955895599560956195629563956495659566956795689569957095719572957395749575957695779578957995809581958295839584958595869587958895899590959195929593959495959596959795989599960096019602960396049605960696079608960996109611961296139614961596169617961896199620962196229623962496259626962796289629963096319632963396349635963696379638963996409641964296439644964596469647964896499650965196529653965496559656965796589659966096619662966396649665966696679668966996709671967296739674967596769677967896799680968196829683968496859686968796889689969096919692969396949695969696979698969997009701970297039704970597069707970897099710971197129713971497159716971797189719972097219722972397249725972697279728972997309731973297339734973597369737973897399740974197429743974497459746974797489749975097519752975397549755975697579758975997609761976297639764976597669767976897699770977197729773977497759776977797789779978097819782978397849785978697879788978997909791979297939794979597969797979897999800980198029803980498059806980798089809981098119812981398149815981698179818981998209821982298239824982598269827982898299830983198329833983498359836983798389839984098419842984398449845984698479848984998509851985298539854985598569857985898599860986198629863986498659866986798689869987098719872987398749875987698779878987998809881988298839884988598869887988898899890989198929893989498959896989798989899990099019902990399049905990699079908990999109911991299139914991599169917991899199920992199229923992499259926992799289929993099319932993399349935993699379938993999409941994299439944994599469947994899499950995199529953995499559956995799589959996099619962996399649965996699679968996999709971997299739974997599769977997899799980998199829983998499859986998799889989999099919992999399949995999699979998999910000100011000210003100041000510006100071000810009100101001110012100131001410015100161001710018100191002010021100221002310024100251002610027100281002910030100311003210033100341003510036100371003810039100401004110042100431004410045100461004710048100491005010051100521005310054100551005610057100581005910060100611006210063100641006510066100671006810069100701007110072100731007410075100761007710078100791008010081100821008310084100851008610087100881008910090100911009210093100941009510096100971009810099101001010110102101031010410105101061010710108101091011010111101121011310114101151011610117101181011910120101211012210123101241012510126101271012810129101301013110132101331013410135101361013710138101391014010141101421014310144101451014610147101481014910150101511015210153101541015510156101571015810159101601016110162101631016410165101661016710168101691017010171101721017310174101751017610177101781017910180101811018210183101841018510186101871018810189101901019110192101931019410195101961019710198101991020010201102021020310204102051020610207102081020910210102111021210213102141021510216102171021810219102201022110222102231022410225102261022710228102291023010231102321023310234102351023610237102381023910240102411024210243102441024510246102471024810249102501025110252102531025410255102561025710258102591026010261102621026310264102651026610267102681026910270102711027210273102741027510276102771027810279102801028110282102831028410285102861028710288102891029010291102921029310294102951029610297102981029910300103011030210303103041030510306103071030810309103101031110312103131031410315103161031710318103191032010321103221032310324103251032610327103281032910330103311033210333103341033510336103371033810339103401034110342103431034410345103461034710348103491035010351103521035310354103551035610357103581035910360103611036210363103641036510366103671036810369103701037110372103731037410375103761037710378103791038010381103821038310384103851038610387103881038910390103911039210393103941039510396103971039810399104001040110402104031040410405104061040710408104091041010411104121041310414104151041610417104181041910420104211042210423104241042510426104271042810429104301043110432104331043410435104361043710438104391044010441104421044310444104451044610447104481044910450104511045210453104541045510456104571045810459104601046110462104631046410465104661046710468104691047010471104721047310474104751047610477104781047910480104811048210483104841048510486104871048810489104901049110492104931049410495104961049710498104991050010501105021050310504105051050610507105081050910510105111051210513105141051510516105171051810519105201052110522105231052410525105261052710528105291053010531105321053310534105351053610537105381053910540105411054210543105441054510546105471054810549105501055110552105531055410555105561055710558105591056010561105621056310564105651056610567105681056910570105711057210573105741057510576105771057810579105801058110582105831058410585105861058710588105891059010591105921059310594105951059610597105981059910600106011060210603106041060510606106071060810609106101061110612106131061410615106161061710618106191062010621106221062310624106251062610627106281062910630106311063210633106341063510636106371063810639106401064110642106431064410645106461064710648106491065010651106521065310654106551065610657106581065910660106611066210663106641066510666106671066810669106701067110672106731067410675106761067710678106791068010681106821068310684106851068610687106881068910690106911069210693106941069510696106971069810699107001070110702107031070410705107061070710708107091071010711107121071310714107151071610717107181071910720107211072210723107241072510726107271072810729107301073110732107331073410735107361073710738107391074010741107421074310744107451074610747107481074910750107511075210753107541075510756107571075810759107601076110762107631076410765107661076710768107691077010771107721077310774107751077610777107781077910780107811078210783107841078510786107871078810789107901079110792107931079410795107961079710798107991080010801108021080310804108051080610807108081080910810108111081210813108141081510816108171081810819108201082110822108231082410825108261082710828108291083010831108321083310834108351083610837108381083910840108411084210843108441084510846108471084810849108501085110852108531085410855108561085710858108591086010861108621086310864108651086610867108681086910870108711087210873108741087510876108771087810879108801088110882108831088410885108861088710888108891089010891108921089310894108951089610897108981089910900109011090210903109041090510906109071090810909109101091110912109131091410915109161091710918109191092010921109221092310924109251092610927109281092910930109311093210933109341093510936109371093810939109401094110942109431094410945109461094710948109491095010951109521095310954109551095610957109581095910960109611096210963109641096510966109671096810969109701097110972109731097410975109761097710978109791098010981109821098310984109851098610987109881098910990109911099210993109941099510996109971099810999110001100111002110031100411005110061100711008110091101011011110121101311014110151101611017110181101911020110211102211023110241102511026110271102811029110301103111032110331103411035110361103711038110391104011041110421104311044110451104611047110481104911050110511105211053110541105511056110571105811059110601106111062110631106411065110661106711068110691107011071110721107311074110751107611077110781107911080110811108211083110841108511086110871108811089110901109111092110931109411095110961109711098110991110011101111021110311104111051110611107111081110911110111111111211113111141111511116111171111811119111201112111122111231112411125111261112711128111291113011131111321113311134111351113611137111381113911140111411114211143111441114511146111471114811149111501115111152111531115411155111561115711158111591116011161111621116311164111651116611167111681116911170111711117211173111741117511176111771117811179111801118111182111831118411185111861118711188111891119011191111921119311194111951119611197111981119911200112011120211203112041120511206112071120811209112101121111212112131121411215112161121711218112191122011221112221122311224112251122611227112281122911230112311123211233112341123511236112371123811239112401124111242112431124411245112461124711248112491125011251112521125311254112551125611257112581125911260112611126211263112641126511266112671126811269112701127111272112731127411275112761127711278112791128011281112821128311284112851128611287112881128911290112911129211293112941129511296112971129811299113001130111302113031130411305113061130711308113091131011311113121131311314113151131611317113181131911320113211132211323113241132511326113271132811329113301133111332113331133411335113361133711338113391134011341113421134311344113451134611347113481134911350113511135211353113541135511356113571135811359113601136111362113631136411365113661136711368113691137011371113721137311374113751137611377113781137911380113811138211383113841138511386113871138811389113901139111392113931139411395113961139711398113991140011401114021140311404114051140611407114081140911410114111141211413114141141511416114171141811419114201142111422114231142411425114261142711428114291143011431114321143311434114351143611437114381143911440114411144211443114441144511446114471144811449114501145111452114531145411455114561145711458114591146011461114621146311464114651146611467114681146911470114711147211473114741147511476114771147811479114801148111482114831148411485114861148711488114891149011491114921149311494114951149611497114981149911500115011150211503115041150511506115071150811509115101151111512115131151411515115161151711518115191152011521115221152311524115251152611527115281152911530115311153211533115341153511536115371153811539115401154111542115431154411545115461154711548115491155011551115521155311554115551155611557115581155911560115611156211563115641156511566115671156811569115701157111572115731157411575115761157711578115791158011581115821158311584115851158611587115881158911590115911159211593115941159511596115971159811599116001160111602116031160411605116061160711608116091161011611116121161311614116151161611617116181161911620116211162211623116241162511626116271162811629116301163111632116331163411635116361163711638116391164011641116421164311644116451164611647116481164911650116511165211653116541165511656116571165811659116601166111662116631166411665116661166711668116691167011671116721167311674116751167611677116781167911680116811168211683116841168511686116871168811689116901169111692116931169411695116961169711698116991170011701117021170311704117051170611707117081170911710117111171211713117141171511716117171171811719117201172111722117231172411725117261172711728117291173011731117321173311734117351173611737117381173911740117411174211743117441174511746117471174811749117501175111752117531175411755117561175711758117591176011761117621176311764117651176611767117681176911770117711177211773117741177511776117771177811779117801178111782117831178411785117861178711788117891179011791117921179311794117951179611797117981179911800118011180211803118041180511806118071180811809118101181111812118131181411815118161181711818118191182011821118221182311824118251182611827118281182911830118311183211833118341183511836118371183811839118401184111842118431184411845118461184711848118491185011851118521185311854118551185611857118581185911860118611186211863118641186511866118671186811869118701187111872118731187411875118761187711878118791188011881118821188311884118851188611887118881188911890118911189211893118941189511896118971189811899119001190111902119031190411905119061190711908119091191011911119121191311914119151191611917119181191911920119211192211923119241192511926119271192811929119301193111932119331193411935119361193711938119391194011941119421194311944119451194611947119481194911950119511195211953119541195511956119571195811959119601196111962119631196411965119661196711968119691197011971119721197311974119751197611977119781197911980119811198211983119841198511986119871198811989119901199111992119931199411995119961199711998119991200012001120021200312004120051200612007120081200912010120111201212013120141201512016120171201812019120201202112022120231202412025120261202712028120291203012031120321203312034120351203612037120381203912040120411204212043120441204512046120471204812049120501205112052120531205412055120561205712058120591206012061120621206312064120651206612067120681206912070120711207212073120741207512076120771207812079120801208112082120831208412085120861208712088120891209012091120921209312094120951209612097120981209912100121011210212103121041210512106121071210812109121101211112112121131211412115121161211712118121191212012121121221212312124121251212612127121281212912130121311213212133121341213512136121371213812139121401214112142121431214412145121461214712148121491215012151121521215312154121551215612157121581215912160121611216212163121641216512166121671216812169121701217112172121731217412175121761217712178121791218012181121821218312184121851218612187121881218912190121911219212193121941219512196121971219812199122001220112202122031220412205122061220712208122091221012211122121221312214122151221612217122181221912220122211222212223122241222512226122271222812229122301223112232122331223412235122361223712238122391224012241122421224312244122451224612247122481224912250122511225212253122541225512256122571225812259122601226112262122631226412265122661226712268122691227012271122721227312274122751227612277122781227912280122811228212283122841228512286122871228812289122901229112292122931229412295122961229712298122991230012301123021230312304123051230612307123081230912310123111231212313123141231512316123171231812319123201232112322123231232412325123261232712328123291233012331123321233312334123351233612337123381233912340123411234212343123441234512346123471234812349123501235112352123531235412355123561235712358123591236012361123621236312364123651236612367123681236912370123711237212373123741237512376123771237812379123801238112382123831238412385123861238712388123891239012391123921239312394123951239612397123981239912400124011240212403124041240512406124071240812409124101241112412124131241412415124161241712418124191242012421124221242312424124251242612427124281242912430124311243212433124341243512436124371243812439124401244112442124431244412445124461244712448124491245012451124521245312454124551245612457124581245912460124611246212463124641246512466124671246812469124701247112472124731247412475124761247712478124791248012481124821248312484124851248612487124881248912490124911249212493124941249512496124971249812499125001250112502125031250412505125061250712508125091251012511125121251312514125151251612517125181251912520125211252212523125241252512526125271252812529125301253112532125331253412535125361253712538125391254012541125421254312544125451254612547125481254912550125511255212553125541255512556125571255812559125601256112562125631256412565125661256712568125691257012571125721257312574125751257612577125781257912580125811258212583125841258512586125871258812589125901259112592125931259412595125961259712598125991260012601126021260312604126051260612607126081260912610126111261212613126141261512616126171261812619126201262112622126231262412625126261262712628126291263012631126321263312634126351263612637126381263912640126411264212643126441264512646126471264812649126501265112652126531265412655126561265712658126591266012661126621266312664126651266612667126681266912670126711267212673126741267512676126771267812679126801268112682126831268412685126861268712688126891269012691126921269312694126951269612697126981269912700127011270212703127041270512706127071270812709127101271112712127131271412715127161271712718127191272012721127221272312724127251272612727127281272912730127311273212733127341273512736127371273812739127401274112742127431274412745127461274712748127491275012751127521275312754127551275612757127581275912760127611276212763127641276512766127671276812769127701277112772127731277412775127761277712778127791278012781127821278312784127851278612787127881278912790127911279212793127941279512796127971279812799128001280112802128031280412805128061280712808128091281012811128121281312814128151281612817128181281912820128211282212823128241282512826128271282812829128301283112832128331283412835128361283712838128391284012841128421284312844128451284612847128481284912850128511285212853128541285512856128571285812859128601286112862128631286412865128661286712868128691287012871128721287312874128751287612877128781287912880128811288212883128841288512886128871288812889128901289112892128931289412895128961289712898128991290012901129021290312904129051290612907129081290912910129111291212913129141291512916129171291812919129201292112922129231292412925129261292712928129291293012931129321293312934129351293612937129381293912940129411294212943129441294512946129471294812949129501295112952129531295412955129561295712958129591296012961129621296312964129651296612967129681296912970129711297212973129741297512976129771297812979129801298112982129831298412985129861298712988129891299012991129921299312994129951299612997129981299913000130011300213003130041300513006130071300813009130101301113012130131301413015130161301713018130191302013021130221302313024130251302613027130281302913030130311303213033130341303513036130371303813039130401304113042130431304413045130461304713048130491305013051130521305313054130551305613057130581305913060130611306213063130641306513066130671306813069130701307113072130731307413075130761307713078130791308013081130821308313084130851308613087130881308913090130911309213093130941309513096130971309813099131001310113102131031310413105131061310713108131091311013111131121311313114131151311613117131181311913120131211312213123131241312513126131271312813129131301313113132131331313413135131361313713138131391314013141131421314313144131451314613147131481314913150131511315213153131541315513156131571315813159131601316113162131631316413165131661316713168131691317013171131721317313174131751317613177131781317913180131811318213183131841318513186131871318813189131901319113192131931319413195131961319713198131991320013201132021320313204132051320613207132081320913210132111321213213132141321513216132171321813219132201322113222132231322413225132261322713228132291323013231132321323313234132351323613237132381323913240132411324213243132441324513246132471324813249132501325113252132531325413255132561325713258132591326013261132621326313264132651326613267132681326913270132711327213273132741327513276132771327813279132801328113282132831328413285132861328713288132891329013291132921329313294132951329613297132981329913300133011330213303133041330513306133071330813309133101331113312133131331413315133161331713318133191332013321133221332313324133251332613327133281332913330133311333213333133341333513336133371333813339133401334113342133431334413345133461334713348133491335013351133521335313354133551335613357133581335913360133611336213363133641336513366133671336813369133701337113372133731337413375133761337713378133791338013381133821338313384133851338613387133881338913390133911339213393133941339513396133971339813399134001340113402134031340413405134061340713408134091341013411134121341313414134151341613417134181341913420134211342213423134241342513426134271342813429134301343113432134331343413435134361343713438134391344013441134421344313444134451344613447134481344913450134511345213453134541345513456134571345813459134601346113462134631346413465134661346713468134691347013471134721347313474134751347613477134781347913480134811348213483134841348513486134871348813489134901349113492134931349413495134961349713498134991350013501135021350313504135051350613507135081350913510135111351213513135141351513516135171351813519135201352113522135231352413525135261352713528135291353013531135321353313534135351353613537135381353913540 |
- ;;; 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
|