From fcdb7727134df0d2fbf79a9be821026d150d3ca9 Mon Sep 17 00:00:00 2001
From: Doug Coleman <doug.coleman@gmail.com>
Date: Thu, 4 Sep 2008 12:55:39 -0500
Subject: [PATCH] remove graphics from unmaintained

---
 unmaintained/graphics/authors.txt             |   1 -
 unmaintained/graphics/bitmap/authors.txt      |   1 -
 unmaintained/graphics/bitmap/bitmap.factor    | 134 ------------------
 .../graphics/bitmap/test-images/1bit.bmp      | Bin 1662 -> 0 bytes
 .../graphics/bitmap/test-images/rgb4bit.bmp   | Bin 5318 -> 0 bytes
 .../graphics/bitmap/test-images/rgb8bit.bmp   | Bin 11078 -> 0 bytes
 .../bitmap/test-images/thiswayup24.bmp        | Bin 60054 -> 0 bytes
 unmaintained/graphics/tags.txt                |   1 -
 unmaintained/graphics/viewer/authors.txt      |   1 -
 unmaintained/graphics/viewer/viewer.factor    |  26 ----
 10 files changed, 164 deletions(-)
 delete mode 100644 unmaintained/graphics/authors.txt
 delete mode 100755 unmaintained/graphics/bitmap/authors.txt
 delete mode 100755 unmaintained/graphics/bitmap/bitmap.factor
 delete mode 100644 unmaintained/graphics/bitmap/test-images/1bit.bmp
 delete mode 100644 unmaintained/graphics/bitmap/test-images/rgb4bit.bmp
 delete mode 100644 unmaintained/graphics/bitmap/test-images/rgb8bit.bmp
 delete mode 100644 unmaintained/graphics/bitmap/test-images/thiswayup24.bmp
 delete mode 100644 unmaintained/graphics/tags.txt
 delete mode 100755 unmaintained/graphics/viewer/authors.txt
 delete mode 100644 unmaintained/graphics/viewer/viewer.factor

