~ubuntu-branches/ubuntu/natty/perl-tk/natty

« back to all changes in this revision

Viewing changes to pTk/mTk/generic/tkTextImage.c

  • Committer: Bazaar Package Importer
  • Author(s): Stephen Zander
  • Date: 2004-03-14 13:54:44 UTC
  • mfrom: (1.1.1 upstream)
  • Revision ID: james.westby@ubuntu.com-20040314135444-prc09u2or4dbr3to
Tags: 1:800.025-2
Add xlibs-dev to Build-Depends:,
Closes: #237942

Show diffs side-by-side

added added

removed removed

Lines of Context:
1
 
/* 
 
1
/*
2
2
 * tkImage.c --
3
3
 *
4
4
 *      This file contains code that allows images to be
217
217
        /*
218
218
         * Don't allow insertions on the last (dummy) line of the text.
219
219
         */
220
 
    
 
220
 
221
221
        lineIndex = TkBTreeLineIndex(index.linePtr);
222
222
        if (lineIndex == TkBTreeNumLines(textPtr->tree)) {
223
223
            lineIndex--;
347
347
        return TCL_OK;
348
348
    }
349
349
 
350
 
    /* 
 
350
    /*
351
351
     * Find a unique name for this image.  Use imageName (or imageString)
352
352
     * if available, otherwise tack on a #nn and use it.  If a name is already
353
353
     * associated with this image, delete the name.
374
374
            if (new > count) {
375
375
                count = new;
376
376
            }
377
 
            if (len == (int) strlen(haveName)) {
 
377
            if (len == strlen(haveName)) {
378
378
                conflict = 1;
379
379
            }
380
380
        }
478
478
    Tcl_FreeProc **freeProcPtr;         /* Pointer to variable to fill in with
479
479
                                         * information about how to reclaim
480
480
                                         * storage for return string. */
481
 
{   
482
 
    Arg result = NULL; 
 
481
{
 
482
    Arg result = NULL;
483
483
    *freeProcPtr = (Tcl_FreeProc *) NULL;
484
484
    switch (((TkTextEmbImage *) widgRec)->align) {
485
485
        case ALIGN_BASELINE: