workbench/libs/icon/putdefdiskobject.c

   1 /*
   2     Copyright © 1995-2007, The AROS Development Team. All rights reserved.
   3     $Id$
   4 */
   5
   6 #include "icon_intern.h"
   7
   8 /*****************************************************************************
   9
  10     NAME */
  11 #include <proto/icon.h>
  12
  13         AROS_LH1(BOOL, PutDefDiskObject,
  14
  15 /*  SYNOPSIS */
  16         AROS_LHA(struct DiskObject *, icon, A0),
  17
  18 /*  LOCATION */
  19         struct IconBase *, IconBase, 21, Icon)
  20
  21 /*  FUNCTION
  22         Puts a new default icon for a certain type.
  23
  24     INPUTS
  25         diskObject  - diskObject struct describing icon to put as new
  26                       default icon.
  27
  28     RESULT
  29         TRUE if success, else FALSE. Error may be obtained via IoErr().
  30
  31     NOTES
  32
  33     EXAMPLE
  34
  35     BUGS
  36
  37     SEE ALSO
  38         GetDefDiskObject(), PutDiskObject()
  39
  40     INTERNALS
  41
  42 *****************************************************************************/
  43 {
  44     AROS_LIBFUNC_INIT
  45
  46     return PutIconTags
  47     (
  48         NULL, NULL,
  49         ICONPUTA_PutDefaultType,  icon->do_Type,
  50         ICONPUTA_NotifyWorkbench, TRUE,
  51         TAG_DONE
  52     );
  53
  54     AROS_LIBFUNC_EXIT
  55 } /* PutDefDiskObject() */