diff --git a/unmaintained/graphics/authors.txt b/unmaintained/graphics/authors.txt
deleted file mode 100644
index 7c1b2f2279..0000000000
--- a/unmaintained/graphics/authors.txt
+++ /dev/null
@@ -1 +0,0 @@
-Doug Coleman
diff --git a/unmaintained/graphics/bitmap/authors.txt b/unmaintained/graphics/bitmap/authors.txt
deleted file mode 100755
index 7c1b2f2279..0000000000
--- a/unmaintained/graphics/bitmap/authors.txt
+++ /dev/null
@@ -1 +0,0 @@
-Doug Coleman
diff --git a/unmaintained/graphics/bitmap/bitmap.factor b/unmaintained/graphics/bitmap/bitmap.factor
deleted file mode 100755
index d2ddad0ae3..0000000000
--- a/unmaintained/graphics/bitmap/bitmap.factor
+++ /dev/null
@@ -1,134 +0,0 @@
-! Copyright (C) 2007 Doug Coleman.
-! See http://factorcode.org/license.txt for BSD license.
-
-USING: alien arrays byte-arrays combinators summary
-io.backend graphics.viewer io io.binary io.files kernel libc
-math math.functions namespaces opengl opengl.gl prettyprint
-sequences strings ui ui.gadgets.panes io.encodings.binary ;
-IN: graphics.bitmap
-
-! Currently can only handle 24bit bitmaps.
-! Handles row-reversed bitmaps (their height is negative)
-
-TUPLE: bitmap magic size reserved offset header-length width
-    height planes bit-count compression size-image
-    x-pels y-pels color-used color-important rgb-quads color-index array ;
-
-: raw-bitmap>string ( str n -- str )
-    {
-        { 32 [ "32bit" throw ] }
-        { 24 [ ] }
-        { 16 [ "16bit" throw ] }
-        { 8 [ "8bit" throw ] }
-        { 4 [ "4bit" throw ] }
-        { 2 [ "2bit" throw ] }
-        { 1 [ "1bit" throw ] }
-    } case ;
-
-ERROR: bitmap-magic ;
-
-M: bitmap-magic summary
-    drop "First two bytes of bitmap stream must be 'BM'" ;
-
-: parse-file-header ( bitmap -- )
-    2 read >string dup "BM" = [ bitmap-magic ] unless
-        over set-bitmap-magic
-    4 read le> over set-bitmap-size
-    4 read le> over set-bitmap-reserved
-    4 read le> swap set-bitmap-offset ;
-
-: parse-bitmap-header ( bitmap -- )
-    4 read le> over set-bitmap-header-length
-    4 read le> over set-bitmap-width
-    4 read le> over set-bitmap-height
-    2 read le> over set-bitmap-planes
-    2 read le> over set-bitmap-bit-count
-    4 read le> over set-bitmap-compression
-    4 read le> over set-bitmap-size-image
-    4 read le> over set-bitmap-x-pels
-    4 read le> over set-bitmap-y-pels
-    4 read le> over set-bitmap-color-used
-    4 read le> swap set-bitmap-color-important ;
-
-: rgb-quads-length ( bitmap -- n )
-    [ bitmap-offset 14 - ] keep bitmap-header-length - ;
-
-: color-index-length ( bitmap -- n )
-    [ bitmap-width ] keep [ bitmap-planes * ] keep
-    [ bitmap-bit-count * 31 + 32 /i 4 * ] keep
-    bitmap-height abs * ;
-
-: parse-bitmap ( bitmap -- )
-    dup rgb-quads-length read over set-bitmap-rgb-quads
-    dup color-index-length read swap set-bitmap-color-index ;
-
-: load-bitmap ( path -- bitmap )
-    normalize-path binary [
-        T{ bitmap } clone
-        dup parse-file-header
-        dup parse-bitmap-header
-        dup parse-bitmap
-    ] with-file-reader
-    dup bitmap-color-index over bitmap-bit-count
-    raw-bitmap>string >byte-array over set-bitmap-array ;
-
-: save-bitmap ( bitmap path -- )
-    binary [
-        "BM" write
-        dup bitmap-array length 14 + 40 + 4 >le write
-        0 4 >le write
-        54 4 >le write
-
-        40 4 >le write
-        dup bitmap-width 4 >le write
-        dup bitmap-height 4 >le write
-        dup bitmap-planes 1 or 2 >le write
-        dup bitmap-bit-count 24 or 2 >le write
-        dup bitmap-compression 0 or 4 >le write
-        dup bitmap-size-image 4 >le write
-        dup bitmap-x-pels 4 >le write
-        dup bitmap-y-pels 4 >le write
-        dup bitmap-color-used 4 >le write
-        dup bitmap-color-important 4 >le write
-        dup bitmap-rgb-quads write
-        bitmap-color-index write
-    ] with-file-writer ;
-
-M: bitmap draw-image ( bitmap -- )
-    dup bitmap-height 0 < [
-        0 0 glRasterPos2i
-        1.0 -1.0 glPixelZoom
-    ] [
-        0 over bitmap-height abs glRasterPos2i
-        1.0 1.0 glPixelZoom
-    ] if
-    [ bitmap-width ] keep
-    [
-        [ bitmap-height abs ] keep
-        bitmap-bit-count {
-            ! { 32 [ GL_BGRA GL_UNSIGNED_INT_8_8_8_8 ] } ! broken
-            { 24 [ GL_BGR GL_UNSIGNED_BYTE ] }
-        } case
-    ] keep bitmap-array glDrawPixels ;
-
-M: bitmap width ( bitmap -- ) bitmap-width ;
-M: bitmap height ( bitmap -- ) bitmap-height ;
-
-: bitmap. ( path -- )
-    load-bitmap <graphics-gadget> gadget. ;
-
-: bitmap-window ( path -- gadget )
-    load-bitmap <graphics-gadget> [ "bitmap" open-window ] keep ;
-
-: test-bitmap24 ( -- )
-    "resource:extra/graphics/bitmap/test-images/thiswayup24.bmp" bitmap. ;
-
-: test-bitmap8 ( -- )
-    "resource:extra/graphics/bitmap/test-images/rgb8bit.bmp" bitmap. ;
-
-: test-bitmap4 ( -- )
-    "resource:extra/graphics/bitmap/test-images/rgb4bit.bmp" bitmap. ;
-
-: test-bitmap1 ( -- )
-    "resource:extra/graphics/bitmap/test-images/1bit.bmp" bitmap. ;
-
diff --git a/unmaintained/graphics/bitmap/test-images/1bit.bmp b/unmaintained/graphics/bitmap/test-images/1bit.bmp
deleted file mode 100644
index 2f244c1d058bfd63c99009e24e43db3d2af59902..0000000000000000000000000000000000000000
GIT binary patch
literal 0
HcmV?d00001

literal 1662
zcmd6mu}&N@5QY~a(QcXY+PnZo8WyGJ9a2QJkP4yX)=xlQ0r3D)UI5Obx(-^<!CB~v
zYq&EJ0w3Dg!_2I`wl^(Ouw?Ij{%6MH@!aQ~dZXa6h3iM0U;SJw)_8y0>kP>P00mA^
zwBUF^jlQ?E;2?IzW6rM6HrH!wQhyj)b6UoD@XeYt9ody`K1_Mt%?}f{KVbJy%jcAj
zt>KGpdF1)G8#sXx#Xjmy4aWdZ=sgF-W=L!giOF7nXWqQfqxQZB=n3}M&%h;db954z
z5E@tMx~mVf%2{3&6~$+BXh5o3M#kinNOWWu>rFlx|3%95W4uyouK-4#SClXoB<Kwl
z$Mm>~%*C^4<Nev5>(}0onQG*9L-9b-!uM&JH<>m6OjuQDiV1l8<v=`C@Y3;}yPHdR
z?s(=FbES+3_E&ECL90s{c<N>blvI&dpWsH&fqeed;%iU%z`!sV;|oL`;1cM@txn1q
zeNvtP$iOI5M`t`8&@TI<<jc`Ax@J7?F`*yq9{|7qj}>PT&zE=wk>n#+W#})qlnu6j
zqKlaxW~`Q2))-G*FH&~!a+~whBxMUv@;vdku#nh6UAzYFMb4TYyweT-0k9zwR(&q}
gI+mcb*Vx}V%YV4a?71qPKl;*mGj7Ahc<-2B0n`=D`~Uy|

diff --git a/unmaintained/graphics/bitmap/test-images/rgb4bit.bmp b/unmaintained/graphics/bitmap/test-images/rgb4bit.bmp
deleted file mode 100644
index 0c6f00d06c025f6947899450afd91ace50e5b57a..0000000000000000000000000000000000000000
GIT binary patch
literal 0
HcmV?d00001

