View | Details | Raw Unified
Collapse All | Expand All

(-) file_not_specified_in_diff (-2 / +5 lines)
 Lines 668-674    Link Here  
        if (~(otype = ask ('print to', 'choice', 'file|printer')))
        if (~(otype = ask ('print to', 'choice', 'file|printer')))
            return;
            return;
    if (otype == 'printer') {
    if (otype == 'printer') {
        name = '/tmp/dottyout.ps';
 
        if (~getenv ('TMPDIR'))
 

              
            name = concat (getenv ('HOME'), '/.dottyout.ps');

            

            

              

              
        else

            

            

              

              
            name = concat (getenv ('TMPDIR'), '/.dottyout.ps', random (10000));

            

        
        if (getenv ('LEFTYWINSYS') ~= 'mswin' & ~pr)
        if (getenv ('LEFTYWINSYS') ~= 'mswin' & ~pr)

        
            if (~(pr = ask ('printer command', 'string', 'lpr')))
            if (~(pr = ask ('printer command', 'string', 'lpr')))

        
                return;
                return;

  

    

    

       Lines 768-772
       
    
  Link Here 
    

  

        
    vt.canvas = canvas;
    vt.canvas = canvas;

        
    destroywidget (pscanvas);
    destroywidget (pscanvas);

        
    if (otype == 'printer' & getenv ('LEFTYWINSYS') ~= 'mswin')
    if (otype == 'printer' & getenv ('LEFTYWINSYS') ~= 'mswin')

            

              
        system (concat (pr, ' /tmp/dottyout.ps; rm /tmp/dottyout.ps'));

              
        system (concat (pr, ' ', name, '; rm ',name));

            

        
};
};