literal 5318
zcmeH~J&xNj5QP;WN5~=4`v3&C50FFT3~?!6!<BkBxq_=y3+!Q37%~hnZ~iD!B4tuY
zn!vLX#Uba@3?FG@{r2tmmyYcx+ON2O=>4ht%;Vp6o}HvQbsetmbdm>Jba9`$>-CBW
z&sXO?^>E{lhR9!<TMjIJ=F&mupHR$<2blM`$SN5`j{6v`X_@Dpj4RMaYIB^27{1U%
z_Cfu3Ze>(7a2zZE6-lcLCee=>GUfm*FpgFiOoJB;bmNH8kGz;lh9PADMtQ8LMIPr=
zXg4}Uqs}^pqnuRP#EkO(krh!9^0kd57)N6zE6X#g6{4#dWUvKPGk8B|T2&<jTH9lu
zmUEDtm3fkT%FNp%pVdWF>OMaBU`Hog@}yCzSE?<IO1=M-Y1EoEX=6mjCPssIFwt?V
zI6IOcN>j_kY5ozzDdN&9^7!Rfd<~Nxb9m1`KP%+#GM8WL1Ugcx?c$r6yKiRhNYa{z
z;u{%M*33`}Dz9KU-R}OvRzR|Q%B3OG4yLF=zP3^Z8GkYP&uMXERL-1k{?e{>`2>{r
zXBYFNxa@j74)(^93d{zP*LoAc<SS2`1~(PdbUQBumVcVl!DEh@=9p?`*k*d2j%$nS
z%jB`;gmZxS81ZgSX}t_H*&IJz;<1xqh9t@b?|AId$4w75UC%V7X`<SCPa5|*X5d$Z
z##!&ydxFs760<z#vyI5pnM({-f)<yUF^k$}sRI)vFs*?M_8NMwnVV=qlOd0fM8I#_
zgZ(_)%o8#86N+A1W`-%sgTfqzvk}7=8a1tLgTX>fxoXDV-do2s*vMm{E9N{zTBqwN
zG1#7Iu*qn1FvMHgqeHitXfRDk6byN03)|m^F=c{JojpwQf{<q(&E=VA(JL}T5|%hc
WCW%U&K6S~{v$LMq7<n;!b^8Nl+YTZC

diff --git a/unmaintained/graphics/bitmap/test-images/rgb8bit.bmp b/unmaintained/graphics/bitmap/test-images/rgb8bit.bmp
deleted file mode 100644
index bc95c0f94e6ec751812604d88d81830dbc9a991c..0000000000000000000000000000000000000000
GIT binary patch
literal 0
HcmV?d00001

literal 11078
zcmeH|JC5r%6owffManFJT>_*}O{7SdJ+KHc+c-;MVPqYwvxXF0!fj`A0o{+JNRhIw
zhh<HXSf0;^Fa1Byp{)7skKcb$>H771rGBRM=g4>Jhcy1<Pbu8^5~cW4B02C)Q+e-|
z|HrE@fB&VFHei7X?Z87&$|%r4!&ne-;2|hw6=*O(#|k*`5Jq23G+;r%frp?JP31Hg
zupr>TLtv8%G#IcT;J`yria!-J7_cDVz(Y_*u}!5Rek=$$@DOrpS`!Ue5OClj<g|?@
z8n7VXz(dF-v6^VWf`9`LA(u-u(SQX32OdH$rPD+M76cr42)WE&6Af4paNr@NBQQY|
z4OkFx;2|g>e^DA@<`&||frp?(E6`xTf`9`LAs?I3L<1HC9C!%%NUbIsupr>TL&(RC
ziHHFU0uDTc{3tk0G+;r%frpSE6R(K|EC@L85Yi(gK@$yF5OCljC{O-gX)s_xz(M?k
z{Ag)SG+;r%frpSEJEMsPEC@L85b`5wHPL_t0S6vJeq2Qp4OkFx;34Ek*=eEy3jz*2
zg#4I$O*CLZz^O0)4(h@>K~Je6{i$JyE#MP}Vt@5|TU~K{LG*Zv&s(|Tp58ji=Xs3z
zCiTzo=xei<$Jcs|`@9#**2gO4Fny21H}C#hM=`7ITa8IC&NjW&%%^qhzG3Ke7hR$h
zN~6q`M;tGc<C+pWkKVB?$uVuT8OoLn%-xzbV{@NJO(RREZt}<zxAT})r*~|3^j7v;
zb!bH8)E{eD=h{1m-5yiTlSe(EY}IL(&H)eH+I`3KDyn_l>Jc}c@0^70Y4#30y8Q|C
zy=ie2&f=5B?4>m=p0~DnB;o066nSzUQ8jurS&T*-LZ8RIQYE4Lhq~g^c`RD22rW$G
zQD3}kFU19!#i=fjrPtM>%JSsPW4S)<?5Ef2yk~bx>nxASVfMehojBC)ci#672{$))
zs$Hj9bg<dVw(Wzm-R+HT)9jWU?li(p^RR3$P?c+=pMOfPyxE^3_7d4ufsc=mUF-KR
zjs_=tB>7W4#wwlZQM60kU+L95s&s9v-m-T=RX*>z!h)x^UVC@AX?;y2t?ql91U4+1
zsm{6^1U4)=MRex-@|YE5q5G=ULUHC(=e<H2r~k@{@J?*9I;|OByQhi2gkKf-|5V^|
zKh^j5`*V9{F55f~xoz_}WHBtHF_c=BxTikN+9iw8<DkQ^m`3(ER;HNFY94znF7X-*
zm1F5O)tj2{L;UQ#qGB=G=CN)u?K*8{l+R&{$2-?r8t9a5$EBs6<hOWisZ|!sYBxRV
z)Xm+d(^yMnl&JeJ{ghP9D_%F{(_lXF6_av*(JpcHz~#OHGoRo=0x^e&^2nQy-)m_+
z;*n1v)hEfH;*sR1uP1sGsS>Nn)j*wzjr;>#IgV2AB2{8lx*Di6(ITJ5Hjk=w)u;ol
zc4_0W;Z>6IXntf@l2-#oKgP8L%G&;Cd?k4`Q108|(c}>CT9j<%Q+rz;m-?p70=qmm
zS)?R7*{*Z7@BIT~nX+vAy<h6?9c9n))JyyB;s+-t-Tv8nQ10e!)nk6}H&;J6$oA9q
L;O(#5HdNpn{wk?S

diff --git a/unmaintained/graphics/bitmap/test-images/thiswayup24.bmp b/unmaintained/graphics/bitmap/test-images/thiswayup24.bmp
deleted file mode 100644
index 202fb153715c85a2d18f753fe5f9b86ac5bc9e1d..0000000000000000000000000000000000000000
GIT binary patch
literal 0
HcmV?d00001

literal 60054
zcmeHO+p#RS4IF2o5FCL6@V|2KhXdIt9Ft;E5;AsiPYb63f*|Lyv!^(kI|Vkn8z4w+
zNvhJnfB)Z~+w1w4eE%tb{*XWal|TR3ev|LE{pVNywfOb<YdyzJVEb#Um=$RitHt^8
z6R6*oI&)%ZVjjK|R!j2s2@GA8A@b1HTFxze$b6A6n}D2`zC#sHI_1Q+m1^Nb+gaqp
zCop#|qblLk8*XIOR!k-&Vd(`PJAt`#DXN5~FZCSCLy&}iIiwmQ`&tV*djgdM$~ltN
z7p>-e&}={sHs#|9e{ZsoQzy_pqb@<)vosqQn-@u4Rc98fFWRvas2os*BV7p%Oa#Sl
zm0wg9X~oi~(tiDpOUI4()as$RbaKH{Iim_kTLlwAaSO_?s4ARd(Nk%9k-8<WIc065
z*iyIW3ZZgL70$2Dzkagn5(p)zs4ASw#!ux8-Ii;Pd#I)T!>Jrog+rZqi6H)kO8H6v
z7zWA=Q}+QcKE&?EuerLmjmj}qIM!2QlF(Ag01<d$ZcEvlEbn%yo>M*NpQ+^F=*1D(
zGX+S2<&aOZgo%{{lpw@I5UM;2+8cwDPO!BjKG*2}oYay(3yWxMk#GxLf>j9_d<2%D
zahS5&qQukQh@5nYen)zv2oI}=APGm8-Lq3dNTXU6j!J|HG6HgwWh*s`d*^o{XPltl
z%X7HV@6vOmQL07u&PAkkK+gu`uh*jimWi`)^i4QORcu>D!zv+&a)$)rp$s`6eu823
zyo%3yB(yDpty5DuvKnC7H7_!S)@3FHN>$vtop%Y(jvK!NU9A#!$`7eRyEwchIvVO3
zSq-oxTDYu`h0~=a1eM!w*vYXVoydgw;fEOZ(5+$#HV)lJ!Q|A$O0(b~C|2q6g;3!X
z%Uwfzc6{{jm3k)MiLG^;v;-SZ)bf)2STzd{0`Jp8M51p_Xk`VTD4MwKPw9U4_|PGC
z4T)bY-BnqFjf?&{Ek8BQf`cIU^jQ(=o1|LiE!<mOgXm87)S^SArFWjI*tL~H;2`kT
z=aBr=Gz$)b>007ICU$9Kln6m&uMhMH_8bIhX&LUQ!XaTr0uBN)nO^3nrde<hOqUa(
znCPn}<cTbTJ+;oz>JjWYhzae4<T>is5R)Om7C}NDO3|^BR<qzBAX;mg@Fj(}CBGq#
z`6HNUazZ;H(Z+HivIr)&6H1b!7rth}K@eIIDC8kN$?v(u{1MFc`5ev2zf=y9ZA)FD
z61p_&S&8$br@N7pZ8;L!)JMmdKZ5D)h(q0^&ZK^{N+Q=(LLkHXGPwhkl4ZrVNUK=g
zjf43kNIE=(BPJD}qzy@_N$8WLa?eUu?+<;S{k%GY0})zF@PAl9=R!-`tezKv;W9bd
zyhP}hfGA{p1DFU8Ptm<P-2bBu^Fz<Ge&aY_8+h6oh*mtqd3jDupmiKAe4@lPl8<Zn
znz6jGikt{N9wEXFm+M~L?NIbY?DuXRR{B}@sxqa;8J)noSECbK{K^E@y{b%UaV91p
zS8F|M0*6mv-K)b#x(sCkpLeew>lgL|Ztl8QA8<&Y+2V&?t@V5LA=m8l?v-4vb-QkV
zyFTn*={(oHTKDRV39Nf{##9gW{K(%cnSflab-NC|35T0~@YOne7R&Is39Nf{+$@*V
z-xFB(>hD>s=(q{Uz52+j^;rMy{kThTj?+ipD;dSQTIbw{qg>a$I%<;3=Z8#S{bc=+
zgS^=`*1fvff&83y*46qsXL+Zcy!~Fiy@5NO#?R^Hy~irm-`l{?Imp6JblUb?5Y1EG
zc(S_3`POfv#9^J(QPDr4Ns1ni5P_D7IWcuP>K~fSfp085*Kn@F<ZX~kDp^bkK})5C
zkk$eP$J??MJd}6&qpHMkDD|$oLrv}>AF@H1AP8GR7J;ROV3E+(S|5qQM?i$Lm+z`u
z+1DYx?KdF@T4E!F(^6<2fmQ<{gq#p0tzBBajV<TY_$@_?J8JbNcq<h;50NVlEklnJ
zLd!}m;Z#)Ciukm&%=6;66fJJ2)tlh0lyz2Gg=tkj_6{BqRRs(=VMSqrjKDKJ5|XW(
zmz;rwZJbeP!n4&|cS>EtP%~j01kw`zgwqnVFi`S@BykH<XMjU(pV2_#8TOV>Te6`l
zsnSh_h8DE3ce7a=dnO@5)|c>PnfvG2#C9}wSs~k4aaOI~6c4i@XiHDTEl<HU)gqu4
z5g-I12}qkWyW}n*@gGWER>*cGMJsh%9L0UsBev*toY=NH@wLc=mYxr!$Sl&tw$4Nk
z6TvlAs4*$pt(y?SR0vYtiDhmp*_>c260@i!l{G|cIh*_M`JicF$&@;3xu?WVt;iFH
zBqe+IS&v*ZBB_hgTj4-K*7j7Me8bJs)~x5&>!D&u{u4{v(x`mDHgOnACFIdfd4An|
zyZlV0H)`+t9{j`vp{_zs3*4_w9EMT}xz&6fubXd|-z&e1JM<u3)raP{uwR=v45bpX
zZ+jG}n{S2xC9Li?+NbiRhwihd2hr-ARN3P%wtM8NZFQJC`)r7)dH79cQcrE}1O@S6
z-Ecp%SpDHTua{PB?vQ7@wWj4(Xk)GD5$ePf1ktzXK!y{`Ejk(jLwv%2PI5u@$7|#A
z)i>-@Ibo^-PRp&(#!{4)VH+)u;CMsff#Bxul_DNLuxQung6a>maU0v-TDavT@wD6u
zZ7j8DnN)vcYBRG%8w!RgaEgJL=u7+%w46h#Tf;DZd~II>eTfDF;kwMT!s!x1TN2vF
zrVU$#hVbocTwPVjR4`0+4T%6N31El-WX;kS*;9junU#&Ts7KIDk{aTGYy&dK5`iV}
ziMOx6@g?X!o}+Rv^i1I>s1kg=wt}c!nXvUjO#!zmfF}hHGf#>2MJ<~JC_xLioH~tE
zUg#V1k~w7i+P(z(CO#l5N0$Uj$|II<3BuG@2}560Nld^&10YjssC0$=_!=z8KoB6M
zK?^6EEbC0tP7BGWyWGBSUzUVe2TJLZK;e5tO@JdH+}7&GVq)KrpA@20DBlA<z7JNc
zfFQ8`A!rFU9wHwiv?i5!bK4h{fGym5f`dS_w1fmWf}9Uw9*~<QQ_3#|A<)YA#1A)E
zAPC^^5v0Okln;|>AsluFn;VN55{RV)h&>IRfK%i{m<O=+G)mFZ^N&RyuYatvo`T4u
zU*NO^o&*yTb(<C@&G^*z{XSTNr2IpmUAAJFSb~6dX=Cu~K_aIVE$bzwnGZKcK?tN}
zrPhQ*ZKs7{S1q?~$GsA*eXJFwlty5eZ_V?VoGqDBw6x5V;zx9g1hfw=ZK@SdNYrXt
z*y<$2x7WRruYbCrCn(}^HTO6W1ip<5lE^7V%ZmAa&g1)dWoZ!`*K5tG#D7{??@gH7
zYs>nzLXT)xaHJ4GsEEfwpg@?T5^~UGQjt=$4BgHEAMR>t6~gPKuNT&P6DH;?0llG*
z<s^hK6@qFQrs|-Wv>r;)vZXo$e|-O$k`jVUKhxT2VZGID$G+-Sa;Ee!-G*w19HwjK
zyC`NK-v>_1qKVR`wbR0Sd)xPI)`g$TeD9X!O!bukO0egdmQM@o-ERA~Rxh-eb^>~`
zJI|Novb3))M==R0d&qKI_v(;24w~o%7!-ZGHueh5xs6sI;;(x(G_G5b<vQK=S@-I;
pN3$AR6Ic^i6Ic^i6Ic^i6Ic^i6Ic^i6Ic^i6Ic^i6F7PT{|ANeI{W|t

diff --git a/unmaintained/graphics/tags.txt b/unmaintained/graphics/tags.txt
deleted file mode 100644
index 04b54a06f4..0000000000
--- a/unmaintained/graphics/tags.txt
+++ /dev/null
@@ -1 +0,0 @@
-bitmap graphics
diff --git a/unmaintained/graphics/viewer/authors.txt b/unmaintained/graphics/viewer/authors.txt
deleted file mode 100755
index 7c1b2f2279..0000000000
--- a/unmaintained/graphics/viewer/authors.txt
+++ /dev/null
@@ -1 +0,0 @@
-Doug Coleman
diff --git a/unmaintained/graphics/viewer/viewer.factor b/unmaintained/graphics/viewer/viewer.factor
deleted file mode 100644
index 938dc61c09..0000000000
--- a/unmaintained/graphics/viewer/viewer.factor
+++ /dev/null
@@ -1,26 +0,0 @@
-! Copyright (C) 2007 Doug Coleman.
-! See http://factorcode.org/license.txt for BSD license.
-
-USING: arrays kernel math math.functions namespaces opengl
-ui.gadgets ui.render ;
-IN: graphics.viewer
-
-TUPLE: graphics-gadget image ;
-
-GENERIC: draw-image ( image -- )
-GENERIC: width ( image -- w )
-GENERIC: height ( image -- h )
-
-M: graphics-gadget pref-dim*
-    graphics-gadget-image
-    [ width ] keep height abs 2array ;
-
-M: graphics-gadget draw-gadget* ( gadget -- )
-    origin get [
-        graphics-gadget-image draw-image
-    ] with-translation ;
-
-: <graphics-gadget> ( bitmap -- gadget )
-    \ graphics-gadget construct-gadget
-    [ set-graphics-gadget-image ] keep ;
-